Index: /issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/Elements/Penta.cpp	(revision 15446)
+++ /issm/trunk-jpl/src/c/classes/Elements/Penta.cpp	(revision 15447)
@@ -6969,5 +6969,5 @@
 					&Ke_temp_stab[0][0],1);
 
-		for(i=0;i<numvert;i++) for(j=0;j<numvert;j++) Ke->values[i*numdof*4+3+j*4+3]+=Ke_temp_stab[i][j];
+		for(i=0;i<numvert;i++) for(j=0;j<numvert;j++) Ke->values[numdof*(i*4+3)+j*4+3]+=Ke_temp_stab[i][j];
 
 	}
