1 | %which steps to perform; steps are from 1 to 8
|
---|
2 | %step 7 is specific to ISMIPA
|
---|
3 | %step 8 is specific to ISMIPF
|
---|
4 |
|
---|
5 | steps=[1];
|
---|
6 |
|
---|
7 | % parameter file to be used, choose between IsmipA.par or IsmipF.par
|
---|
8 | ParamFile='IsmipA.par';
|
---|
9 |
|
---|
10 | %Run Steps
|
---|
11 |
|
---|
12 | %Mesh Generation #1
|
---|
13 | if any(steps==1)
|
---|
14 |
|
---|
15 | %initialize md as a new model #help model
|
---|
16 | %->
|
---|
17 |
|
---|
18 | % generate a squaremesh #help squaremesh
|
---|
19 | % Side is 80 km long with 20 points
|
---|
20 | %->
|
---|
21 |
|
---|
22 | % plot the given mesh #plotdoc
|
---|
23 | %->
|
---|
24 |
|
---|
25 | % save the given model
|
---|
26 | %->
|
---|
27 |
|
---|
28 | end
|
---|
29 |
|
---|
30 | %Masks #2
|
---|
31 | if any(steps==2)
|
---|
32 |
|
---|
33 | % load the preceding step #help loadmodel
|
---|
34 | % path is given by the organizer with the name of the given step
|
---|
35 | %->
|
---|
36 |
|
---|
37 | % set the mask #help setmask
|
---|
38 | % all MISMIP nodes are grounded
|
---|
39 | %->
|
---|
40 |
|
---|
41 | % plot the given mask #md.mask to locate the field
|
---|
42 | %->
|
---|
43 |
|
---|
44 | % save the given model
|
---|
45 | %->
|
---|
46 |
|
---|
47 | end
|
---|
48 |
|
---|
49 | %Parameterization #3
|
---|
50 | if any(steps==3)
|
---|
51 |
|
---|
52 | % load the preceding step #help loadmodel
|
---|
53 | % path is given by the organizer with the name of the given step
|
---|
54 | %->
|
---|
55 |
|
---|
56 | % parametrize the model # help parameterize
|
---|
57 | % you will need to fil-up the parameter file (given by the
|
---|
58 | % ParamFile variable)
|
---|
59 | %->
|
---|
60 |
|
---|
61 | % save the given model
|
---|
62 | %->
|
---|
63 |
|
---|
64 | end
|
---|
65 |
|
---|
66 | %Extrusion #4
|
---|
67 | if any(steps==4)
|
---|
68 |
|
---|
69 | % load the preceding step #help loadmodel
|
---|
70 | % path is given by the organizer with the name of the given step
|
---|
71 | %->
|
---|
72 |
|
---|
73 | % vertically extrude the preceding mesh #help extrude
|
---|
74 | % only 5 layers exponent 1
|
---|
75 | %->
|
---|
76 |
|
---|
77 | % plot the 3D geometry #plotdoc
|
---|
78 | %->
|
---|
79 |
|
---|
80 | % save the given model
|
---|
81 | %->
|
---|
82 |
|
---|
83 | end
|
---|
84 |
|
---|
85 | %Set the flow computing method #5
|
---|
86 | if any(steps==5)
|
---|
87 |
|
---|
88 | % load the preceding step #help loadmodel
|
---|
89 | % path is given by the organizer with the name of the given step
|
---|
90 | %->
|
---|
91 |
|
---|
92 | % set the approximation for the flow computation #help setflowequation
|
---|
93 | % We will be using the Higher Order Model (HO)
|
---|
94 | %->
|
---|
95 |
|
---|
96 | % save the given model
|
---|
97 | %->
|
---|
98 |
|
---|
99 | end
|
---|
100 |
|
---|
101 | %Set Boundary Conditions #6
|
---|
102 | if any(steps==6)
|
---|
103 |
|
---|
104 | % load the preceding step #help loadmodel
|
---|
105 | % path is given by the organizer with the name of the given step
|
---|
106 | %->
|
---|
107 |
|
---|
108 | % dirichlet boundary condition are known as SPCs
|
---|
109 | % ice frozen to the base, no velocity #md.stressbalance
|
---|
110 | % SPCs are initialized at NaN one value per vertex
|
---|
111 | %->
|
---|
112 |
|
---|
113 | %->
|
---|
114 |
|
---|
115 | %->
|
---|
116 |
|
---|
117 | % extract the nodenumbers at the base #md.mesh.vertexonbase
|
---|
118 | %->
|
---|
119 |
|
---|
120 | % set the sliding to zero on the bed (Vx and Vy)
|
---|
121 | %->
|
---|
122 |
|
---|
123 | %->
|
---|
124 |
|
---|
125 | % periodic boundaries have to be fixed on the sides
|
---|
126 | % Find the indices of the sides of the domain, for x and then for y
|
---|
127 | % for x
|
---|
128 | % create maxX, list of indices where x is equal to max of x (use >> help find)
|
---|
129 | %->
|
---|
130 |
|
---|
131 | % create minX, list of indices where x is equal to min of x
|
---|
132 | %->
|
---|
133 |
|
---|
134 | % for y
|
---|
135 | % create maxY, list of indices where y is equal to max of y
|
---|
136 | % but not where x is equal to max or min of x
|
---|
137 | % (i.e, indices in maxX and minX should be excluded from maxY and minY)
|
---|
138 | %->
|
---|
139 |
|
---|
140 | % create minY, list of indices where y is equal to max of y
|
---|
141 | % but not where x is equal to max or min of x
|
---|
142 | %->
|
---|
143 |
|
---|
144 | % set the node that should be paired together, minX with maxX and minY with maxY
|
---|
145 | % #md.stressbalance.vertex_pairing
|
---|
146 | %->
|
---|
147 |
|
---|
148 | if (ParamFile=='IsmipF.par')
|
---|
149 | % if we are dealing with IsmipF the solution is in masstransport
|
---|
150 | md.masstransport.vertex_pairing=md.stressbalance.vertex_pairing;
|
---|
151 | end
|
---|
152 | % save the given model
|
---|
153 | %->
|
---|
154 |
|
---|
155 | end
|
---|
156 |
|
---|
157 | %Solving #7
|
---|
158 | if any(steps==7)
|
---|
159 | % load the preceding step #help loadmodel
|
---|
160 | % path is given by the organizer with the name of the given step
|
---|
161 | %->
|
---|
162 |
|
---|
163 | % Set cluster #md.cluster
|
---|
164 | % generic parameters #help generic
|
---|
165 | % set only the name and number of process
|
---|
166 | %->
|
---|
167 |
|
---|
168 | % Set which control message you want to see #help verbose
|
---|
169 | %->
|
---|
170 |
|
---|
171 | % Solve #help solve
|
---|
172 | % we are solving a StressBalanc
|
---|
173 | %->
|
---|
174 |
|
---|
175 | % save the given model
|
---|
176 | %->
|
---|
177 |
|
---|
178 | % plot the surface velocities #plotdoc
|
---|
179 | %->
|
---|
180 | end
|
---|
181 |
|
---|
182 | %Solving #8
|
---|
183 | if any(steps==8)
|
---|
184 | % load the preceding step #help loadmodel
|
---|
185 | % path is given by the organizer with the name of the given step
|
---|
186 | %->
|
---|
187 |
|
---|
188 | % Set cluster #md.cluster
|
---|
189 | % generic parameters #help generic
|
---|
190 | % set only the name and number of process
|
---|
191 | %->
|
---|
192 |
|
---|
193 | % Set which control message you want to see #help verbose
|
---|
194 | %->
|
---|
195 |
|
---|
196 | % set the transient model to ignore the thermal model
|
---|
197 | % #md.transient
|
---|
198 | %->
|
---|
199 |
|
---|
200 | % define the timestepping scheme
|
---|
201 | % everything here should be provided in years #md.timestepping
|
---|
202 | % give the length of the time_step (4 years)
|
---|
203 | %->
|
---|
204 |
|
---|
205 | % give final_time (20*4 years time_steps)
|
---|
206 | %->
|
---|
207 |
|
---|
208 | % Solve #help solve
|
---|
209 | % we are solving a TransientSolution
|
---|
210 | %->
|
---|
211 |
|
---|
212 | % save the given model
|
---|
213 | %->
|
---|
214 |
|
---|
215 | % plot the surface velocities #plotdoc
|
---|
216 | %->
|
---|
217 | end
|
---|