Changeset 15133 for issm/trunk-jpl/src/m/classes/diagnostic.m

Timestamp:

05/29/13 09:27:03 (12 years ago)

Author:

Mathieu Morlighem

Message:

CHG: added forcinglength option so that WriteData knows whether all lines should be modified or not

File:

• issm/trunk-jpl/src/m/classes/diagnostic.m (modified) (1 diff)

issm/trunk-jpl/src/m/classes/diagnostic.m

@@ -151 +151 @@
                 end % }}}
                 function marshall(obj,md,fid) % {{{
-                        WriteData(fid,'object',obj,'fieldname','spcvx','format','DoubleMat','mattype',1,'forcing',1);
-                        WriteData(fid,'object',obj,'fieldname','spcvy','format','DoubleMat','mattype',1,'forcing',1);
-                        WriteData(fid,'object',obj,'fieldname','spcvz','format','DoubleMat','mattype',1,'forcing',1);
+                        WriteData(fid,'object',obj,'fieldname','spcvx','format','DoubleMat','mattype',1,'forcinglength',md.mesh.numberofvertices+1);
+                        WriteData(fid,'object',obj,'fieldname','spcvy','format','DoubleMat','mattype',1,'forcinglength',md.mesh.numberofvertices+1);
+                        WriteData(fid,'object',obj,'fieldname','spcvz','format','DoubleMat','mattype',1,'forcinglength',md.mesh.numberofvertices+1);
                         WriteData(fid,'object',obj,'fieldname','restol','format','Double');
                         WriteData(fid,'object',obj,'fieldname','reltol','format','Double');