Changeset 16454
- Timestamp:
- 10/18/13 08:17:30 (11 years ago)
- Location:
- issm/trunk/examples
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/examples/Jakobshavn/Jks.par
r11995 r16454 44 44 disp(' Construct basal friction parameters'); 45 45 md.friction.coefficient=30*ones(md.mesh.numberofvertices,1); 46 pos=find(md.mask.vertexonfloatingice); 47 md.friction.coefficient(pos)=0; %no friction applied on floating ice 46 md.friction.coefficient(find(md.mask.groundedice_levelset<0.))=0.; 48 47 md.friction.p=ones(md.mesh.numberofelements,1); 49 48 md.friction.q=ones(md.mesh.numberofelements,1); … … 58 57 disp(' Set other boundary conditions'); 59 58 md=SetMarineIceSheetBC(md,'./Front.exp'); 60 md.diagnostic.icefront(:,end)=1; %Apply water pressure at the ice front61 59 md.basalforcings.melting_rate=zeros(md.mesh.numberofvertices,1); -
issm/trunk/examples/Jakobshavn/runme.m
r11995 r16454 42 42 md=loadmodel('JksPar.mdl'); 43 43 44 md=setflowequation(md,' macayeal','all');44 md=setflowequation(md,'SSA','all'); 45 45 46 46 %Control general … … 64 64 65 65 %Additional parameters 66 md. diagnostic.restol=0.01;67 md. diagnostic.reltol=0.1;68 md. diagnostic.abstol=NaN;66 md.stressbalance.restol=0.01; 67 md.stressbalance.reltol=0.1; 68 md.stressbalance.abstol=NaN; 69 69 70 70 %Go solve 71 71 md.cluster=generic('name',oshostname,'np',4); 72 md.solver=addoptions(md.solver,NoneAnalysisEnum,asmoptions); 73 md.solver=addoptions(md.solver,DiagnosticVertAnalysisEnum,jacobiasmoptions); 74 md=solve(md,DiagnosticSolutionEnum); 72 md=solve(md,StressbalanceSolutionEnum); 75 73 76 74 save JksControl.mdl md … … 83 81 'FontSize#all',12,... 84 82 'data',md.inversion.vel_obs,'title','Observed velocity',... 85 'data',md.results. DiagnosticSolution.Vel,'title','Modeled Velocity',...83 'data',md.results.StressbalanceSolution.Vel,'title','Modeled Velocity',... 86 84 'colorbar#1','off','colorbar#2','on','colorbartitle#2','[m/yr]',... 87 85 'caxis#1-2',[0,7000],... 88 86 'data',md.geometry.bed,'title','Bed elevation',... 89 'data',md.results. DiagnosticSolution.FrictionCoefficient,...87 'data',md.results.StressbalanceSolution.FrictionCoefficient,... 90 88 'title','Friction Coefficient',... 91 89 'colorbar#3','on','colorbartitle#3','[m]','colorbar#4','on'); -
issm/trunk/examples/SquareIceShelf/Square.par
r11237 r16454 11 11 12 12 disp(' creating drag'); 13 pos=find(md.mask.vertexonfloatingice);14 13 md.friction.coefficient=200*ones(md.mesh.numberofvertices,1); 15 md.friction.coefficient( pos)=0;14 md.friction.coefficient(find(md.mask.groundedice_levelset<0.))=0.; 16 15 md.friction.p=ones(md.mesh.numberofelements,1); 17 16 md.friction.q=ones(md.mesh.numberofelements,1); -
issm/trunk/examples/SquareIceShelf/runme.m
r11995 r16454 3 3 md=setmask(md,'all',''); 4 4 md=parameterize(md,'Square.par'); 5 md=setflowequation(md,' macayeal','all');5 md=setflowequation(md,'SSA','all'); 6 6 md.cluster=generic('name',oshostname,'np',2); 7 md=solve(md, DiagnosticSolutionEnum);7 md=solve(md,StressbalanceSolutionEnum);
Note:
See TracChangeset
for help on using the changeset viewer.