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

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

implemented basalforcings in tests

File size: 1.2 KB
Line 
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;
7md.spctemperature=[md.spctemperature, md.spctemperature+5, md.spctemperature+10, md.spctemperature+15; 1.5 2.5 3.5 4];
8md.dt=1;
9md.ndt=4;
10md=solve(md,ThermalSolutionEnum);
11
12%Fields and tolerances to track changes
13field_names ={'Temperature1','BasalforcingsMeltingRate1','Temperature2','BasalforcingsMeltingRate2','Temperature3','BasalforcingsMeltingRate3','Temperature4','BasalforcingsMeltingRate4'};
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),...
17 PatchToVec(md.results.ThermalSolution(1).BasalforcingsMeltingRate),...
18 PatchToVec(md.results.ThermalSolution(2).Temperature),...
19 PatchToVec(md.results.ThermalSolution(2).BasalforcingsMeltingRate),...
20 PatchToVec(md.results.ThermalSolution(3).Temperature),...
21 PatchToVec(md.results.ThermalSolution(3).BasalforcingsMeltingRate),...
22 PatchToVec(md.results.ThermalSolution(4).Temperature),...
23 PatchToVec(md.results.ThermalSolution(4).BasalforcingsMeltingRate),...
24 };
Note: See TracBrowser for help on using the repository browser.