Index: /issm/trunk-jpl/src/c/classes/Elements/Penta.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/Elements/Penta.cpp	(revision 15970)
+++ /issm/trunk-jpl/src/c/classes/Elements/Penta.cpp	(revision 15971)
@@ -11355,5 +11355,5 @@
 	/*Go through nodes, and whoever is on the potential_ungrounding, ends up in nodes_on_iceshelf: */
 	for(i=0;i<NUMVERTICES;i++){
-		if (reCast<bool,IssmDouble>(vertices_potentially_ungrounding[nodes[i]->Pid()])){
+		if (reCast<bool,IssmDouble>(vertices_potentially_ungrounding[vertices[i]->Pid()])){
 			vec_nodes_on_iceshelf->SetValue(vertices[i]->Pid(),-1.,INS_VAL);