void doinput(int argc, Char *argv[]) { /* reads the input data */ getoptions(); seqboot_inputnumbers(); allocrest(); inputoptions(); seqboot_inputdata(); } /* doinput */
void doinput(int argc, Char *argv[]) { /* reads the input data */ getoptions(); seqboot_inputnumbers(); allocrest(); if (weights) openfile(&weightfile,WEIGHTFILE,"input weight file", "r",argv[0],weightfilename); if (mixture){ openfile(&mixfile,MIXFILE,"mixture file", "r",argv[0],mixfilename); openfile(&outmixfile,"outmixture","output mixtures file","w",argv[0], outmixfilename); seqboot_inputaux(mixdata, mixfile); } if (ancvar){ openfile(&ancfile,ANCFILE,"ancestor file", "r",argv[0],ancfilename); openfile(&outancfile,"outancestors","output ancestors file","w",argv[0], outancfilename); seqboot_inputaux(ancdata, ancfile); } if (categories) { openfile(&catfile,CATFILE,"input category file","r",argv[0],catfilename); openfile(&outcatfile,"outcategories","output category file","w",argv[0], outcatfilename); inputcategs(0, sites, category, 9, "SeqBoot"); } if (factors){ openfile(&factfile,FACTFILE,"factors file","r",argv[0],factfilename); openfile(&outfactfile,"outfactors","output factors file","w",argv[0], outfactfilename); } if (justwts && !permute) openfile(&outweightfile,"outweights","output weight file", "w",argv[0],outweightfilename); else { openfile(&outfile,OUTFILE,"output data file","w",argv[0],outfilename); } inputoptions(); seqboot_inputdata(); } /* doinput */