BUG: ocean-averaged sea level loads

ISSMteam · Oct 1, 2024 · 40790d0 · 40790d0
1 parent ee8d2e1
commit 40790d0
Showing 1 changed file with 2 additions and 7 deletions.
diff --git a/src/c/cores/sealevelchange_core.cpp b/src/c/cores/sealevelchange_core.cpp
@@ -840,13 +840,8 @@ IssmDouble  SealevelloadsOceanAverage(GrdLoads* loads, Vector<IssmDouble>* ocean
 	IssmDouble sealevelloadsaverage;	
 	IssmDouble subsealevelloadsaverage;	
 
-	Vector<IssmDouble>* vsealevelloadsvolume=loads->vsealevelloads->Duplicate();
-	Vector<IssmDouble>* vsubsealevelloadsvolume=loads->vsubsealevelloads->Duplicate();
-
-	vsealevelloadsvolume->Sum(&sealevelloadsaverage);
-	vsubsealevelloadsvolume->Sum(&subsealevelloadsaverage);
-	delete vsealevelloadsvolume; 
-	delete vsubsealevelloadsvolume; 
+	loads->vsealevelloads->Sum(&sealevelloadsaverage);
+   loads->vsubsealevelloads->Sum(&subsealevelloadsaverage);
 
 	return (sealevelloadsaverage+subsealevelloadsaverage)/totaloceanarea;
 } /*}}}*/