source: issm/oecreview/Archive/22819-23185/ISSM-23031-23032.diff@ 23186

Last change on this file since 23186 was 23186, checked in by Mathieu Morlighem, 7 years ago

CHG: added Archive/22819-23185

File size: 2.2 KB
RevLine 
[23186]1Index: ../trunk-jpl/src/m/classes/maskpsl.m
2===================================================================
3--- ../trunk-jpl/src/m/classes/maskpsl.m (revision 23031)
4+++ ../trunk-jpl/src/m/classes/maskpsl.m (revision 23032)
5@@ -15,12 +15,6 @@
6 function self = loadobj(self) % {{{
7 % This function is directly called by matlab when a model object is
8 % loaded. Update old properties here
9-
10- %2014 February 5th
11- if numel(self.ice_levelset)>1 & all(self.ice_levelset>=0),
12- disp('WARNING: md.mask.ice_levelset>=0, you probably need to change the sign of this levelset');
13- end
14-
15 end% }}}
16 end
17 methods
18@@ -49,21 +43,9 @@
19 md = checkfield(md,'fieldname','mask.ice_levelset' ,'size',[md.mesh.numberofvertices 1]);
20 md = checkfield(md,'fieldname','mask.ocean_levelset','size',[md.mesh.numberofvertices 1]);
21 md = checkfield(md,'fieldname','mask.land_levelset','size',[md.mesh.numberofvertices 1]);
22- isice=(md.mask.ice_levelset<=0);
23- if sum(isice)==0,
24- warning('no ice present in the domain');
25- end
26- if max(md.mask.ice_levelset)<0,
27- warning('no ice front provided');
28- end
29- icefront=sum(md.mask.ice_levelset(md.mesh.elements)==0,2);
30- if (max(icefront)==3 & strcmp(elementtype(md.mesh),'Tria')) | (max(icefront==6) & strcmp(elementtype(md.mesh),'Penta')),
31- error('At least one element has all nodes on ice front, change md.mask.ice_levelset to fix it')
32- end
33 end % }}}
34 function disp(self) % {{{
35 disp(sprintf(' masks:'));
36-
37 fielddisplay(self,'groundedice_levelset','is ice grounded ? grounded ice if > 0, grounding line position if = 0, floating ice if < 0');
38 fielddisplay(self,'ice_levelset','presence of ice if < 0, icefront position if = 0, no ice if > 0');
39 fielddisplay(self,'ocean_levelset','is the vertex on the ocean ? yes if = 1, no if = 0');
40@@ -78,7 +60,6 @@
41 WriteData(fid,prefix,'object',self,'class','mask','fieldname','land_levelset','format','DoubleMat','mattype',1);
42 end % }}}
43 function savemodeljs(self,fid,modelname) % {{{
44-
45 fprintf(fid,'%s.mask=new maskpsl();\n',modelname);
46 writejs1Darray(fid,[modelname '.mask.groundedice_levelset'],self.groundedice_levelset);
47 writejs1Darray(fid,[modelname '.mask.ice_levelset'],self.ice_levelset);
Note: See TracBrowser for help on using the repository browser.