Changeset 15897
- Timestamp:
- 08/23/13 09:00:02 (12 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
r15896 r15897 5281 5281 for(int iv=0;iv<3;iv++){ 5282 5282 gauss->GaussVertex(iv); 5283 gaussup->Gauss Node(iv+3);5283 gaussup->GaussVertex(iv+3); 5284 5284 5285 5285 // TODO: make sure that no node is computed twice (insert mask) … … 5350 5350 /*Intermediaries*/ 5351 5351 bool isenthalpy; 5352 IssmDouble waterfraction _array[NUMVERTICES], temperature[NUMVERTICES];5352 IssmDouble waterfraction[NUMVERTICES], temperature[NUMVERTICES]; 5353 5353 IssmDouble enthalpy[NUMVERTICES], pressure[NUMVERTICES]; 5354 5354 IssmDouble latentheat, dt; … … 5371 5371 enthalpy_input->GetInputValue(&enthalpy[iv], gauss); 5372 5372 pressure_input->GetInputValue(&pressure[iv], gauss); 5373 matpar->EnthalpyToThermal(&temperature[iv], 5373 matpar->EnthalpyToThermal(&temperature[iv],&waterfraction[iv], enthalpy[iv],pressure[iv]); 5374 5374 5375 5375 /*drain water fraction*/ -
issm/trunk-jpl/src/c/classes/Elements/Penta.h
r15892 r15897 359 359 void UpdateThermalBasalConstraints(void); 360 360 void ComputeBasalMeltrate(void); 361 361 void DrainWaterfraction(void); 362 362 #endif 363 363 -
issm/trunk-jpl/src/c/shared/Elements/elements.h
r15889 r15897 19 19 IssmDouble* PrecipitationsPresentday, 20 20 IssmDouble* TemperaturesLgm, IssmDouble* TemperaturesPresentday, 21 21 IssmDouble* monthlytemperaturesout, IssmDouble* monthlyprecout); 22 22 IssmDouble DrainageFunctionWaterfraction(IssmDouble waterfraction); 23 23
Note:
See TracChangeset
for help on using the changeset viewer.