Changeset 23945

Timestamp:

05/29/19 10:47:41 (6 years ago)

Author:

Mathieu Morlighem

Message:

CHG: added initial phi and h

File:

• issm/trunk-jpl/src/c/analyses/HydrologyGlaDSAnalysis.cpp (modified) (1 diff)

issm/trunk-jpl/src/c/analyses/HydrologyGlaDSAnalysis.cpp

@@ -72 +72 @@
 
         iomodel->FetchDataToInput(elements,"md.hydrology.sheet_conductivity",HydrologySheetConductivityEnum);
+        iomodel->FetchDataToInput(elements,"md.initialization.watercolumn",HydrologySheetThicknessEnum);
+        iomodel->FetchDataToInput(elements,"md.initialization.hydraulic_potential",HydraulicPotentialEnum);
+        iomodel->FetchDataToInput(elements,"md.initialization.vx",VxEnum);
+        iomodel->FetchDataToInput(elements,"md.initialization.vy",VyEnum);
+        iomodel->FindConstant(&frictionlaw,"md.friction.law");
+
+        /*Friction law variables*/
+        switch(frictionlaw){
+                case 1:
+                        iomodel->FetchDataToInput(elements,"md.friction.coefficient",FrictionCoefficientEnum);
+                        iomodel->FetchDataToInput(elements,"md.friction.p",FrictionPEnum);
+                        iomodel->FetchDataToInput(elements,"md.friction.q",FrictionQEnum);
+                        break;
+                case 8:
+                        iomodel->FetchDataToInput(elements,"md.friction.coefficient",FrictionCoefficientEnum);
+                        break;
+                default:
+                        _error_("Friction law "<< frictionlaw <<" not supported");
+        }
 }/*}}}*/
 void HydrologyGlaDSAnalysis::UpdateParameters(Parameters* parameters,IoModel* iomodel,int solution_enum,int analysis_enum){/*{{{*/