Index: /issm/trunk-jpl/src/c/analyses/LevelsetAnalysis.cpp
===================================================================
--- /issm/trunk-jpl/src/c/analyses/LevelsetAnalysis.cpp	(revision 19017)
+++ /issm/trunk-jpl/src/c/analyses/LevelsetAnalysis.cpp	(revision 19018)
@@ -302,5 +302,5 @@
 
 					norm_calving=0.;
-					for(i=0;i<dim;i++) norm_calving+=pow(c[i],2);
+					for(i=0;i<dim;i++) norm_calving+=c[i]*c[i];
 					norm_calving=sqrt(norm_calving)+1.e-14;