source:
issm/oecreview/Archive/16133-16554/ISSM-16522-16523.diff@
16556
Last change on this file since 16556 was 16556, checked in by , 11 years ago | |
---|---|
File size: 1.2 KB |
-
../trunk-jpl/test/NightlyRun/test1502.m
4 4 md=setmask(md,'all',''); 5 5 md=parameterize(md,'../Par/SquareShelf.par'); 6 6 md=setflowequation(md,'SSA','all'); 7 md=extrude(md,3,1.);7 %md=extrude(md,3,1.); 8 8 md.cluster=generic('name',oshostname(),'np',1); 9 9 md.transient.isthermal=0; 10 10 11 md.timestepping.time_step=1.;12 md.settings.output_frequency=1;13 md.timestepping.final_time=2000.;11 %md.timestepping.time_step=1.; 12 %md.settings.output_frequency=1; 13 %md.timestepping.final_time=2000.; 14 14 15 15 %Solve for thinning rate -> -1 * surface mass balance 16 16 smb= 2.*ones(md.mesh.numberofvertices,1); 17 md.surfaceforcings.mass_balance= smb; 18 md.basalforcings.melting_rate= smb; 17 %md.surfaceforcings.mass_balance= smb; 18 %md.basalforcings.melting_rate= smb; 19 md.verbose=verbose('all'); 19 20 20 21 md=solve(md,MasstransportSolutionEnum()); 21 22 23 error 22 24 for i=1:10 23 25 md=solve(md,MasstransportSolutionEnum()); 24 26 md.surfaceforcings.mass_balance= md.surfaceforcings.mass_balance - ((md.results.MasstransportSolution.Thickness)-md.geometry.thickness);
Note:
See TracBrowser
for help on using the repository browser.