Index: /issm/trunk/src/c/objects/Elements/Penta.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 3818)
+++ /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 3819)
@@ -208,5 +208,5 @@
 	penta->matice=(Matice*)penta->hmatice.delivers();
 	penta->matpar=(Matpar*)penta->hmatpar.delivers();
-	penta->neighbors=(Penta*)penta->hneighbors.deliverp();
+	penta->neighbors=(Penta**)penta->hneighbors.deliverp();
 
 	return penta;
@@ -229,5 +229,5 @@
 	this->matice=(Matice*)this->hmatice.delivers();
 	this->matpar=(Matpar*)this->hmatpar.delivers();
-	this->neighbors=(Penta*)this->hneighbors.deliverp();
+	this->neighbors=(Penta**)this->hneighbors.deliverp();
 
 	/*point parameters to real dataset: */
Index: /issm/trunk/src/c/objects/Elements/Penta.h
===================================================================
--- /issm/trunk/src/c/objects/Elements/Penta.h	(revision 3818)
+++ /issm/trunk/src/c/objects/Elements/Penta.h	(revision 3819)
@@ -32,5 +32,5 @@
 		Matice      *matice;       // 1 material ice
 		Matpar      *matpar;       // 1 material parameter
-		Penta       *neighbors;   // 2 neighbors: first one under, second one above
+		Penta      **neighbors;   // 2 neighbors: first one under, second one above
 
 		Parameters  *parameters;   //pointer to solution parameters
