source: issm/oecreview/Archive/21337-21723/ISSM-21630-21631.diff@ 21726

../trunk-jpl/src/m/classes/calvingdev.m

@@ -33 +33 @@
                 end % }}}
                 function self = setdefaultparameters(self) % {{{
 
-                        %Proportionality coefficient in Pi model
-                        %self.coeff=2e13;
-
                         %Default sigma max
                         self.stress_threshold_groundedice = 1e6;
                         self.stress_threshold_floatingice = 150e3;
@@ -58 +55 @@
                 function marshall(self,prefix,md,fid) % {{{
                         yts=md.constants.yts;
                         WriteData(fid,prefix,'name','md.calving.law','data',2,'format','Integer');
-                        WriteData(fid,prefix,'object',self,'fieldname','stress_threshold_groundedice','format','DoubleMat','mattype',1);
-                        WriteData(fid,prefix,'object',self,'fieldname','stress_threshold_floatingice','format','DoubleMat','mattype',1);
-                        WriteData(fid,prefix,'object',self,'fieldname','meltingrate','format','DoubleMat','mattype',1,'timeserieslength',md.mesh.numberofvertices+1,'scale',1./yts);
+                        WriteData(fid,prefix,'object',self,'fieldname','stress_threshold_groundedice','format','Double');
+                        WriteData(fid,prefix,'object',self,'fieldname','stress_threshold_floatingice','format','Double');
+                        WriteData(fid,prefix,'object',self,'fieldname','meltingrate','format','DoubleMat','mattype',1,'timeserieslength',md.mesh.numberofvertices+1,'yts',md.constants.yts,'scale',1./yts);
                 end % }}}
         end
 end