Index: /issm/trunk-jpl/src/c/analyses/EnthalpyAnalysis.cpp
===================================================================
--- /issm/trunk-jpl/src/c/analyses/EnthalpyAnalysis.cpp	(revision 17045)
+++ /issm/trunk-jpl/src/c/analyses/EnthalpyAnalysis.cpp	(revision 17046)
@@ -847,5 +847,6 @@
 
 	/* Intermediaries */
-	int         i,is,vertexdown,vertexup,dim=3,numvertices,numsegments;
+	const int   dim=3;
+	int         i,is,vertexdown,vertexup,numvertices,numsegments;
 	IssmDouble  heatflux;
 	IssmDouble  vec_heatflux[dim],normal_base[dim],d1enthalpy[dim];
