Changeset 26826 for issm/trunk-jpl/src/m/classes/groundingline.m

Timestamp:

01/27/22 13:30:21 (3 years ago)

Author:

vverjans

Message:

CHG: added requested_outputs to groundingline class

File:

• issm/trunk-jpl/src/m/classes/groundingline.m (modified) (6 diffs)

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

@@ -9 +9 @@
                 friction_interpolation = '';
                 melt_interpolation     = '';
+                requested_outputs      = {};
         end
         methods
@@ -25 +26 @@
                         self.friction_interpolation= 'SubelementFriction1';
                         self.melt_interpolation    = 'NoMeltOnPartiallyFloating';
+                        %default output
+         self.requested_outputs     = {'default'};
 
                 end % }}}
@@ -32 +35 @@
                         md = checkfield(md,'fieldname','groundingline.friction_interpolation','values',{'NoFrictionOnPartiallyFloating' 'SubelementFriction1' 'SubelementFriction2'});
                         md = checkfield(md,'fieldname','groundingline.melt_interpolation','values',{'NoMeltOnPartiallyFloating' 'SubelementMelt1' 'SubelementMelt2' 'FullMeltOnPartiallyFloating'});
+                        md = checkfield(md,'fieldname','groundingline.requested_outputs','stringrow',1);
 
                         if ~strcmp(self.migration,'None') & strcmp(solution,'TransientSolution') & md.transient.isgroundingline==1,
@@ -48 +52 @@
 
                 end % }}}
+                function list = defaultoutputs(self,md) % {{{
+      
+                        list = {'Surface','Base','MaskOceanLevelset'};
+         
+      end % }}}
                 function disp(self) % {{{
                         disp(sprintf('   grounding line migration parameters:'));
@@ -53 +62 @@
                         fielddisplay(self,'friction_interpolation','type of friction interpolation for partially floating elements: ''NoFrictionOnPartiallyFloating'',''SubelementFriction1'', or ''SubelementFriction2''');
                         fielddisplay(self,'melt_interpolation','type of melt interpolation for partially floating elements: ''NoMeltOnPartiallyFloating'',''SubelementMelt1'',''SubelementMelt2'', or ''FullMeltOnPartiallyFloating''');
+                        fielddisplay(self,'requested_outputs','additional outputs requested');
 
                 end % }}}
@@ -59 +69 @@
                         WriteData(fid,prefix,'data',self.friction_interpolation,'name','md.groundingline.friction_interpolation','format','String');
                         WriteData(fid,prefix,'data',self.melt_interpolation,'name','md.groundingline.melt_interpolation','format','String');
+                        
+                        %process requested outputs
+         outputs = self.requested_outputs;
+         pos  = find(ismember(outputs,'default'));
+         if ~isempty(pos),
+            outputs(pos) = [];                         %remove 'default' from outputs
+            outputs      = [outputs defaultoutputs(self,md)]; %add defaults
+         end
+                        WriteData(fid,prefix,'data',outputs,'name','md.groundingline.requested_outputs','format','StringArray')
                 end % }}}
                 function savemodeljs(self,fid,modelname) % {{{
                 
                         writejsstring(fid,[modelname '.groundingline.migration'],self.migration);
-                        writejsstring(fid,[modelname '.groundingline.friction_interpolation'],self.migration);
-                        writejsstring(fid,[modelname '.groundingline.melt_interpolation'],self.migration);
+                        writejsstring(fid,[modelname '.groundingline.friction_interpolation'],self.friction_interpolation);
+                        writejsstring(fid,[modelname '.groundingline.melt_interpolation'],self.melt_interpolation);
+                        writejscellstring(fid,[modelname '.groundingline.requested_outputs'],self.requested_outputs);
 
                 end % }}}