Index: /issm/trunk/src/c/Container/Results.cpp
===================================================================
--- /issm/trunk/src/c/Container/Results.cpp	(revision 8654)
+++ /issm/trunk/src/c/Container/Results.cpp	(revision 8655)
@@ -165,10 +165,8 @@
 
 	for(i=0;i<this->Size();i++){
-
 		ExternalResult* result=(ExternalResult*)this->GetObjectByOffset(i);
 
 		/*write result to disk: */
 		result->WriteData(fid,io_gather);
-
 	}
 
Index: /issm/trunk/src/c/objects/Elements/Penta.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 8654)
+++ /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 8655)
@@ -3700,9 +3700,9 @@
 	GaussPenta* gauss=NULL;
 
+	/* Ice/ocean heat exchange flux on ice shelf base */
+	if (!IsOnBed() || !IsOnShelf()) return NULL;
+
 	/*Initialize Element vector*/
 	ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters);
-
-	/* Ice/ocean heat exchange flux on ice shelf base */
-	if (!IsOnBed() || !IsOnShelf()) return NULL;
 
 	/*Retrieve all inputs and parameters*/