Index: /issm/trunk-jpl/src/c/modules/Gradjx/Gradjx.cpp
===================================================================
--- /issm/trunk-jpl/src/c/modules/Gradjx/Gradjx.cpp	(revision 18151)
+++ /issm/trunk-jpl/src/c/modules/Gradjx/Gradjx.cpp	(revision 18152)
@@ -38,5 +38,4 @@
 		for(int j=0;j<elements->Size();j++){
 			Element* element=(Element*)elements->GetObjectByOffset(j);
-			//element->Gradj(gradient_list[i],control_type[i],i);
 			analysis->GradientJ(gradient_list[i],element,control_type[i],i);
 		}
@@ -57,4 +56,7 @@
 
 	/*Clean-up and assign output pointer*/
+	delete analysis;
+	xDelete<Vector<IssmDouble>*>(gradient_list);
+	xDelete<int>(control_type);
 	if(pnorm_list){
 		*pnorm_list=norm_list;
@@ -64,6 +66,5 @@
 	}
 	if(pgradient)  *pgradient=gradient;
-	xDelete<Vector<IssmDouble>*>(gradient_list);
-	xDelete<int>(control_type);
+
 }
 void Gradjx(IssmDouble** pgradient,IssmDouble** pnorm_list, Elements* elements,Nodes* nodes, Vertices* vertices, Loads* loads, Materials* materials, Parameters* parameters){