void doinit()
{
/* initializes variables */
inputnumbers(&spp, &chars, &nonodes, 1);
words = chars / bits + 1;
getoptions();
if (printdata)
fprintf(outfile, "%2ld species, %3ld characters\n", spp, chars);
alloctree2(&treenode);
setuptree2(treenode);
allocrest();
} /* doinit */
void doinit()
{ /* initializes variables */
inputnumbers(&spp, &loci, &nonodes2, 1);
getoptions();
if(!usertree)
nonodes2--;
if (printdata)
fprintf(outfile, "\n%4ld Populations, %4ld Loci\n", spp, loci);
alloctree(&curtree.nodep, nonodes2);
if (!usertree) {
alloctree(&bestree.nodep, nonodes2);
alloctree(&priortree.nodep, nonodes2);
if (njumble > 1) {
alloctree(&bestree2.nodep, nonodes2);
}
}
allocrest();
} /* doinit */
void doinput()
{
/* reads the input data */
inputnumbers(&spp, &chars, &nonodes, 1);
words = chars / bits + 1;
printf("%2ld species, %3ld characters\n", spp, chars);
printf("\nReading input file ...\n\n");
getoptions();
if (weights)
openfile(&weightfile,WEIGHTFILE,"weights file","r",progname,weightfilename);
if(ancvar)
openfile(&ancfile,ANCFILE,"ancestors file", "r",progname,ancfilename);
if(factors)
openfile(&factfile,FACTFILE,"factors file", "r",progname,factfilename);
alloctree(&treenode);
setuptree(treenode);
allocrest();
inputoptions();
inputdata(treenode, dollo, false, stdout);
} /* doinput */