source: trunk/SOURCES/Ant25_CISM_files/paradim-ant25_CISM_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-ant25_CISM_mod.f90
2!! Def des dimensions du grille CISM a 25 km 
3!<
4
5!> \namespace module_ant25_CISM
6!! Def des dimensions du grille CISM a 25 km
7!! \author ...
8!! \date ...
9!! @note prescribe nx,ny,  dimension of most arrays
10!! for Antarctic 25 km grid CISM
11!<
12
13
14module module_ant25_CISM
15
16implicit none
17!integer :: i,j                         ! boucles
18
19! character
20character(len=7),  parameter  ::  geoplace='CISMA25'
21character(len=23), parameter  :: dirnameinp='../INPUT/ANT-CISM-25km/' !< input directory
22character(len=17), parameter  :: dirforcage='../INPUT/Forcage/' !< input directory
23
24! dimensionnement grilles
25!-------------------------
26integer, parameter :: nx=237           !< dimension selon x (indice i)
27integer, parameter :: ny=237           !< dimension selon y (indice j)
28integer, parameter :: nlmin=237        !< min(nx,ny), pour matrice elliptique 
29integer, parameter :: nz=21            !< dimension selon z (indice k)
30integer, parameter :: nzm=4            !< nb de points verticaux dans le socle
31integer, parameter :: nn=199           !< pour des sorties
32
33
34! pas horizontal
35!-----------------
36real, parameter    :: dx=25000.0      !< pas en X en m
37real, parameter    :: dy=25000.0      !< pas en Y en m
38
39
40end module module_ant25_CISM
Note: See TracBrowser for help on using the repository browser.