source: trunk/SOURCES/Eurasie40_files/paradim-euras40_mod.f90 @ 111

!> \file paradim-euras40_mod.f90
!! Def des dimensions du grille euras40  
!<

!> \namespace module_ant40
!! Def des dimensions du grille euras40
!! \author ...
!! \date ...
!<


! module de dimensionnement 
! pour euras40

module module_euras40

implicit none

character(len=7), parameter    :: geoplace='euras40'                  !< geoplace
character(len=100), parameter  :: dirnameinp='../INPUT/EURASIE40/'    !< input directory
character(len=17), parameter   :: dirforcage='../INPUT/Forcage/'      !< input directory

! dimensionnement grilles
!-------------------------
integer, parameter :: nx=103           !< dimension selon x (indice i)
integer, parameter :: ny=135           !< dimension selon y (indice j)
integer, parameter :: nlmin=135        !< 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=141           !< pour des sorties

! pas horizontal
!-----------------
real, parameter    :: dx=40000.0      !< pas en X en m
real, parameter    :: dy=40000.0      !< pas en Y en m


end module module_euras40