Changeset 10290
- Timestamp:
- 10/25/11 10:09:29 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/test/NightlyRun/test446.m
r10282 r10290 1 1 radius=1e6; 2 2 shelfextent=2e5; 3 resolution=.5e5;4 %mesh {{{15 md=roundmesh(model,radius,resolution);6 3 %fix center node to 0,0 7 4 rad=sqrt(md.mesh.x.^2+md.mesh.y.^2); 8 5 pos=find(rad==min(rad)); 9 6 md.mesh.x(pos)=0; md.mesh.y(pos)=0; %the closest node to the center is changed to be exactly at the center 10 %}}}11 %put our grounding line 'shelfextent' meters from the icefront {{{112 7 xelem=md.mesh.x(md.mesh.elements)*[1;1;1]/3; 13 8 yelem=md.mesh.y(md.mesh.elements)*[1;1;1]/3; … … 17 12 flags(pos)=1; 18 13 md=setmask(md,flags,''); 19 %}}}20 14 md=parameterize(md,'../Par/RoundSheetShelf.par'); 21 15 md=setflowequation(md,'macayeal','all'); 22 16 md.cluster=generic('name',oshostname(),'np',3); 23 %plug holes into the ice sheet, to test for grounding line migration. {{{117 %plug holes into the ice sheet, to test for grounding line migration. 24 18 di=md.materials.rho_ice/md.materials.rho_water; 25 rad=sqrt(md.mesh.x.^2+md.mesh.y.^2);26 19 pos=find(rad<200000); 27 20 md.geometry.thickness(pos)=100; … … 38 31 md.geometry.bed(pos)=-di*md.geometry.thickness(pos)-20; 39 32 md.geometry.surface(pos)=md.geometry.bed(pos)+md.geometry.thickness(pos); 40 %}}}41 33 42 34 %test different grounding line dynamics.
Note:
See TracChangeset
for help on using the changeset viewer.