Changeset 20702
- Timestamp:
- 06/06/16 15:42:12 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/examples/Jakobshavn/runme.m
r20532 r20702 22 22 [md.mesh.lat,md.mesh.long] = xy2ll(md.mesh.x,md.mesh.y,+1,39,71); 23 23 24 save JksMesh .mdlmd24 save JksMesh md 25 25 end 26 26 if any(steps==2) 27 27 disp(' Step 2: Parameterization'); 28 md=loadmodel('JksMesh .mdl');28 md=loadmodel('JksMesh'); 29 29 30 30 md=setmask(md,'',''); 31 31 md=parameterize(md,'Jks.par'); 32 32 33 %zones of shear margin softening 34 weakb=ContourToMesh(md.mesh.elements,md.mesh.x,md.mesh.y,'WeakB.exp','node',2); 35 pos=find(weakb); 36 md.materials.rheology_B(pos)=.3*md.materials.rheology_B(pos); 37 38 save JksPar.mdl md 33 save JksPar md 39 34 end 40 35 if any(steps==3) 41 36 disp(' Step 3: Control method friction'); 42 md=loadmodel('JksPar .mdl');37 md=loadmodel('JksPar'); 43 38 44 39 md=setflowequation(md,'SSA','all'); … … 72 67 md=solve(md,StressbalanceSolutionEnum); 73 68 74 save JksControl .mdlmd69 save JksControl md 75 70 end 76 71 if any(steps==4) 77 72 disp(' Plotting') 78 md=loadmodel('JksControl .mdl');73 md=loadmodel('JksControl'); 79 74 80 75 plotmodel(md,'unit#all','km','axis#all','equal',...
Note:
See TracChangeset
for help on using the changeset viewer.