1 | md=mesh(model,'../Exp/Square.exp',150000);
|
---|
2 | md=geography(md,'../Exp/SquareShelf.exp','');
|
---|
3 | md=parameterize(md,'../Par/SquareSheetShelf.par');
|
---|
4 | md=extrude(md,3,2);
|
---|
5 | md=setelementstype(md,'pattyn','all');
|
---|
6 | md.cluster=none;
|
---|
7 | md.dt=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-08,1e-08,1e-08,1e-08,1e-08,1e-08,1e-06};
|
---|
13 | field_values={...
|
---|
14 | PatchToVec(md.results.SteadystateSolution.Vx),...
|
---|
15 | PatchToVec(md.results.SteadystateSolution.Vy),...
|
---|
16 | PatchToVec(md.results.SteadystateSolution.Vz),...
|
---|
17 | PatchToVec(md.results.SteadystateSolution.Vel),...
|
---|
18 | PatchToVec(md.results.SteadystateSolution.Pressure),...
|
---|
19 | PatchToVec(md.results.SteadystateSolution.Temperature),...
|
---|
20 | PatchToVec(md.results.SteadystateSolution.BasalforcingsMeltingRate),...
|
---|
21 | };
|
---|