[9023] | 1 | md=mesh(model,'../Exp/Square.exp',180000);
|
---|
| 2 | md=geography(md,'all','');
|
---|
| 3 | md=parameterize(md,'../Par/SquareShelf.par');
|
---|
| 4 | md=extrude(md,3,1);
|
---|
| 5 | md=setelementstype(md,'macayeal','all');
|
---|
| 6 | md.cluster=none;
|
---|
| 7 | md.spctemperature=[md.spctemperature, md.spctemperature+5, md.spctemperature+10, md.spctemperature+15; 1.5 2.5 3.5 4];
|
---|
| 8 | md.dt=1;
|
---|
| 9 | md.ndt=4;
|
---|
| 10 | md=solve(md,ThermalSolutionEnum);
|
---|
| 11 |
|
---|
| 12 | %Fields and tolerances to track changes
|
---|
| 13 | field_names ={'Temperature1','BasalMeltingRate1','Temperature2','BasalMeltingRate2','Temperature3','BasalMeltingRate3','Temperature4','BasalMeltingRate4'};
|
---|
| 14 | field_tolerances={1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13};
|
---|
| 15 | field_values={...
|
---|
| 16 | PatchToVec(md.results.ThermalSolution(1).Temperature),...
|
---|
| 17 | PatchToVec(md.results.ThermalSolution(1).BasalMeltingRate),...
|
---|
| 18 | PatchToVec(md.results.ThermalSolution(2).Temperature),...
|
---|
| 19 | PatchToVec(md.results.ThermalSolution(2).BasalMeltingRate),...
|
---|
| 20 | PatchToVec(md.results.ThermalSolution(3).Temperature),...
|
---|
| 21 | PatchToVec(md.results.ThermalSolution(3).BasalMeltingRate),...
|
---|
| 22 | PatchToVec(md.results.ThermalSolution(4).Temperature),...
|
---|
| 23 | PatchToVec(md.results.ThermalSolution(4).BasalMeltingRate),...
|
---|
| 24 | };
|
---|