Index: /issm/trunk/src/c/objects/Loads/Icefront.cpp
===================================================================
--- /issm/trunk/src/c/objects/Loads/Icefront.cpp	(revision 4451)
+++ /issm/trunk/src/c/objects/Loads/Icefront.cpp	(revision 4452)
@@ -641,6 +641,4 @@
 	Node**   nodes=NULL;
 	Element* element=NULL;
-	int     element_type;
-		
 
 	/*quad grids: */
@@ -664,7 +662,5 @@
 	
 	/*check icefront is associated to a pentaelem: */
-	if(element_type!=PentaEnum){
-		ISSMERROR(" quad icefront is associated to a TriaElem!");
-	}
+	if(element->Enum()!=PentaEnum) ISSMERROR("Only Penta supported yet");
 
 	/* Get dof list and node coordinates: */
@@ -673,5 +669,5 @@
 	
 	//Identify which grids are comprised in the quad: 
-	if(element_type==PentaEnum)element_nodes=(Node**)xmalloc(6*sizeof(Node*));
+	element_nodes=(Node**)xmalloc(6*sizeof(Node*));
 	element->GetNodes((void**)element_nodes);
 
Index: /issm/trunk/src/c/solutions/stokescontrolinit.cpp
===================================================================
--- /issm/trunk/src/c/solutions/stokescontrolinit.cpp	(revision 4451)
+++ /issm/trunk/src/c/solutions/stokescontrolinit.cpp	(revision 4452)
@@ -51,5 +51,5 @@
 
 	if(verbose)_printf_("%s\n"," update boundary conditions for stokes using velocities previously computed...");
-	ResetBoundaryConditions(femmodel,DiagnosticAnalysisEnum,StokesAnalysisEnum);
+	ResetBoundaryConditions(femmodel,DiagnosticStokesAnalysisEnum);
 
 	if(verbose)_printf_("%s\n"," computing stokes velocities and pressure ...");