Changeset 18607

Timestamp:

10/09/14 09:38:53 (10 years ago)

Author:

Mathieu Morlighem

Message:

BUG: fixing AD

Location:

issm/trunk-jpl/src/c/cores

Files:

• balancethickness2_core.cpp (modified) (2 diffs)
• balancevelocity_core.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/cores/balancethickness2_core.cpp

@@ -13 +13 @@
 
         /*parameters: */
-        bool save_results;
+        bool        save_results;
+        IssmPDouble l = 8.;
 
         /*recover parameters: */
@@ -19 +20 @@
 
         if(VerboseSolution()) _printf0_("computing smooth surface slopes:\n");
-        femmodel->parameters->SetParam(IssmPDouble(8.),SmoothThicknessMultiplierEnum);
+        femmodel->parameters->SetParam(l,SmoothThicknessMultiplierEnum);
         femmodel->SetCurrentConfiguration(SmoothAnalysisEnum);
         femmodel->parameters->SetParam(SurfaceSlopeXEnum,InputToSmoothEnum);

issm/trunk-jpl/src/c/cores/balancevelocity_core.cpp

@@ -13 +13 @@
 
         /*parameters: */
-        bool save_results;
+        bool        save_results;
+        IssmPDouble l = 8.;
 
         /*recover parameters: */
@@ -19 +20 @@
 
         if(VerboseSolution()) _printf0_("computing smooth driving stress:\n");
-        femmodel->parameters->SetParam(IssmPDouble(8.),SmoothThicknessMultiplierEnum);
+        femmodel->parameters->SetParam(l,SmoothThicknessMultiplierEnum);
         femmodel->SetCurrentConfiguration(SmoothAnalysisEnum);
         femmodel->parameters->SetParam(DrivingStressXEnum,InputToSmoothEnum);