Last change
on this file since 14134 was 14134, checked in by jschierm, 12 years ago |
NEW: Working python tests 1101-1108 (plus other cosmetic changes).
|
-
Property svn:executable
set to
*
|
File size:
948 bytes
|
Line | |
---|
1 | %Ok, start defining model parameters here
|
---|
2 |
|
---|
3 | disp(' creating thickness');
|
---|
4 | md.geometry.surface=-md.mesh.x*tan(0.5*pi/180.);
|
---|
5 | md.geometry.bed=md.geometry.surface-1000.+500.*sin(md.mesh.x*2.*pi/max(md.mesh.x)).*sin(md.mesh.y*2.*pi/max(md.mesh.x));
|
---|
6 | md.geometry.thickness=md.geometry.surface-md.geometry.bed;
|
---|
7 |
|
---|
8 | disp(' creating drag');
|
---|
9 | md.friction.coefficient=200.*ones(md.mesh.numberofvertices,1); %q=1.
|
---|
10 | %Take care of iceshelves: no basal drag
|
---|
11 | pos=find(md.mask.elementonfloatingice);
|
---|
12 | md.friction.coefficient(md.mesh.elements(pos,:))=0.;
|
---|
13 | md.friction.p=ones(md.mesh.numberofelements,1);
|
---|
14 | md.friction.q=ones(md.mesh.numberofelements,1);
|
---|
15 |
|
---|
16 | disp(' creating flow law parameter');
|
---|
17 | md.materials.rheology_B=6.8067*10^7*ones(md.mesh.numberofvertices,1);
|
---|
18 | md.materials.rheology_n=3.*ones(md.mesh.numberofelements,1);
|
---|
19 |
|
---|
20 | disp(' boundary conditions for diagnostic model');
|
---|
21 | %Create node on boundary first (because we cannot use mesh)
|
---|
22 | md=SetIceSheetBC(md);
|
---|
Note:
See
TracBrowser
for help on using the repository browser.