1 | md=triangle(model(),'../Exp/Square.exp',180000.);
|
---|
2 | md=setmask(md,'','');
|
---|
3 | md=parameterize(md,'../Par/SquareSheetConstrained.par');
|
---|
4 | md=extrude(md,4,1.);
|
---|
5 | md=setflowequation(md,'SIA','all');
|
---|
6 | md.cluster=generic('name',oshostname(),'np',3);
|
---|
7 | md.timestepping.time_step=0;
|
---|
8 | md=solve(md,SteadystateSolutionEnum());
|
---|
9 |
|
---|
10 | %Fields and tolerances to track changes
|
---|
11 | field_names ={'Vx','Vy','Vz','Vel','Pressure','Temperature','BasalforcingsMeltingRate'};
|
---|
12 | field_tolerances={1e-13,1e-13,4e-10,1e-10,1e-13,1e-11,1e-6};
|
---|
13 | field_values={...
|
---|
14 | (md.results.SteadystateSolution.Vx),...
|
---|
15 | (md.results.SteadystateSolution.Vy),...
|
---|
16 | (md.results.SteadystateSolution.Vz),...
|
---|
17 | (md.results.SteadystateSolution.Vel),...
|
---|
18 | (md.results.SteadystateSolution.Pressure),...
|
---|
19 | (md.results.SteadystateSolution.Temperature),...
|
---|
20 | (md.results.SteadystateSolution.BasalforcingsMeltingRate),...
|
---|
21 | };
|
---|