Index: /issm/trunk/src/c/objects/Elements/Tria.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Tria.cpp	(revision 4419)
+++ /issm/trunk/src/c/objects/Elements/Tria.cpp	(revision 4420)
@@ -3071,10 +3071,12 @@
 	/*Spawn 3 sing elements: */
 	for(i=0;i<3;i++){
+
+		/*Create Sing and call sing method*/
 		sing=(Sing*)SpawnSing(i);
 		sing->CreateKMatrix(Kgg);
-	}
-
-	/*clean up*/
-	delete sing;
+
+		/*clean up*/
+		delete sing;
+	}
 
 }
@@ -4198,10 +4200,12 @@
 	/*Spawn 3 sing elements: */
 	for(i=0;i<3;i++){
+
+		/*Create Sing and call sing method*/
 		sing=(Sing*)SpawnSing(i);
 		sing->CreatePVector(pg);
-	}
-
-	/*clean up*/
-	delete sing;
+
+		/*clean up*/
+		delete sing;
+	}
 
 }