1 | %Start defining model parameters here
|
---|
2 |
|
---|
3 | %Geometry
|
---|
4 | md.geometry.thickness=1000.0*ones(md.mesh.numberofvertices,1);
|
---|
5 | md.geometry.base=zeros(md.mesh.numberofvertices,1);
|
---|
6 | md.geometry.surface=md.geometry.base+md.geometry.thickness;
|
---|
7 |
|
---|
8 | %Materials
|
---|
9 | md.initialization.temperature=(273.-20.)*ones(md.mesh.numberofvertices,1);
|
---|
10 | md.materials.rheology_B=paterson(md.initialization.temperature);
|
---|
11 | md.materials.rheology_n=3.*ones(md.mesh.numberofelements,1);
|
---|
12 |
|
---|
13 | %Friction
|
---|
14 | md.friction.coefficient=20.*ones(md.mesh.numberofvertices,1);
|
---|
15 | md.friction.coefficient(find(md.mask.ocean_levelset<0.))=0.;
|
---|
16 | md.friction.p=ones(md.mesh.numberofelements,1);
|
---|
17 | md.friction.q=ones(md.mesh.numberofelements,1);
|
---|
18 |
|
---|
19 | %Some necessary fields to fool checkonsistency
|
---|
20 | md.initialization.vx=zeros(md.mesh.numberofvertices,1);
|
---|
21 | md.initialization.vy=zeros(md.mesh.numberofvertices,1);
|
---|
22 | md.initialization.vz=zeros(md.mesh.numberofvertices,1);
|
---|
23 | md.initialization.pressure=zeros(md.mesh.numberofvertices,1);
|
---|
24 |
|
---|
25 | md.stressbalance.spcvx=zeros(md.mesh.numberofvertices,1);
|
---|
26 | md.stressbalance.spcvy=zeros(md.mesh.numberofvertices,1);
|
---|
27 | md.stressbalance.spcvz=zeros(md.mesh.numberofvertices,1);
|
---|
28 |
|
---|
29 | md.stressbalance.referential=NaN(md.mesh.numberofvertices,6);
|
---|
30 | md.stressbalance.loadingforce=zeros(md.mesh.numberofvertices,3);
|
---|
31 |
|
---|
32 | md.smb.mass_balance=zeros(md.mesh.numberofvertices,1);
|
---|
33 |
|
---|
34 | md.basalforcings.groundedice_melting_rate=zeros(md.mesh.numberofvertices,1);
|
---|
35 | md.basalforcings.floatingice_melting_rate=zeros(md.mesh.numberofvertices,1);
|
---|
36 |
|
---|
37 |
|
---|
38 | %Numerical parameters
|
---|
39 | md.verbose=verbose(0);
|
---|
40 | md.settings.waitonlock=30;
|
---|
41 | md.groundingline.migration='None';
|
---|
42 |
|
---|
43 | md.transient=deactivateall(md.transient);
|
---|
44 |
|
---|
45 | %Change name so that no test have the same name
|
---|
46 | A=dbstack;
|
---|
47 | if (length(A)>2), md.miscellaneous.name=A(3).file(1:end-2); end
|
---|