source: trunk/SOURCES/MISMIP3D_files/paradim_mismip3D_5km_mod.f90 @ 111

Last change on this file since 111 was 4, checked in by dumas, 10 years ago

initial import GRISLI trunk

File size: 1.2 KB
Line 
1!> \file paradim-ant20_CISM_mod.f90
2!! Def des dimensions du grille CISM a 20 km 
3!<
4
5!> \namespace module_ant20_CISM
6!! Def des dimensions du grille CISM a 20 km 
7!! \author ...
8!! \date ...
9!! @note prescribe nx,ny,  dimension of most arrays
10!! for Antarctic 20 km grid CISM
11!<
12module module_mismip3_5 
13
14implicit none
15
16! character
17character(len=7),  parameter  :: geoplace='mism3_5'
18character(len=23), parameter  :: dirnameinp='../INPUT/MISMIP_3D/'    !< input directory
19character(len=17), parameter  :: dirforcage='../INPUT/Forcage/'      !< input directory
20
21! dimensionnement grilles : les noeuds 1 et ny sont hors domaine de MISMIP
22!-------------------------
23integer, parameter :: nx=321           !< dimension selon x (indice i)
24integer, parameter :: ny=23            !< dimension selon y (indice j)
25integer, parameter :: nlmin=387        !< min(nx,ny), pour matrice elliptique 
26integer, parameter :: nz=21            !< dimension selon z (indice k)
27integer, parameter :: nzm=4            !< nb de points verticaux dans le socle
28integer, parameter :: nn=199           !< pour des sorties
29
30
31! pas horizontal
32!-----------------
33real, parameter    :: dx=5000.0      !< pas en X en m
34real, parameter    :: dy=5000.0      !< pas en Y en m
35
36
37end module module_mismip3_5
Note: See TracBrowser for help on using the repository browser.