source: branches/iLoveclim/SOURCES/Eurasie_files/paradim-eurasie40_mod.f90 @ 359

!> \file paradim-eurasie40_mod.f90
!! Def des dimensions du grille eurasie a 40 km  
!<

!> \namespace module_eurasie
!! Def des dimensions de la grille eurasie a 40 km  
!! \author ...
!! \date ...
!<


module module_eurasie40
  
  implicit none

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

! dimensionnement grilles
!-------------------------
  integer, parameter :: nx=89            !< dimension selon x (indice i)
  integer, parameter :: ny=129           !< dimension selon y (indice j)
  integer, parameter :: nlmin=129        !< 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=129           !< pour des sorties
!cdc integer, parameter :: nx1=nx-1,ny1=ny-1,nz1=nz-1


! 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_eurasie40