!> \file paradim-eurasie20_mod.f90 !! Def des dimensions du grille eurasie a 20 km !< !> \namespace module_eurasie !! Def des dimensions de la grille eurasie a 20 km !! \author ... !! \date ... !< module module_eurasie20 implicit none character(len=7), parameter :: geoplace='euras20' ! geoplace character(len=19), parameter :: dirnameinp='../INPUT/EURASIE20/' ! input directory character(len=17), parameter :: dirforcage='../INPUT/Forcage/' ! input directory ! dimensionnement grilles !------------------------- integer, parameter :: nx=177 !< dimension selon x (indice i) integer, parameter :: ny=257 !< dimension selon y (indice j) integer, parameter :: nlmin=177 !< min(nx,ny), pour matrice elliptique integer, parameter :: nz=21 !< dimension selon z (indice k) integer, parameter :: nzm=4 !< nb de points verticaux dans le socle integer, parameter :: nn=257 !< pour des sorties !cdc integer, parameter :: nx1=nx-1,ny1=ny-1,nz1=nz-1 ! pas horizontal !----------------- real, parameter :: dx=20000.0 !< pas en X en m real, parameter :: dy=20000.0 !< pas en Y en m end module module_eurasie20