Changeset 22953 for issm/trunk-jpl/src/c/modules/FloatingiceMeltingRatex/FloatingiceMeltingRatex.cpp

Timestamp:

07/16/18 15:37:34 (7 years ago)

Author:

Eric.Larour

Message:

CHG: allow spatial linear melt rates.

File:

• issm/trunk-jpl/src/c/modules/FloatingiceMeltingRatex/FloatingiceMeltingRatex.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/modules/FloatingiceMeltingRatex/FloatingiceMeltingRatex.cpp

@@ -29 +29 @@
                         MismipFloatingiceMeltingRatex(femmodel);
                         break;
+                case SpatialLinearFloatingMeltRateEnum:
+                        if(VerboseSolution())_printf0_("        call Spatial Linear Floating melting rate module\n");
+                        SpatialLinearFloatingiceMeltingRatex(femmodel);
+                        break;
                 case BasalforcingsPicoEnum:
                         if(VerboseSolution())_printf0_(" call Pico Floating melting rate module\n");
@@ -47 +51 @@
 
 }/*}}}*/
+void SpatialLinearFloatingiceMeltingRatex(FemModel* femmodel){/*{{{*/
+
+        for(int i=0;i<femmodel->elements->Size();i++){
+                Element* element=xDynamicCast<Element*>(femmodel->elements->GetObjectByOffset(i));
+                element->SpatialLinearFloatingiceMeltingRate();
+        }
+
+}/*}}}*/
 void MismipFloatingiceMeltingRatex(FemModel* femmodel){/*{{{*/