Index: /issm/trunk/src/c/objects/Elements/Penta.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 5673)
+++ /issm/trunk/src/c/objects/Elements/Penta.cpp	(revision 5674)
@@ -3793,5 +3793,5 @@
 	double     Pe_reduced[numdof]; //for the six nodes only
 	double     Ke_gaussian[27][3];
-	double     L[3]; //for the three nodes of the bed
+	double     l1l6[6]; //for the six nodes of the penta
 	double     l1l7[7]; //for the six nodes and the bubble 
 	double     B[8][27];
@@ -3955,5 +3955,5 @@
 
 			/*Get L matrix : */
-			tria->GetL(&L[0], &xyz_list[0][0], gauss_coord_tria,1);
+			GetNodalFunctionsP1(l1l6, gauss);
 
 			/*Get water_pressure at gaussian point */