Changeset 27056

Timestamp:

06/10/22 14:49:29 (3 years ago)

Author:

caronlam

Message:

BUG: minor change

File:

• issm/trunk-jpl/src/c/classes/Elements/Tria.cpp (modified) (6 diffs)

issm/trunk-jpl/src/c/classes/Elements/Tria.cpp

@@ -7455 +7455 @@
         IssmDouble* G=NULL;
         IssmDouble* Grot=NULL;
-        IssmDouble* Gsub[SLGEOM_NUMLOADS];
+        IssmDouble** Gsub=NULL;
         bool computefuture=false;
 
@@ -7465 +7465 @@
         int  nel,nbar;
 
+        Gsub=xNew<IssmDouble*>(SLGEOM_NUMLOADS);
 
         this->parameters->FindParam(&sal,SolidearthSettingsSelfAttractionEnum);
@@ -7484 +7485 @@
         xDelete<IssmDouble>(Grot);
         for (int l=0;l<SLGEOM_NUMLOADS;l++) xDelete<IssmDouble>(Gsub[l]);
-        xDelete<IssmDouble>(Gsub[SLGEOM_NUMLOADS]);
+        xDelete<IssmDouble*>(Gsub);
 
         return;
@@ -7542 +7543 @@
         IssmDouble* GNrot=NULL;
         IssmDouble* GErot=NULL;
-        IssmDouble* Gsub[SLGEOM_NUMLOADS];
-        IssmDouble* GUsub[SLGEOM_NUMLOADS];
-        IssmDouble* GNsub[SLGEOM_NUMLOADS];
-        IssmDouble* GEsub[SLGEOM_NUMLOADS];
+        IssmDouble** Gsub;
+        IssmDouble** GUsub;
+        IssmDouble** GNsub;
+        IssmDouble** GEsub;
         bool computefuture=false;
 
@@ -7555 +7556 @@
         bool percpu=false;
         bool planethasocean=false;
+
+        Gsub=xNew<IssmDouble*>(SLGEOM_NUMLOADS);
+        GUsub=xNew<IssmDouble*>(SLGEOM_NUMLOADS);
+        GEsub=xNew<IssmDouble*>(SLGEOM_NUMLOADS);
+        GNsub=xNew<IssmDouble*>(SLGEOM_NUMLOADS);
 
         this->parameters->FindParam(&nel,MeshNumberofelementsEnum);
@@ -7645 +7651 @@
                 xDelete<IssmDouble>(GEsub[l]);
         }
-        xDelete<IssmDouble>(Gsub[SLGEOM_NUMLOADS]);
-        xDelete<IssmDouble>(GUsub[SLGEOM_NUMLOADS]);
-        xDelete<IssmDouble>(GNsub[SLGEOM_NUMLOADS]);
-        xDelete<IssmDouble>(GEsub[SLGEOM_NUMLOADS]);
+        xDelete<IssmDouble*>(Gsub);
+        xDelete<IssmDouble*>(GUsub);
+        xDelete<IssmDouble*>(GEsub);
+        xDelete<IssmDouble*>(GNsub);
 
 } /*}}}*/