Changeset 18150

Timestamp:

06/12/14 15:34:50 (11 years ago)

Author:

Mathieu Morlighem

Message:

BUG: reverting back analytical test

File:

• issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp (modified) (5 diffs)

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

@@ -7 +7 @@
 #include "../cores/cores.h"
 
-#define FSANALYTICAL 4
+//#define FSANALYTICAL 21
 
 /*Model processing*/
@@ -3064 +3064 @@
 
         if(element->IsFloating() || !element->IsOnBase()) return NULL;
-        return NULL;
 
         /*If on water or not FS, skip stiffness: */
@@ -3075 +3074 @@
         IssmDouble  alpha2,Jdet;
         IssmDouble  x_coord,y_coord,z_coord;
-        IssmDouble *xyz_list      = NULL;
         IssmDouble *xyz_list_base = NULL;
         Gauss*      gauss         = NULL;
@@ -3093 +3091 @@
 
         /*Retrieve all inputs and parameters*/
-        element->GetVerticesCoordinates(&xyz_list);
         element->GetVerticesCoordinatesBase(&xyz_list_base);
         Input* vx_input         = element->GetInput(VxEnum);      _assert_(vx_input);
@@ -3126 +3123 @@
         /*Clean up and return*/
         delete gauss;
-        xDelete<IssmDouble>(xyz_list);
         xDelete<IssmDouble>(xyz_list_base);
         xDelete<IssmDouble>(B);