[27035] | 1 | %Test Name: ValleyGlacierLevelsetCalvingMOLHO2d
|
---|
[26440] | 2 | md=triangle(model(),'../Exp/Square.exp',50000);
|
---|
| 3 | md=setmask(md,'','');
|
---|
| 4 | md=parameterize(md,'../Par/ValleyGlacierShelf.par');
|
---|
[27035] | 5 | md=setflowequation(md,'MOLHO','all');
|
---|
[26440] | 6 | md.cluster=generic('name',oshostname(),'np',3);
|
---|
| 7 |
|
---|
| 8 | %Transient
|
---|
| 9 | md.transient.isstressbalance=1;
|
---|
| 10 | md.transient.ismasstransport=1;
|
---|
| 11 | md.transient.issmb=1;
|
---|
| 12 | md.transient.isthermal=0;
|
---|
| 13 | md.transient.isgroundingline=1;
|
---|
| 14 | md.transient.ismovingfront=1;
|
---|
| 15 |
|
---|
| 16 | md.calving.calvingrate=1000.*ones(md.mesh.numberofvertices,1);
|
---|
| 17 | md.frontalforcings.meltingrate=zeros(md.mesh.numberofvertices,1);
|
---|
| 18 | md.levelset.migration_max = 1e10;
|
---|
| 19 |
|
---|
[27035] | 20 | md=SetMOLHOBC(md);
|
---|
[26440] | 21 | md=solve(md,'Transient');
|
---|
| 22 |
|
---|
| 23 | %Fields and tolerances to track changes
|
---|
| 24 | field_names ={'Vx1','Vy1','Vel1','Pressure1','Thickness1','Surface1','MaskIceLevelset1',...
|
---|
| 25 | 'Vx2','Vy2','Vel2','Pressure2','Thickness2','Surface2','MaskIceLevelset2',...
|
---|
| 26 | 'Vx3','Vy3','Vel3','Pressure3','Thickness3','Surface3','MaskIceLevelset3'};
|
---|
| 27 | field_tolerances={1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,1e-13,...
|
---|
| 28 | 2e-13,2e-13,2e-13,1e-13,1e-13,1e-13,1e-13,...
|
---|
| 29 | 2e-13,2e-13,2e-13,1e-13,1e-13,1e-13,1e-13};
|
---|
| 30 | field_values={...
|
---|
| 31 | md.results.TransientSolution(1).Vx,...
|
---|
| 32 | md.results.TransientSolution(1).Vy,...
|
---|
| 33 | md.results.TransientSolution(1).Vel,...
|
---|
| 34 | md.results.TransientSolution(1).Pressure,...
|
---|
| 35 | md.results.TransientSolution(1).Thickness,...
|
---|
| 36 | md.results.TransientSolution(1).Surface,...
|
---|
| 37 | md.results.TransientSolution(1).MaskIceLevelset,...
|
---|
| 38 | md.results.TransientSolution(2).Vx,...
|
---|
| 39 | md.results.TransientSolution(2).Vy,...
|
---|
| 40 | md.results.TransientSolution(2).Vel,...
|
---|
| 41 | md.results.TransientSolution(2).Pressure,...
|
---|
| 42 | md.results.TransientSolution(2).Thickness,...
|
---|
| 43 | md.results.TransientSolution(2).Surface,...
|
---|
| 44 | md.results.TransientSolution(2).MaskIceLevelset,...
|
---|
| 45 | md.results.TransientSolution(3).Vx,...
|
---|
| 46 | md.results.TransientSolution(3).Vy,...
|
---|
| 47 | md.results.TransientSolution(3).Vel,...
|
---|
| 48 | md.results.TransientSolution(3).Pressure,...
|
---|
| 49 | md.results.TransientSolution(3).Thickness,...
|
---|
| 50 | md.results.TransientSolution(3).Surface,...
|
---|
| 51 | md.results.TransientSolution(3).MaskIceLevelset,...
|
---|
| 52 | };
|
---|