INNER CODE UNIT · C
runIDSeed
NBISweden/MrBayes · src/bayes.c:535
runIDSeed = -runIDSeed;
}
ierror = MPI_Bcast(&runIDSeed, 1, MPI_LONG, 0, MPI_COMM_WORLD);
if (ierror != MPI_SUCCESS)
{
MrBayesPrint ("%s Problem broadcasting run ID seed\n", spacer);
}
# else
curTime = time(NULL);
globalSeed = (RandLong)curTime;
if (globalSeed < 0)
globalSeed = -globalSeed;
/* Note: swapSeed will often be the same as globalSeed */
curTime = time(NULL);
swapSeed = (RandLong)curTime;
if (swapSeed < 0)