Changeset 27820
- Timestamp:
- 07/03/23 12:54:20 (21 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Elements/Tria.cpp
r27798 r27820 1128 1128 int dim, domaintype; 1129 1129 IssmDouble vx, vy, vel, c, wrate; 1130 IssmDouble time, groundedice ;1130 IssmDouble time, groundedice, yts; 1131 1131 1132 1132 /*Get problem dimension and whether there is moving front or not*/ 1133 1133 this->FindParam(&domaintype,DomainTypeEnum); 1134 1134 this->FindParam(&time,TimeEnum); 1135 this->FindParam(&yts,ConstantsYtsEnum); 1135 1136 1136 1137 switch(domaintype){ … … 1176 1177 case 4: 1177 1178 /* Exp 4: set c=v-wrate(given), for the first 500 years, then c=0 for the second 500 years*/ 1178 if((groundedice<0) && (time<=500.0 )) {1179 if((groundedice<0) && (time<=500.0*yts)) { 1179 1180 wrate_input->GetInputValue(&wrate,&gauss); 1180 1181 }
Note:
See TracChangeset
for help on using the changeset viewer.