source: issm/trunk/test/NightlyRun/test417.m@ 9664

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

change setelementstype in setflowequation
File size: 2.6 KB
Line 
1md=mesh(model,'../Exp/Square.exp',180000);
2md=setmask(md,'../Exp/SquareShelf.exp','');
3md=parameterize(md,'../Par/SquareSheetShelf.par');
4md=extrude(md,3,1);
5md=setflowequation(md,'macayeal','../Exp/SquareHalfRight.exp','fill','pattyn','coupling','penalties');
6md.cluster=none;
7md=solve(md,TransientSolutionEnum);
8
9%Fields and tolerances to track changes
10field_names ={'Vx1','Vy1','Vz1','Vel1','Pressure1','Bed1','Surface1','Thickness1','Temperature1','BasalforcingsMeltingRate1', ...
11 'Vx2','Vy2','Vz2','Vel2','Pressure2','Bed2','Surface2','Thickness2','Temperature2','BasalforcingsMeltingRate2', ...
12 'Vx3','Vy3','Vz3','Vel3','Pressure3','Bed3','Surface3','Thickness3','Temperature3','BasalforcingsMeltingRate3'};
13field_tolerances={1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05,1e-05};
14field_values={...
15 PatchToVec(md.results.TransientSolution(1).Vx),...
16 PatchToVec(md.results.TransientSolution(1).Vy),...
17 PatchToVec(md.results.TransientSolution(1).Vz),...
18 PatchToVec(md.results.TransientSolution(1).Vel),...
19 PatchToVec(md.results.TransientSolution(1).Pressure),...
20 PatchToVec(md.results.TransientSolution(1).Bed),...
21 PatchToVec(md.results.TransientSolution(1).Surface),...
22 PatchToVec(md.results.TransientSolution(1).Thickness),...
23 PatchToVec(md.results.TransientSolution(1).Temperature),...
24 PatchToVec(md.results.TransientSolution(1).BasalforcingsMeltingRate),...
25 PatchToVec(md.results.TransientSolution(2).Vx),...
26 PatchToVec(md.results.TransientSolution(2).Vy),...
27 PatchToVec(md.results.TransientSolution(2).Vz),...
28 PatchToVec(md.results.TransientSolution(2).Vel),...
29 PatchToVec(md.results.TransientSolution(2).Pressure),...
30 PatchToVec(md.results.TransientSolution(2).Bed),...
31 PatchToVec(md.results.TransientSolution(2).Surface),...
32 PatchToVec(md.results.TransientSolution(2).Thickness),...
33 PatchToVec(md.results.TransientSolution(2).Temperature),...
34 PatchToVec(md.results.TransientSolution(2).BasalforcingsMeltingRate),...
35 PatchToVec(md.results.TransientSolution(3).Vx),...
36 PatchToVec(md.results.TransientSolution(3).Vy),...
37 PatchToVec(md.results.TransientSolution(3).Vz),...
38 PatchToVec(md.results.TransientSolution(3).Vel),...
39 PatchToVec(md.results.TransientSolution(3).Pressure),...
40 PatchToVec(md.results.TransientSolution(3).Bed),...
41 PatchToVec(md.results.TransientSolution(3).Surface),...
42 PatchToVec(md.results.TransientSolution(3).Thickness),...
43 PatchToVec(md.results.TransientSolution(3).Temperature),...
44 PatchToVec(md.results.TransientSolution(3).BasalforcingsMeltingRate),...
45 };
Note: See TracBrowser for help on using the repository browser.