Index: /issm/trunk/src/c/objects/Elements/Tria.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Tria.cpp	(revision 5864)
+++ /issm/trunk/src/c/objects/Elements/Tria.cpp	(revision 5865)
@@ -2862,5 +2862,6 @@
 ElementMatrix* Tria::CreateKMatrixCouplingMacAyealPattynFriction(void){
 
-	const int numdof   = 2 *NUMVERTICES;
+	const int numdof        = 2 *NUMVERTICES;
+	const int numdoftotal   = 4 *NUMVERTICES;
 	int       i,j;
 	int     ig;
@@ -2943,6 +2944,6 @@
 
 
-	for(i=0;i<numdof;i++) for(j=0;j<numdof;j++) Ke->values[i*numdof+(numdof+j)]+=Ke_gg[i][j];
-	for(i=0;i<numdof;i++) for(j=0;j<numdof;j++) Ke->values[(i+numdof)*numdof+j]+=Ke_gg[i][j];
+	for(i=0;i<numdof;i++) for(j=0;j<numdof;j++) Ke->values[i*numdoftotal+(numdof+j)]+=Ke_gg[i][j];
+	for(i=0;i<numdof;i++) for(j=0;j<numdof;j++) Ke->values[(i+numdof)*numdoftotal+j]+=Ke_gg[i][j];
 
 	/*Clean up and return*/