Index: /issm/trunk/src/c/objects/Elements/Tria.cpp
===================================================================
--- /issm/trunk/src/c/objects/Elements/Tria.cpp	(revision 7106)
+++ /issm/trunk/src/c/objects/Elements/Tria.cpp	(revision 7107)
@@ -4402,24 +4402,17 @@
 void  Tria::MigrateGroundingLine(void){
 
+
+	double *values         = NULL;
+	double  h[3],s[3],b[3],ba[3];
+	double  bed_hydro;
+	double  rho_water,rho_ice,density;
+	int     isonshelf[3];
 	int     i;
-
-	double  h[3];
-	double  s[3];
-	double  b[3];
-	double  ba[3];
-	double  bed_hydro;
-	int     isonshelf[3];
-	Input  *surface_input  = NULL;
-	Input  *bed_input      = NULL;
-	double  rho_water;
-	double  rho_ice;
-	double  density;
-	double *values         = NULL;
 	bool    elementonshelf = false;
 
 
 	/*Recover info at the vertices: */
-	surface_input   =inputs->GetInput(SurfaceEnum);   _assert_(surface_input);
-	bed_input   =inputs->GetInput(BedEnum);   _assert_(bed_input);
+	Input* surface_input =inputs->GetInput(SurfaceEnum); _assert_(surface_input);
+	Input* bed_input     =inputs->GetInput(BedEnum);     _assert_(bed_input);
 	if((surface_input->Enum()!=TriaVertexInputEnum) | (bed_input->Enum()!=TriaVertexInputEnum))_error_(" not supported yet for bed and surface interpolations not P1!");
 
@@ -4465,5 +4458,5 @@
 	/*Surface and bed are updated. Update inputs:*/
 	surface_input->GetValuesPtr(&values,NULL); for(i=0;i<3;i++)values[i]=s[i];
-	bed_input->GetValuesPtr(&values,NULL); for(i=0;i<3;i++)values[i]=b[i];
+	bed_input->GetValuesPtr(&values,NULL);     for(i=0;i<3;i++)values[i]=b[i];
 
 }