Last change
on this file since 334 was
57,
checked in by dumas, 8 years ago
|
Add Snowball configuration
|
File size:
1010 bytes
|
Line | |
---|
1 | module module_snowball |
---|
2 | |
---|
3 | implicit none |
---|
4 | |
---|
5 | character(len=7), parameter :: geoplace='snowbal' ! geoplace |
---|
6 | character(len=21), parameter :: dirnameinp='../../INPUT/SNOWBALL/' ! input directory |
---|
7 | character(len=20), parameter :: dirforcage='../../INPUT/Forcage/' ! input directory |
---|
8 | |
---|
9 | ! dimensionnement grilles |
---|
10 | !------------------------- |
---|
11 | integer, parameter :: nx=679 ! 625 dimension selon x (indice i) |
---|
12 | integer, parameter :: ny=300 ! 325 dimension selon y (indice j) |
---|
13 | integer, parameter :: nlmin=679 ! 625 min(nx,ny), pour matrice elliptique |
---|
14 | integer, parameter :: nz=21 ! dimension selon z (indice k) |
---|
15 | integer, parameter :: nzm=4 ! nb de points verticaux dans le socle |
---|
16 | integer, parameter :: nn=679 ! 625 pour des sorties |
---|
17 | !cdc integer, parameter :: nx1=nx-1,ny1=ny-1,nz1=nz-1 |
---|
18 | |
---|
19 | |
---|
20 | ! pas horizontal |
---|
21 | !----------------- |
---|
22 | real, parameter :: dx=40000.0 |
---|
23 | real, parameter :: dy=40000.0 ! pas en X et Y en m |
---|
24 | |
---|
25 | |
---|
26 | end module module_snowball |
---|
Note: See
TracBrowser
for help on using the repository browser.