Index: /issm/trunk-jpl/src/c/classes/Elements/Tria.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/Elements/Tria.cpp	(revision 17858)
+++ /issm/trunk-jpl/src/c/classes/Elements/Tria.cpp	(revision 17859)
@@ -1450,4 +1450,5 @@
 	/*Intermediaries*/
 	IssmDouble* xyz_list = NULL;
+	IssmDouble* xyz_list_base = NULL;
 	IssmDouble  pressure,water_pressure,sigma_nn,viscosity,bed,base;
 	IssmDouble  bed_normal[2];
@@ -1458,4 +1459,5 @@
 	/* Get node coordinates and dof list: */
 	GetVerticesCoordinates(&xyz_list);
+	GetVerticesCoordinatesTop(&xyz_list_base);
 
 	/*Retrieve all inputs we will be needing: */
@@ -1484,5 +1486,5 @@
 
 			/*Get normal vector to the bed */
-			NormalBase(&bed_normal[0],xyz_list);
+			NormalBase(&bed_normal[0],xyz_list_base);
 
 			/*basalforce*/
@@ -1518,4 +1520,5 @@
 	delete gauss;
 	xDelete<IssmDouble>(xyz_list);
+	xDelete<IssmDouble>(xyz_list_base);
 }
 /*}}}*/