source: issm/trunk-jpl/test/NightlyRun/test335.m@ 17738

Last change on this file since 17738 was 17738, checked in by bdef, 11 years ago

NEW: adding a stand alone max limit for epl thickness
File size: 3.1 KB
Line 
1md=triangle(model(),'../Exp/Square.exp',100000.);
2md=setmask(md,'','');
3md.transient=deactivateall(md.transient);
4md.transient.ishydrology=1;
5md=parameterize(md,'../Par/SquareSheetConstrained.par');
6md=setflowequation(md,'SSA','all');
7md.cluster=generic('name',oshostname(),'np',1);
8md.hydrology=(hydrologydc);
9md.hydrology=initialize(md.hydrology,md);
10md.hydrology.isefficientlayer=1;
11md.hydrology.sedimentlimit_flag=1;
12md.hydrology.sedimentlimit=800.0;
13md.initialization.sediment_head=0.0*ones(md.mesh.numberofvertices,1);
14md.hydrology.spcsediment_head=NaN*ones(md.mesh.numberofvertices,1);
15md.basalforcings.melting_rate = 2.0*ones(md.mesh.numberofvertices,1);
16md.hydrology.sediment_transmitivity=3*ones(md.mesh.numberofvertices,1);
17
18md.initialization.epl_head=0.0*ones(md.mesh.numberofvertices,1);
19md.initialization.epl_thickness=1.0*ones(md.mesh.numberofvertices,1);
20md.hydrology.spcepl_head=NaN*ones(md.mesh.numberofvertices,1);
21md.hydrology.mask_eplactive_node=0*ones(md.mesh.numberofvertices,1);
22md.basalforcings.melting_rate = 2.0*ones(md.mesh.numberofvertices,1);
23md.hydrology.epl_conductivity=30;
24md.hydrology.epl_initial_thickness=1;
25md.hydrology.epl_max_thickness=1;
26md.timestepping.time_step=0.2;
27md.timestepping.final_time=2.0;
28
29%md.verbose.solution=1;
30md=extrude(md,3,1.1);
31md=solve(md,TransientSolutionEnum());
32
33%store=md.constants.g*md.hydrology.sediment_porosity* ...
34% md.materials.rho_freshwater*((md.hydrology.sediment_compressibility/md.hydrology.sediment_porosity)+md.hydrology.water_compressibility)
35
36%sed=ones(1,size(md.results.HydrologySolution,2));
37%epl=ones(1,size(md.results.HydrologySolution,2));
38%res=ones(1,size(md.results.HydrologySolution,2));
39%input=ones(1,size(md.results.HydrologySolution,2));
40%for i= 1:size(md.results.HydrologySolution,2)
41% sed(i)=mean(md.results.HydrologySolution(i).SedimentHead);
42% res(i)=mean(md.results.HydrologySolution(i).SedimentHeadResidual);
43% epl(i)=mean(md.results.HydrologySolution(i).EplHead);
44% input(i)=2.0*(i*0.2);
45%end
46
47%Fields and tolerances to track changes
48field_names ={'SedimentWaterHead1','EplWaterHead1','SedimentHeadResidual1',...
49 'SedimentWaterHead4','EplWaterHead4','SedimentHeadResidual4',...
50 'SedimentWaterHead5','EplWaterHead5','SedimentHeadResidual5',...
51 'SedimentWaterHead9','EplWaterHead9','SedimentHeadResidual9'};
52field_tolerances={1e-13, 1e-13, 1e-13,...
53 1e-13, 1e-13, 1e-13,...
54 1e-13, 1e-12, 9e-12,...
55 1e-13, 9e-13, 1e-11};
56field_values={md.results.TransientSolution(1).SedimentHead, ...
57 md.results.TransientSolution(1).EplHead,...
58 md.results.TransientSolution(1).SedimentHeadResidual,...
59 md.results.TransientSolution(4).SedimentHead,...
60 md.results.TransientSolution(4).EplHead,...
61 md.results.TransientSolution(4).SedimentHeadResidual, ...
62 md.results.TransientSolution(5).SedimentHead,...
63 md.results.TransientSolution(5).EplHead,...
64 md.results.TransientSolution(5).SedimentHeadResidual, ...
65 md.results.TransientSolution(9).SedimentHead,...
66 md.results.TransientSolution(9).EplHead,...
67 md.results.TransientSolution(9).SedimentHeadResidual};
Note: See TracBrowser for help on using the repository browser.