modelParams[j].activeConstraints = (int *) SafeCalloc(numDefinedConstraints, sizeof(int)); /* allocate space for active constraints (yes/no) */
}
+ MrBayesPrint ("%s Model defaults set\n", spacer);
return (NO_ERROR);
}
{
setUpAnalysisSuccess=NO;
+ MrBayesPrint ("%s Setting up analysis\n", spacer);
/* calculate number of characters and taxa */
numLocalChar = NumNonExcludedChar ();
return (ERROR);
}
+ MrBayesPrint ("%s Local taxa set\n", spacer);
/* calculate number of global chains */
numGlobalChains = chainParams.numRuns * chainParams.numChains;
if (CheckExpandedModels() == ERROR)
return (ERROR);
+ MrBayesPrint ("%s ExpandedModels checked\n", spacer);
/* Set up model info */
if (SetModelInfo() == ERROR)
return (ERROR);
+ MrBayesPrint ("%s SetModelInfo\n", spacer);
/* Calculate number of (uncompressed) characters for each division */
if (GetNumDivisionChars() == ERROR)
return (ERROR);
+ MrBayesPrint ("%s GetNumDivisionChars\n", spacer);
/* Compress data and calculate some things needed for setting up params. */
if (CompressData() == ERROR)
return (ERROR);
+ MrBayesPrint ("%s Compressed Data\n", spacer);
/* Add dummy characters, if needed. */
if (AddDummyChars() == ERROR)
return (ERROR);
if (SetModelParams () == ERROR)
return (ERROR);
+ MrBayesPrint ("%s Model Params Set\n", spacer);
/* Allocate normal params */
if (AllocateNormalParams () == ERROR)
return (ERROR);
+ MrBayesPrint ("%s Normal Params allocated\n", spacer);
/* Allocate tree params */
if (AllocateTreeParams () == ERROR)
return (ERROR);
+ MrBayesPrint ("%s Tree Params allocated\n", spacer);
/* Set default number of trees for sumt to appropriate number */
sumtParams.numTrees = numTrees;
if (FillNormalParams (seed, 0, numGlobalChains) == ERROR)
return (ERROR);
+ MrBayesPrint ("%s Normal parameters filled\n", spacer);
/* Process standard characters (calculates bsIndex, tiIndex, and more). */
if (ProcessStdChars(seed) == ERROR)
return (ERROR);
if (FillTreeParams (seed, 0, numGlobalChains) == ERROR)
return (ERROR);
+ MrBayesPrint ("%s Tree params filled\n", spacer);
/* Set the applicable moves that could be used by the chain. */
if (SetMoves () == ERROR)
return (ERROR);
setUpAnalysisSuccess=YES;
+ MrBayesPrint ("%s Set up analysis\n", spacer);
return (NO_ERROR);
}