Changeset 9697

Timestamp:

09/08/11 15:18:24 (14 years ago)

Author:

seroussi

Message:

start to fix balancethickness

File:

• issm/trunk/src/c/objects/Elements/Tria.cpp (modified) (3 diffs)

issm/trunk/src/c/objects/Elements/Tria.cpp

@@ -534 +534 @@
         /*Retrieve all Inputs and parameters: */
         GetVerticesCoordinates(&xyz_list[0][0], nodes, NUMVERTICES);
-        this->parameters->FindParam(&stabilization,PrognosticStabilizationEnum);
+        this->parameters->FindParam(&stabilization,BalancethicknessStabilizationEnum);
         this->parameters->FindParam(&dim,DimEnum);
         Input* vxaverage_input=NULL;
@@ -1316 +1316 @@
         Input* surface_mass_balance_input=inputs->GetInput(SurfaceforcingsMassBalanceEnum); _assert_(surface_mass_balance_input);
         Input* basal_melting_input=inputs->GetInput(BasalforcingsMeltingRateEnum);          _assert_(basal_melting_input);
-        Input* dhdt_input=inputs->GetInput(BalancethicknessThickeningRateEnum);                                       _assert_(dhdt_input);
+        Input* dhdt_input=inputs->GetInput(BalancethicknessThickeningRateEnum);             _assert_(dhdt_input);
         
         /* Start  looping on the number of gaussian points: */
@@ -5220 +5220 @@
         iomodel->Constant(&yts,ConstantsYtsEnum);
         iomodel->Constant(&stabilization,PrognosticStabilizationEnum);
+        iomodel->Constant(&stabilization,BalancethicknessStabilizationEnum);
         iomodel->Constant(&dakota_analysis,QmuIsdakotaEnum);