source: issm/trunk-jpl/src/m/classes/solidearthsettings.m@ 26301

Last change on this file since 26301 was 26301, checked in by jdquinn, 4 years ago

CHG: test2002 MATLAB -> Python; clean up
File size: 10.3 KB
Line 
1%SOLIDEARTHSETTINGS class definition
2%
3% Usage:
4% solidearthsettings=solidearthsettings();
5
6classdef solidearthsettings
7 properties (SetAccess=public)
8 reltol = 0;
9 abstol = 0;
10 maxiter = 0;
11 selfattraction = 1;
12 elastic = 1;
13 viscous = 1;
14 rotation = 1;
15 grdocean = 1;
16 ocean_area_scaling = 0;
17 runfrequency = 1; %how many time steps we skip before we run grd_core
18 sealevelloading = 1; %will sea-level loads be computed?
19 isgrd = 0; %will GRD patterns be computed?
20 compute_bp_grd = 0; %will GRD patterns for bottom pressures be computed?
21 degacc = 0; %degree increment for resolution of Green tables.
22 timeacc = 0; %time step accuracy required to compute Green tables
23 horiz = 0; %compute horizontal deformation
24 grdmodel = 0; %grd model (0 by default, 1 for (visco-)elastic, 2 for Ivins)
25 cross_section_shape = 0; %cross section only used when grd model is Ivins
26 end
27 methods (Static)
28 function self = loadobj(self) % {{{
29 % This function is directly called by matlab when a model object is
30 % loaded. If the input is a struct it is an old version of this class and
31 % old fields must be recovered (make sure they are in the deprecated
32 % model properties)
33
34 if isstruct(self)
35 % 2021, Jun 4
36 if isfield(self,'rigid')
37 self.selfattraction = self.rigid;
38 end
39 if isfield(self,'computesealevelchange')
40 self.sealevelloading = self.computesealevelchange;
41 end
42 self = structtoobj(solidearthsettings(),self);
43
44 end
45 end% }}}
46 end
47 methods
48
49 function self = solidearthsettings(varargin) % {{{
50 switch nargin
51 case 0
52 self=setdefaultparameters(self);
53 otherwise
54 error('constructor not supported');
55 end
56 end % }}}
57 function self = setdefaultparameters(self) % {{{
58
59 %Convergence criterion: absolute, relative and residual
60 self.reltol=0.01; % 1 percent
61 self.abstol=NaN; % default
62
63 %maximum of non-linear iterations.
64 self.maxiter=5;
65
66 %computational flags:
67 self.selfattraction=1;
68 self.elastic=1;
69 self.viscous=1;
70 self.rotation=1;
71 self.grdocean=1;
72 self.ocean_area_scaling=0;
73 self.compute_bp_grd=0;
74 self.isgrd=0;
75 self.sealevelloading=1;
76
77 %numerical discretization accuracy
78 self.degacc=.01;
79 self.timeacc=1;
80
81 %how many time steps we skip before we run solidearthsettings solver during transient
82 self.runfrequency=1;
83
84 %horizontal displacement? (not on by default)
85 self.horiz=0;
86
87 %cross section for Ivins model
88 self.cross_section_shape=1; %square as default (see iedge in GiaDeflectionCorex)
89
90 %no grd model by default:
91 self.grdmodel=0;
92
93 end % }}}
94 function disp(self) % {{{
95 disp(sprintf(' solidearth settings:'));
96
97 fielddisplay(self,'reltol','sea level change relative convergence criterion (default, NaN: not applied)');
98 fielddisplay(self,'abstol','sea level change absolute convergence criterion(default, NaN: not applied)');
99 fielddisplay(self,'maxiter','maximum number of nonlinear iterations');
100 fielddisplay(self,'grdocean','does this planet have an ocean, if set to 1: global water mass is conserved in GRD module (default: 1)');
101 fielddisplay(self,'ocean_area_scaling','correction for model representation of ocean area (default: No correction)');
102 fielddisplay(self,'sealevelloading','enables surface loading from sea-level change (default: 1)');
103 fielddisplay(self,'isgrd','compute GRD patterns (default: 1)');
104 fielddisplay(self,'compute_bp_grd','compute GRD patterns for bottom pressure loads (default: 1)');
105 fielddisplay(self,'runfrequency','how many time steps we skip before we run solidearthsettings solver during transient (default: 1)');
106 fielddisplay(self,'selfattraction','enables surface mass load to perturb the gravity field');
107 fielddisplay(self,'elastic','enables elastic deformation from surface loading');
108 fielddisplay(self,'viscous','enables viscous deformation from surface loading');
109 fielddisplay(self,'rotation','enables polar motion to feedback on the GRD fields');
110 fielddisplay(self,'degacc','accuracy (default: .01 deg) for numerical discretization of the Green''s functions');
111 fielddisplay(self,'timeacc','time accuracy (default: 1 yr) for numerical discretization of the Green''s functions');
112 fielddisplay(self,'grdmodel','type of deformation model, 0 for no GRD, 1 for spherical GRD model (SESAW model), 2 for half-space planar GRD (visco-elastic model from Ivins)');
113 fielddisplay(self,'cross_section_shape','1: square-edged (default). 2: elliptical. See iedge in GiaDeflectionCore');
114 end % }}}
115 function md = checkconsistency(self,md,solution,analyses) % {{{
116
117 if ~ismember('SealevelchangeAnalysis',analyses) | (strcmp(solution,'TransientSolution') & md.transient.isslc==0),
118 return;
119 end
120 md = checkfield(md,'fieldname','solidearth.settings.reltol','size',[1 1]);
121 md = checkfield(md,'fieldname','solidearth.settings.abstol','size',[1 1]);
122 md = checkfield(md,'fieldname','solidearth.settings.maxiter','size',[1 1],'>=',1);
123 md = checkfield(md,'fieldname','solidearth.settings.runfrequency','size',[1 1],'>=',1);
124 md = checkfield(md,'fieldname','solidearth.settings.degacc','size',[1 1],'>=',1e-10);
125 md = checkfield(md,'fieldname','solidearth.settings.timeacc','size',[1 1],'>',0);
126 md = checkfield(md,'fieldname','solidearth.settings.horiz','NaN',1,'Inf',1,'values',[0 1]);
127 md = checkfield(md,'fieldname','solidearth.settings.grdmodel','>=',0,'<=',2);
128 md = checkfield(md,'fieldname','solidearth.settings.cross_section_shape','numel',[1],'values',[1,2]);
129
130 if self.elastic==1 & self.selfattraction==0,
131 error('solidearthsettings checkconsistency error message: need selfattraction on if elastic flag is set');
132 end
133 if self.viscous==1 & self.elastic==0,
134 error('solidearthsettings checkconsistency error message: need elastic on if viscous flag is set');
135 end
136
137 %a GRD computation has been requested, make some checks on the nature of the meshes provided.
138 if self.isgrd,
139 if strcmpi(class(md.mesh),'mesh3dsurface'),
140 if self.grdmodel==2,
141 error('model requires a 2D mesh to run gia Ivins computations (change mesh from mesh3dsurface to mesh2d)');
142 end
143 else
144 if self.grdmodel==1,
145 error('model requires a 3D surface mesh to run GRD computations (change mesh from mesh2d to mesh3dsurface)');
146 end
147 end
148 if self.sealevelloading==1 & self.grdocean==0
149 error('solidearthsettings checkconsistency error message: need grdocean on if sealevelloading flag is set');
150 end
151 end
152
153 if self.compute_bp_grd==1 & md.solidearth.settings.isgrd==0,
154 error('solidearthsettings checkconsistency error message; if bottom pressure grd patterns are requested, solidearth settings class should have isgrd flag on');
155 end
156
157 end % }}}
158 function marshall(self,prefix,md,fid) % {{{
159 WriteData(fid,prefix,'object',self,'fieldname','reltol','name','md.solidearth.settings.reltol','format','Double');
160 WriteData(fid,prefix,'object',self,'fieldname','abstol','name','md.solidearth.settings.abstol','format','Double');
161 WriteData(fid,prefix,'object',self,'fieldname','maxiter','name','md.solidearth.settings.maxiter','format','Integer');
162 WriteData(fid,prefix,'object',self,'fieldname','selfattraction','name','md.solidearth.settings.selfattraction','format','Boolean');
163 WriteData(fid,prefix,'object',self,'fieldname','elastic','name','md.solidearth.settings.elastic','format','Boolean');
164 WriteData(fid,prefix,'object',self,'fieldname','viscous','name','md.solidearth.settings.viscous','format','Boolean');
165 WriteData(fid,prefix,'object',self,'fieldname','rotation','name','md.solidearth.settings.rotation','format','Boolean');
166 WriteData(fid,prefix,'object',self,'fieldname','grdocean','name','md.solidearth.settings.grdocean','format','Boolean');
167 WriteData(fid,prefix,'object',self,'fieldname','ocean_area_scaling','name','md.solidearth.settings.ocean_area_scaling','format','Boolean');
168 WriteData(fid,prefix,'object',self,'fieldname','runfrequency','name','md.solidearth.settings.runfrequency','format','Integer');
169 WriteData(fid,prefix,'object',self,'fieldname','degacc','name','md.solidearth.settings.degacc','format','Double');
170 WriteData(fid,prefix,'object',self,'fieldname','timeacc','name','md.solidearth.settings.timeacc','format','Double','scale',md.constants.yts);
171 WriteData(fid,prefix,'object',self,'fieldname','horiz','name','md.solidearth.settings.horiz','format','Integer');
172 WriteData(fid,prefix,'object',self,'fieldname','sealevelloading','name','md.solidearth.settings.sealevelloading','format','Integer');
173 WriteData(fid,prefix,'object',self,'fieldname','isgrd','name','md.solidearth.settings.isgrd','format','Integer');
174 WriteData(fid,prefix,'object',self,'fieldname','compute_bp_grd','name','md.solidearth.settings.compute_bp_grd','format','Integer');
175 WriteData(fid,prefix,'object',self,'fieldname','grdmodel','name','md.solidearth.settings.grdmodel','format','Integer');
176 WriteData(fid,prefix,'object',self,'fieldname','cross_section_shape','name','md.solidearth.settings.cross_section_shape','format','Integer');
177 end % }}}
178 function self = extrude(self,md) % {{{
179 end % }}}
180 function savemodeljs(self,fid,modelname) % {{{
181
182 writejsdouble(fid,[modelname '.solidearth.settings.maxiter'],self.maxiter);
183 writejsdouble(fid,[modelname '.solidearth.settings.reltol'],self.reltol);
184 writejsdouble(fid,[modelname '.solidearth.settings.abstol'],self.abstol);
185 writejsdouble(fid,[modelname '.solidearth.settings.selfattraction'],self.selfattraction);
186 writejsdouble(fid,[modelname '.solidearth.settings.elastic'],self.elastic);
187 writejsdouble(fid,[modelname '.solidearth.settings.viscous'],self.viscous);
188 writejsdouble(fid,[modelname '.solidearth.settings.rotation'],self.rotation);
189 writejsdouble(fid,[modelname '.solidearth.settings.grdocean'],self.rotation);
190 writejsdouble(fid,[modelname '.solidearth.settings.ocean_area_scaling'],self.ocean_area_scaling);
191 writejsdouble(fid,[modelname '.solidearth.settings.run_frequency'],self.run_frequency);
192 writejsdouble(fid,[modelname '.solidearth.settings.degacc'],self.degacc);
193 writejsdouble(fid,[modelname '.solidearth.settings.timeacc'],self.timeacc);
194 writejsdouble(fid,[modelname '.solidearth.settings.cross_section_shape'],self.cross_section_shape);
195 end % }}}
196 end
197end
Note: See TracBrowser for help on using the repository browser.