Changeset 20958
- Timestamp:
- 07/20/16 09:22:55 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/cores/transient_core.cpp
r20955 r20958 20 20 21 21 /*parameters: */ 22 IssmDouble starttime,finaltime,dt,yts;22 IssmDouble finaltime,dt,yts; 23 23 bool isstressbalance,ismasstransport,issmb,isFS,isthermal,isgroundingline,isgia,isslr,iscoupler,ismovingfront,isdamageevolution,ishydrology; 24 24 bool save_results,dakota_analysis; … … 35 35 IssmDouble time; 36 36 37 //then recover parameters common to all solutions 37 /*first, figure out if there was a check point, if so, do a reset of the FemModel* femmodel structure. */ 38 if(recording_frequency) femmodel->Restart(); 39 40 /*then recover parameters common to all solutions*/ 38 41 femmodel->parameters->FindParam(&domaintype,DomainTypeEnum); 39 42 femmodel->parameters->FindParam(&step,StepEnum); 40 femmodel->parameters->FindParam(& starttime,TimesteppingStartTimeEnum);43 femmodel->parameters->FindParam(&time,TimeEnum); 41 44 femmodel->parameters->FindParam(&finaltime,TimesteppingFinalTimeEnum); 42 45 femmodel->parameters->FindParam(&dt,TimesteppingTimeStepEnum); … … 61 64 femmodel->parameters->FindParam(&numoutputs,TransientNumRequestedOutputsEnum); 62 65 if(numoutputs) femmodel->parameters->FindParam(&requested_outputs,&numoutputs,TransientRequestedOutputsEnum); 63 64 /*first, figure out if there was a check point, if so, do a reset of the FemModel* femmodel structure. */65 if(recording_frequency)femmodel->Restart();66 67 /*initialize: */68 time=starttime;69 66 70 67 while(time < finaltime - (yts*DBL_EPSILON)){ //make sure we run up to finaltime. … … 158 155 } 159 156 160 if(recording_frequency && step%recording_frequency==0){157 if(recording_frequency && (step%recording_frequency==0)){ 161 158 if(VerboseSolution()) _printf0_(" checkpointing model \n"); 162 159 femmodel->CheckPoint();
Note:
See TracChangeset
for help on using the changeset viewer.