SURFEX v7.3: /home/dasprezs/EXPORT_v7_3/src/LIB/TOPD/modd_topd

Go to the documentation of this file.
00001 !-------------------------------------------------------------------------------
00002 !     ######################
00003       MODULE MODD_TOPD_PAR
00004 !     ######################
00005 !
00006 !!****  *MODD_TOPD_PAR* - declaration of parameter variables
00007 !!
00008 !!    PURPOSE
00009 !!    -------
00010 !       The purpose of this declarative module is to specify  the variables 
00011 !     which have the PARAMETER attribute   
00012 !
00013 !!
00014 !!**  IMPLICIT ARGUMENTS
00015 !!    ------------------
00016 !!      None 
00017 !!
00018 !!    REFERENCE
00019 !!    ---------
00020 !!      Book2 of documentation of Meso-NH (module MODD_PARAMETER)
00021 !!          
00022 !!    AUTHOR
00023 !!    ------
00024 !!      V. Ducrocq   *Meteo France*
00025 !!
00026 !!    MODIFICATIONS
00027 !!    -------------
00028 !!      Original    4/07/94                      
00029 !!      Modification 10/03/95 (I.Mallet)   add the coupling files maximum number
00030 !!      Modification 10/04/95 (Ph. Hereil) add the budget related informations
00031 !-------------------------------------------------------------------------------
00032 !
00033 !*       0.   DECLARATIONS
00034 !             ------------
00035 !
00036 IMPLICIT NONE
00037 !
00038 REAL,    PARAMETER :: XSTEPK = 0.05   ! discretization step of the saturation 
00039                                       ! index KAPPA
00040 INTEGER, PARAMETER :: NDIM = 20       ! dimension of the XCONN array third 
00041                                       ! index 
00042 INTEGER, PARAMETER :: JPCAT = 10      ! number max of catchments
00043 !
00044 !values for each catchment
00045 REAL, DIMENSION(JPCAT) :: XF_PARAM_BV
00046 REAL, DIMENSION(JPCAT) :: XC_DEPTH_RATIO_BV
00047 !
00048 END MODULE MODD_TOPD_PAR