[17376] | 1 | md=triangle(model(),'../Exp/Square.exp',100000.);
|
---|
| 2 | md=setmask(md,'','');
|
---|
| 3 | md=parameterize(md,'../Par/SquareSheetConstrained.par');
|
---|
[17734] | 4 | md.transient=deactivateall(md.transient);
|
---|
| 5 | md.transient.ishydrology=1;
|
---|
[17376] | 6 | md=setflowequation(md,'SSA','all');
|
---|
| 7 | md.cluster=generic('name',oshostname(),'np',1);
|
---|
| 8 | md.hydrology=(hydrologydc);
|
---|
[17422] | 9 | md.hydrology=initialize(md.hydrology,md);
|
---|
[17376] | 10 | md.hydrology.isefficientlayer=1;
|
---|
| 11 | md.hydrology.sedimentlimit_flag=1;
|
---|
| 12 | md.hydrology.sedimentlimit=400.0;
|
---|
| 13 | md.hydrology.sediment_thickness=20.0;
|
---|
| 14 | md.initialization.sediment_head=0.0*ones(md.mesh.numberofvertices,1);
|
---|
| 15 | md.hydrology.spcsediment_head=NaN*ones(md.mesh.numberofvertices,1);
|
---|
[18582] | 16 | md.basalforcings.groundedice_melting_rate = 2.0*ones(md.mesh.numberofvertices,1);
|
---|
[17376] | 17 | md.hydrology.sediment_transmitivity=1.5e-4*ones(md.mesh.numberofvertices,1);
|
---|
| 18 |
|
---|
| 19 | md.initialization.epl_head=0.0*ones(md.mesh.numberofvertices,1);
|
---|
[17524] | 20 | md.initialization.epl_thickness=1.0*ones(md.mesh.numberofvertices,1);
|
---|
[17376] | 21 | md.hydrology.spcepl_head=NaN*ones(md.mesh.numberofvertices,1);
|
---|
| 22 | md.hydrology.mask_eplactive_node=0*ones(md.mesh.numberofvertices,1);
|
---|
| 23 |
|
---|
[18974] | 24 | md.hydrology.epl_conductivity=1.5e-2;
|
---|
[17376] | 25 | md.hydrology.epl_initial_thickness=1.0;
|
---|
[18974] | 26 | md.hydrology.epl_colapse_thickness=1.0e-6;
|
---|
[18983] | 27 | md.hydrology.epl_thick_comp=1;
|
---|
[17738] | 28 | md.hydrology.epl_max_thickness=5.0;
|
---|
[17376] | 29 |
|
---|
[18646] | 30 | md.hydrology.transfer_flag=1.0;
|
---|
[18974] | 31 | md.hydrology.leakage_factor=3.9e-12;
|
---|
[17376] | 32 |
|
---|
[19031] | 33 | times=0:0.002:8.0;
|
---|
[18582] | 34 | md.basalforcings.groundedice_melting_rate=ones(md.mesh.numberofvertices+1,length(times));
|
---|
[17376] | 35 |
|
---|
[18974] | 36 | for i=1:length(times)
|
---|
| 37 | if(times(i)<=1.0)
|
---|
| 38 | md.basalforcings.groundedice_melting_rate(:,i)=1.0;
|
---|
| 39 | elseif(times(i)<=6.0)
|
---|
| 40 | md.basalforcings.groundedice_melting_rate(:,i)=-0.2;
|
---|
| 41 | else
|
---|
| 42 | md.basalforcings.groundedice_melting_rate(:,i)=0.0;
|
---|
| 43 | end
|
---|
| 44 | end
|
---|
| 45 |
|
---|
[18582] | 46 | md.basalforcings.groundedice_melting_rate(end,:)=times;
|
---|
[17376] | 47 |
|
---|
[19031] | 48 | md.timestepping.time_step=0.002;
|
---|
[18974] | 49 | md.timestepping.final_time=8.0;
|
---|
[17376] | 50 |
|
---|
[21056] | 51 | md=solve(md,'Transient');
|
---|
[17376] | 52 |
|
---|
| 53 | field_names ={'SedimentWaterHead5','EplWaterHead5','SedimentWaterHead40','EplWaterHead40'};
|
---|
| 54 | field_tolerances={1e-13, 1e-13, 1e-13, 1e-13, 1e-13};
|
---|
[17734] | 55 | field_values={md.results.TransientSolution(5).SedimentHead, ...
|
---|
| 56 | md.results.TransientSolution(5).EplHead,...
|
---|
| 57 | md.results.TransientSolution(40).SedimentHead,...
|
---|
| 58 | md.results.TransientSolution(40).EplHead};
|
---|