Context Navigation

test237.m@ 5380

Last change on this file since 5380 was 5380, checked in by seroussi, 15 years ago
added tiling test for ice shelves
File size: 710 bytes

Line
1	md=mesh(model,'../Exp/Square.exp',150000);
2	md=geography(md,'all','');
3	md=parameterize(md,'../Par/SquareShelf.par');
4	md=extrude(md,3,2);
5	md=setelementstype(md,'pattyn','../Exp/SquareHalfRight.exp','fill','macayeal');
6	md.cluster='none';
7	md=solve(md,'analysis_type',DiagnosticSolutionEnum);
8
9	%Fields and tolerances to track changes
10	field_names ={'Vx','Vy','Vz','Vel','Pressure'};
11	field_tolerances={1e-13,1e-13,1e-13,1e-13,1e-13};
12	field_values={...
13	PatchToVec(md.results.DiagnosticSolution.Vx),...
14	PatchToVec(md.results.DiagnosticSolution.Vy),...
15	PatchToVec(md.results.DiagnosticSolution.Vz),...
16	PatchToVec(md.results.DiagnosticSolution.Vel),...
17	PatchToVec(md.results.DiagnosticSolution.Pressure),...
18	};

Note: See TracBrowser for help on using the repository browser.