source: issm/trunk/test/NightlyRun/test263.m@ 9632

Last change on this file since 9632 was 9632, checked in by seroussi, 14 years ago

implemented thermal

File size: 1.3 KB
RevLine 
[9023]1md=mesh(model,'../Exp/Square.exp',180000);
2md=geography(md,'all','');
3md=parameterize(md,'../Par/SquareShelf.par');
4md=extrude(md,3,1);
5md=setelementstype(md,'macayeal','all');
6md.cluster=none;
[9632]7md.thermal.spctemperature=[md.thermal.spctemperature, md.thermal.spctemperature+5, md.thermal.spctemperature+10, md.thermal.spctemperature+15; 1.5 2.5 3.5 4];
[9628]8md.timestepping.time_step=1;
9md.timestepping.final_time=4;
[9023]10md=solve(md,ThermalSolutionEnum);
11
12%Fields and tolerances to track changes
[9611]13field_names ={'Temperature1','BasalforcingsMeltingRate1','Temperature2','BasalforcingsMeltingRate2','Temperature3','BasalforcingsMeltingRate3','Temperature4','BasalforcingsMeltingRate4'};
[9023]14field_tolerances={1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13};
15field_values={...
16 PatchToVec(md.results.ThermalSolution(1).Temperature),...
[9611]17 PatchToVec(md.results.ThermalSolution(1).BasalforcingsMeltingRate),...
[9023]18 PatchToVec(md.results.ThermalSolution(2).Temperature),...
[9611]19 PatchToVec(md.results.ThermalSolution(2).BasalforcingsMeltingRate),...
[9023]20 PatchToVec(md.results.ThermalSolution(3).Temperature),...
[9611]21 PatchToVec(md.results.ThermalSolution(3).BasalforcingsMeltingRate),...
[9023]22 PatchToVec(md.results.ThermalSolution(4).Temperature),...
[9611]23 PatchToVec(md.results.ThermalSolution(4).BasalforcingsMeltingRate),...
[9023]24 };
Note: See TracBrowser for help on using the repository browser.