Index: /issm/trunk-jpl/src/c/analyses/SeaiceAnalysis.cpp
===================================================================
--- /issm/trunk-jpl/src/c/analyses/SeaiceAnalysis.cpp	(revision 18497)
+++ /issm/trunk-jpl/src/c/analyses/SeaiceAnalysis.cpp	(revision 18498)
@@ -131,4 +131,5 @@
 	xDelete<IssmDouble>(xyz_list);
 	xDelete<IssmDouble>(B);
+	xDelete<IssmDouble>(M);
 	delete gauss;
 	return Ke;
@@ -207,5 +208,5 @@
 		oceanvx_input->GetInputValue(&oceanvx,gauss);
 		oceanvy_input->GetInputValue(&oceanvy,gauss);
-		oceanssh_input->GetInputDerivativeValue(&dssh[2],xyz_list,gauss);
+		oceanssh_input->GetInputDerivativeValue(&dssh[0],xyz_list,gauss);
 
 		/*Previous speed (finite differencing)*/
@@ -215,5 +216,5 @@
 		}
 
-		/*Atmespheric forcing*/
+		/*Atmospheric forcing*/
 		vnorm    = sqrt(windvx*windvx + windvy*windvy);
 		constant_part = concentration*air_coef*rho_air*(air_lin_drag_coef+air_quad_drag_coef*vnorm);