[4975] | 1 | md=mesh(model,'../Exp/Square.exp',200000);
|
---|
| 2 | md=geography(md,'','');
|
---|
| 3 | md=parameterize(md,'../Par/SquareSheetConstrained.par');
|
---|
| 4 | md=extrude(md,3,1);
|
---|
| 5 | md=setelementstype(md,'pattyn','all');
|
---|
[5964] | 6 | md=SetParallel(md,3);
|
---|
[8295] | 7 | md=solve(md,Transient3DSolutionEnum);
|
---|
[5098] | 8 |
|
---|
| 9 | %Fields and tolerances to track changes
|
---|
[8392] | 10 | field_names ={'Vx1','Vy1','Vz1','Vel1','Pressure1','Bed1','Surface1','Thickness1','Temperature1','BasalMeltingRate1', ...
|
---|
| 11 | 'Vx2','Vy2','Vz2','Vel2','Pressure2','Bed2','Surface2','Thickness2','Temperature2','BasalMeltingRate2', ...
|
---|
| 12 | 'Vx3','Vy3','Vz3','Vel3','Pressure3','Bed3','Surface3','Thickness3','Temperature3','BasalMeltingRate3'};
|
---|
[6725] | 13 | field_tolerances={1e-09,1e-09,1e-09,1e-10,1e-10,1e-10,1e-10,1e-10,1e-10,1e-10,...
|
---|
| 14 | 1e-09,1e-09,1e-10,1e-09,1e-10,1e-10,1e-10,1e-10,1e-10,1e-10,...
|
---|
| 15 | 1e-09,5e-10,1e-10,1e-10,1e-10,1e-10,1e-10,1e-10,1e-10,1e-10};
|
---|
[5098] | 16 | field_values={...
|
---|
| 17 | PatchToVec(md.results.Transient3DSolution(1).Vx),...
|
---|
| 18 | PatchToVec(md.results.Transient3DSolution(1).Vy),...
|
---|
| 19 | PatchToVec(md.results.Transient3DSolution(1).Vz),...
|
---|
| 20 | PatchToVec(md.results.Transient3DSolution(1).Vel),...
|
---|
| 21 | PatchToVec(md.results.Transient3DSolution(1).Pressure),...
|
---|
| 22 | PatchToVec(md.results.Transient3DSolution(1).Bed),...
|
---|
| 23 | PatchToVec(md.results.Transient3DSolution(1).Surface),...
|
---|
| 24 | PatchToVec(md.results.Transient3DSolution(1).Thickness),...
|
---|
| 25 | PatchToVec(md.results.Transient3DSolution(1).Temperature),...
|
---|
[8392] | 26 | PatchToVec(md.results.Transient3DSolution(1).BasalMeltingRate),...
|
---|
[5098] | 27 | PatchToVec(md.results.Transient3DSolution(2).Vx),...
|
---|
| 28 | PatchToVec(md.results.Transient3DSolution(2).Vy),...
|
---|
| 29 | PatchToVec(md.results.Transient3DSolution(2).Vz),...
|
---|
| 30 | PatchToVec(md.results.Transient3DSolution(2).Vel),...
|
---|
| 31 | PatchToVec(md.results.Transient3DSolution(2).Pressure),...
|
---|
| 32 | PatchToVec(md.results.Transient3DSolution(2).Bed),...
|
---|
| 33 | PatchToVec(md.results.Transient3DSolution(2).Surface),...
|
---|
| 34 | PatchToVec(md.results.Transient3DSolution(2).Thickness),...
|
---|
| 35 | PatchToVec(md.results.Transient3DSolution(2).Temperature),...
|
---|
[8392] | 36 | PatchToVec(md.results.Transient3DSolution(2).BasalMeltingRate),...
|
---|
[5098] | 37 | PatchToVec(md.results.Transient3DSolution(3).Vx),...
|
---|
| 38 | PatchToVec(md.results.Transient3DSolution(3).Vy),...
|
---|
| 39 | PatchToVec(md.results.Transient3DSolution(3).Vz),...
|
---|
| 40 | PatchToVec(md.results.Transient3DSolution(3).Vel),...
|
---|
| 41 | PatchToVec(md.results.Transient3DSolution(3).Pressure),...
|
---|
| 42 | PatchToVec(md.results.Transient3DSolution(3).Bed),...
|
---|
| 43 | PatchToVec(md.results.Transient3DSolution(3).Surface),...
|
---|
| 44 | PatchToVec(md.results.Transient3DSolution(3).Thickness),...
|
---|
| 45 | PatchToVec(md.results.Transient3DSolution(3).Temperature),...
|
---|
[8392] | 46 | PatchToVec(md.results.Transient3DSolution(3).BasalMeltingRate),...
|
---|
[5098] | 47 | };
|
---|