Index: /issm/trunk-jpl/src/c/classes/Materials/Matpar.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/Materials/Matpar.cpp	(revision 18496)
+++ /issm/trunk-jpl/src/c/classes/Materials/Matpar.cpp	(revision 18497)
@@ -96,4 +96,5 @@
 			break;
 		case MatseaiceEnum:
+			iomodel->Constant(&this->rho_ice,MaterialsRhoIceEnum);
 			iomodel->Constant(&this->poisson,MaterialsPoissonEnum);
 			iomodel->Constant(&this->young_modulus,MaterialsYoungModulusEnum);
Index: /issm/trunk-jpl/src/c/classes/Materials/Matseaice.cpp
===================================================================
--- /issm/trunk-jpl/src/c/classes/Materials/Matseaice.cpp	(revision 18496)
+++ /issm/trunk-jpl/src/c/classes/Materials/Matseaice.cpp	(revision 18497)
@@ -33,15 +33,15 @@
 }
 /*}}}*/
-Matseaice::Matseaice(int matice_mid,int index, IoModel* iomodel){/*{{{*/
+Matseaice::Matseaice(int matseaice_mid,int index, IoModel* iomodel){/*{{{*/
 
 	/*Intermediaries:*/
-	int    matice_eid;
+	int    matseaice_eid;
 
 	/*Initialize id*/
-	this->mid=matice_mid;
+	this->mid=matseaice_mid;
 
 	/*Hooks: */
-	matice_eid=index+1;
-	this->helement=new Hook(&matice_eid,1);
+	matseaice_eid=index+1;
+	this->helement=new Hook(&matseaice_eid,1);
 	this->element=NULL;
 
@@ -83,15 +83,15 @@
 
 	/*Output*/
-	Matseaice* matice=NULL;
+	Matseaice* matseaice=NULL;
 
 	/*Initialize output*/
-	matice=new Matseaice();
+	matseaice=new Matseaice();
 
 	/*copy fields: */
-	matice->mid=this->mid;
-	matice->helement=(Hook*)this->helement->copy();
-	matice->element =(Element*)this->helement->delivers();
+	matseaice->mid=this->mid;
+	matseaice->helement=(Hook*)this->helement->copy();
+	matseaice->element =(Element*)this->helement->delivers();
 
-	return matice;
+	return matseaice;
 }
 /*}}}*/
@@ -99,15 +99,15 @@
 
 	/*Output*/
-	Matseaice* matice=NULL;
+	Matseaice* matseaice=NULL;
 
 	/*Initialize output*/
-	matice=new Matseaice();
+	matseaice=new Matseaice();
 
 	/*copy fields: */
-	matice->mid=this->mid;
-	matice->helement=(Hook*)this->helement->copy();
-	matice->element =element_in;
+	matseaice->mid=this->mid;
+	matseaice->helement=(Hook*)this->helement->copy();
+	matseaice->element =element_in;
 
-	return matice;
+	return matseaice;
 }
 /*}}}*/
Index: /issm/trunk-jpl/src/c/shared/Enum/EnumDefinitions.h
===================================================================
--- /issm/trunk-jpl/src/c/shared/Enum/EnumDefinitions.h	(revision 18496)
+++ /issm/trunk-jpl/src/c/shared/Enum/EnumDefinitions.h	(revision 18497)
@@ -751,4 +751,5 @@
 	SeaiceSpcvxEnum,
 	SeaiceSpcvyEnum,
+	SeaiceCoriolisFactorEnum,
 	BasalforcingsRhoOceanEnum,
 	BasalforcingsOceanCoefEnum,
Index: /issm/trunk-jpl/src/c/shared/Enum/EnumToStringx.cpp
===================================================================
--- /issm/trunk-jpl/src/c/shared/Enum/EnumToStringx.cpp	(revision 18496)
+++ /issm/trunk-jpl/src/c/shared/Enum/EnumToStringx.cpp	(revision 18497)
@@ -710,4 +710,5 @@
 		case SeaiceSpcvxEnum : return "SeaiceSpcvx";
 		case SeaiceSpcvyEnum : return "SeaiceSpcvy";
+		case SeaiceCoriolisFactorEnum : return "SeaiceCoriolisFactor";
 		case BasalforcingsRhoOceanEnum : return "BasalforcingsRhoOcean";
 		case BasalforcingsOceanCoefEnum : return "BasalforcingsOceanCoef";
Index: /issm/trunk-jpl/src/c/shared/Enum/StringToEnumx.cpp
===================================================================
--- /issm/trunk-jpl/src/c/shared/Enum/StringToEnumx.cpp	(revision 18496)
+++ /issm/trunk-jpl/src/c/shared/Enum/StringToEnumx.cpp	(revision 18497)
@@ -725,4 +725,5 @@
 	      else if (strcmp(name,"SeaiceSpcvx")==0) return SeaiceSpcvxEnum;
 	      else if (strcmp(name,"SeaiceSpcvy")==0) return SeaiceSpcvyEnum;
+	      else if (strcmp(name,"SeaiceCoriolisFactor")==0) return SeaiceCoriolisFactorEnum;
 	      else if (strcmp(name,"BasalforcingsRhoOcean")==0) return BasalforcingsRhoOceanEnum;
 	      else if (strcmp(name,"BasalforcingsOceanCoef")==0) return BasalforcingsOceanCoefEnum;
Index: /issm/trunk-jpl/src/m/classes/seaice.m
===================================================================
--- /issm/trunk-jpl/src/m/classes/seaice.m	(revision 18496)
+++ /issm/trunk-jpl/src/m/classes/seaice.m	(revision 18497)
@@ -6,8 +6,9 @@
 classdef seaice
 	properties (SetAccess=public) 
-		thickness     = NaN;
-		concentration = NaN;
-		spcvx         = NaN;
-		spcvy         = NaN;
+		thickness       = NaN;
+		concentration   = NaN;
+		spcvx           = NaN;
+		spcvy           = NaN;
+		coriolis_factor = NaN;
 	end
 	methods
@@ -26,10 +27,13 @@
 			md = checkfield(md,'fieldname','seaice.spcvx','size',[md.mesh.numberofvertices 1]);
 			md = checkfield(md,'fieldname','seaice.spcvy','size',[md.mesh.numberofvertices 1]);
+			md = checkfield(md,'fieldname','seaice.coriolis_factor','size',[md.mesh.numberofelements 1],'NaN',1,'>=',0);
 		end % }}}
 		function disp(obj) % {{{
 			disp(sprintf('   seaice parameters:'));
 			fielddisplay(obj,'thickness','sea ice thickness [m]');
+			fielddisplay(obj,'concentration','sea ice concentration (between 0 and 1)');
 			fielddisplay(obj,'spcvx','x-axis velocity constraint (NaN means no constraint) [m/s]');
 			fielddisplay(obj,'spcvy','y-axis velocity constraint (NaN means no constraint) [m/s]');
+			fielddisplay(obj,'coriolis_factor','factor applied to Coriolis forces (latitude dependent)');
 		end % }}}
 		function marshall(obj,md,fid) % {{{
@@ -38,4 +42,5 @@
 			WriteData(fid,'object',obj,'fieldname','spcvx','format','DoubleMat','mattype',1);
 			WriteData(fid,'object',obj,'fieldname','spcvy','format','DoubleMat','mattype',1);
+			WriteData(fid,'object',obj,'fieldname','coriolis_factor','format','DoubleMat','mattype',2);
 		end % }}}
 	end
Index: /issm/trunk-jpl/src/m/enum/EnumDefinitions.py
===================================================================
--- /issm/trunk-jpl/src/m/enum/EnumDefinitions.py	(revision 18496)
+++ /issm/trunk-jpl/src/m/enum/EnumDefinitions.py	(revision 18497)
@@ -702,4 +702,5 @@
 def SeaiceSpcvxEnum(): return StringToEnum("SeaiceSpcvx")[0]
 def SeaiceSpcvyEnum(): return StringToEnum("SeaiceSpcvy")[0]
+def SeaiceCoriolisFactorEnum(): return StringToEnum("SeaiceCoriolisFactor")[0]
 def BasalforcingsRhoOceanEnum(): return StringToEnum("BasalforcingsRhoOcean")[0]
 def BasalforcingsOceanCoefEnum(): return StringToEnum("BasalforcingsOceanCoef")[0]
Index: /issm/trunk-jpl/src/m/enum/SeaiceCoriolisFactorEnum.m
===================================================================
--- /issm/trunk-jpl/src/m/enum/SeaiceCoriolisFactorEnum.m	(revision 18497)
+++ /issm/trunk-jpl/src/m/enum/SeaiceCoriolisFactorEnum.m	(revision 18497)
@@ -0,0 +1,11 @@
+function macro=SeaiceCoriolisFactorEnum()
+%SEAICECORIOLISFACTORENUM - Enum of SeaiceCoriolisFactor
+%
+%   WARNING: DO NOT MODIFY THIS FILE
+%            this file has been automatically generated by src/c/shared/Enum/Synchronize.sh
+%            Please read src/c/shared/Enum/README for more information
+%
+%   Usage:
+%      macro=SeaiceCoriolisFactorEnum()
+
+macro=StringToEnum('SeaiceCoriolisFactor');
