int main (int argc,char *argv []) { int argNum; int optID = MDbalance; const char *optStr, *optName = MDOptModel; const char *options [] = { "pet", "surplus", "infiltration", "runoff", "discharge", "watertemp", "thermal", "thermal2", "thermal3", "balance", "geometry", "bgc", "bgc_DIN","bgc_DINPLUSBIOMASS", "bgc_DOC", "fecal", "DO2", (char *) NULL }; argNum = MFOptionParse (argc,argv); if ((optStr = MFOptionGet (optName)) != (char *) NULL) optID = CMoptLookup (options, optStr, true); switch (optID) { case MDpet: return (MFModelRun (argc,argv,argNum,MDRainPotETDef)); case MDsurplus: return (MFModelRun (argc,argv,argNum,MDRainWaterSurplusDef)); case MDinfiltration: return (MFModelRun (argc,argv,argNum,MDRainInfiltrationDef)); case MDrunoff: return (MFModelRun (argc,argv,argNum,MDRunoffDef)); case MDdischarge: return (MFModelRun (argc,argv,argNum,MDDischargeDef)); case MDbalance: return (MFModelRun (argc,argv,argNum,MDWaterBalanceDef)); case MDwatertemp: return (MFModelRun (argc,argv,argNum,MDWTempRiverRouteDef)); case MDthermal: return (MFModelRun (argc,argv,argNum,MDThermalInputsDef)); // RJS 013112 case MDthermal2: return (MFModelRun (argc,argv,argNum,MDThermalInputs2Def)); // RJS 062012 case MDthermal3: return (MFModelRun (argc,argv,argNum,MDThermalInputs3Def)); // RJS 112712 case MDgeometry: return (MFModelRun (argc,argv,argNum,MDRiverWidthDef)); case MDbgc: return (MFModelRun (argc,argv,argNum,MDBgcRoutingDef)); case MDbgc_DOC: return (MFModelRun (argc,argv,argNum,MDBgcDOCRoutingDef)); case MDbgc_DIN: return (MFModelRun (argc,argv,argNum,MDBgcDINRoutingDef)); case MDbgc_DINPLUSBIOMASS: return (MFModelRun (argc,argv,argNum,MDBgcDINPlusBiomassRoutingDef)); case MDDO2: return (MFModelRun (argc,argv,argNum,MDDO2Def)); // RJS 111612 default: MFOptionMessage (optName, optStr, options); return (CMfailed); } return (CMfailed); }
int main (int argc,char *argv []) { //printf("at start of main\n"); int argNum; //int DELAY=10; //int i; int optID = MDbankfullQcalc; //CHANGED may2011 const char *optStr, *optName = MDOptModel; const char *options [] = { "pet", "surplus", "infiltration", "runoff", "discharge", "watertemp", "balance", "geometry", "bgc", "bgc_DIN","bgc_DINPLUSBIOMASS", "bgc_DOC", "fecal", "sedimentflux","bedloadflux", "BQARTinputs" , "BQARTpreprocess","bankfullQcalc","riverbedshape",(char *) NULL }; argNum = MFOptionParse (argc,argv); if ((optStr = MFOptionGet (optName)) != (char *) NULL) optID = CMoptLookup (options, optStr, true); //printf("before switch\n"); switch (optID) { case MDpet: return (MFModelRun (argc,argv,argNum,MDRainPotETDef)); case MDsurplus: return (MFModelRun (argc,argv,argNum,MDRainWaterSurplusDef)); case MDinfiltration: return (MFModelRun (argc,argv,argNum,MDRainInfiltrationDef)); case MDrunoff: return (MFModelRun (argc,argv,argNum,MDRunoffDef)); case MDdischarge: return (MFModelRun (argc,argv,argNum,MDDischargeDef)); case MDwatertemp: return (MFModelRun (argc,argv,argNum,MDWTempRiverRouteDef)); case MDbalance: return (MFModelRun (argc,argv,argNum,MDWaterBalanceDef)); case MDgeometry: return (MFModelRun (argc,argv,argNum,MDRiverWidthDef)); case MDbgc: return (MFModelRun (argc,argv,argNum,MDBgcRoutingDef)); case MDbgc_DOC: return (MFModelRun (argc,argv,argNum,MDBgcDOCRoutingDef)); case MDbgc_DIN: return (MFModelRun (argc,argv,argNum,MDBgcDINRoutingDef)); case MDbgc_DINPLUSBIOMASS: return (MFModelRun (argc,argv,argNum,MDBgcDINPlusBiomassRoutingDef)); case MDsedimentflux: return (MFModelRun (argc,argv,argNum,MDSedimentFluxDef)); case MDbedloadflux: return (MFModelRun (argc,argv,argNum,MDBedloadFluxDef)); case MDBQARTpreprocess: return (MFModelRun (argc,argv,argNum,MDBQARTpreprocessDef)); case MDbankfullQcalc: return (MFModelRun (argc,argv,argNum,MDBankfullQcalcDef)); case MDRiverbedShapeExponent: return (MFModelRun (argc,argv,argNum,MDRiverbedShapeExponentDef)); default: MFOptionMessage (optName, optStr, options); return (CMfailed); } return (CMfailed); }