Changeset 19307
- Timestamp:
- 04/23/15 11:33:54 (10 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/cores/transient_core.cpp
r19224 r19307 25 25 bool time_adapt; 26 26 int output_frequency; 27 int restart_frequency;28 27 int domaintype,groundingline_migration,smb_model; 29 28 int numoutputs; … … 35 34 IssmDouble time; 36 35 37 //first, figure out if there was a check point, if so, do a reset of the FemModel* femmodel structure.38 femmodel->Restart();39 40 36 //then recover parameters common to all solutions 41 37 femmodel->parameters->FindParam(&domaintype,DomainTypeEnum); … … 46 42 femmodel->parameters->FindParam(&dakota_analysis,QmuIsdakotaEnum); 47 43 femmodel->parameters->FindParam(&output_frequency,SettingsOutputFrequencyEnum); 48 femmodel->parameters->FindParam(&restart_frequency,SettingsRestartFrequencyEnum);49 44 femmodel->parameters->FindParam(&time_adapt,TimesteppingTimeAdaptEnum); 50 45 femmodel->parameters->FindParam(&isstressbalance,TransientIsstressbalanceEnum); … … 185 180 OutputResultsx(femmodel); 186 181 } 187 if(restart_frequency && step%restart_frequency==0){188 if(VerboseSolution()) _printf0_(" checkpointing model \n");189 femmodel->CheckPoint();190 }191 182 } 192 183 -
issm/trunk-jpl/src/c/main/esmfbinders.cpp
r19289 r19307 33 33 /*Some specific code here for the binding: */ 34 34 femmodel->parameters->SetParam(SMBgcmEnum,SurfaceforcingsEnum); //bypass SMB model, will be provided by GCM! 35 36 /*Restart file: */ 37 femmodel->Restart(); 35 38 36 39 /*Assign output pointers: */ … … 106 109 void FinalizeISSM(){ /*{{{*/ 107 110 111 /*Output results: */ 112 OutputResultsx(femmodel); 113 114 /*Check point: */ 115 femmodel->CheckPoint(); 116 108 117 /*Wrap up: */ 109 118 delete femmodel; femmodel=NULL;
Note:
See TracChangeset
for help on using the changeset viewer.