Index: /issm/trunk/src/c/objects/Elements/Penta.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 4924)
+++ /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 4925)
@@ -1969,4 +1969,9 @@
 	tria->CreateKMatrix(Kgg);
 	delete tria;
+
+	/*Delete Vx and Vy averaged*/
+	this->inputs->DeleteInput(VxAverageEnum);
+	this->inputs->DeleteInput(VyAverageEnum);
+
 	return;
 
@@ -2002,4 +2007,9 @@
 	tria->CreateKMatrix(Kgg);
 	delete tria;
+
+	/*Delete Vx and Vy averaged*/
+	this->inputs->DeleteInput(VxAverageEnum);
+	this->inputs->DeleteInput(VyAverageEnum);
+
 	return;
 
@@ -2780,4 +2790,9 @@
 	tria->CreateKMatrix(Kgg);
 	delete tria;
+
+	/*Delete Vx and Vy averaged*/
+	this->inputs->DeleteInput(VxAverageEnum);
+	this->inputs->DeleteInput(VyAverageEnum);
+
 	return;
 
@@ -3078,10 +3093,17 @@
 	if(!onbed)return;
 
+	/*Depth Averaging Vx and Vy*/
+	this->InputDepthAverageAtBase(VxEnum,VxAverageEnum);
+	this->InputDepthAverageAtBase(VyEnum,VyAverageEnum);
+
 	/*Spawn Tria element from the base of the Penta: */
 	tria=(Tria*)SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria.
 	tria->CreatePVector(pg);
 	delete tria;
-	this-inputs->DeleteInput(VxAverageEnum);
-	this-inputs->DeleteInput(VyAverageEnum);
+
+	/*Delete Vx and Vy averaged*/
+	this->inputs->DeleteInput(VxAverageEnum);
+	this->inputs->DeleteInput(VyAverageEnum);
+
 	return;
 }
@@ -3106,4 +3128,8 @@
 	/*Is this element on the bed? :*/
 	if(!onbed)return;
+
+	/*Depth Averaging Vx and Vy*/
+	this->InputDepthAverageAtBase(VxEnum,VxAverageEnum);
+	this->InputDepthAverageAtBase(VyEnum,VyAverageEnum);
 
 	/*Spawn Tria element from the base of the Penta: */
@@ -3111,6 +3137,9 @@
 	tria->CreatePVector(pg);
 	delete tria;
-	this-inputs->DeleteInput(VxAverageEnum);
-	this-inputs->DeleteInput(VyAverageEnum);
+
+	/*Delete Vx and Vy averaged*/
+	this->inputs->DeleteInput(VxAverageEnum);
+	this->inputs->DeleteInput(VyAverageEnum);
+
 	return;
 }
@@ -3901,15 +3930,21 @@
 	if(!onbed)return;
 
+	/*Depth Averaging Vx and Vy*/
+	this->InputDepthAverageAtBase(VxEnum,VxAverageEnum);
+	this->InputDepthAverageAtBase(VyEnum,VyAverageEnum);
+
 	/*Spawn Tria element from the base of the Penta: */
 	tria=(Tria*)SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria.
 	tria->CreatePVector(pg);
 	delete tria;
+
+	/*Delete Vx and Vy averaged*/
 	this-inputs->DeleteInput(VxAverageEnum);
 	this-inputs->DeleteInput(VyAverageEnum);
+
 	return;
 }
 /*}}}*/
 /*FUNCTION Penta::CreatePVectorSlope {{{1*/
-
 void Penta::CreatePVectorSlope( Vec pg){