SURFEX v7.3
General documentation of Surfex
 All Classes Files Functions Variables Typedefs
/home/dasprezs/EXPORT_v7_3/src/LIB/TOPD/modd_dummy_exp_profile.F90
Go to the documentation of this file.
00001 !     ###########################
00002       MODULE MODD_DUMMY_EXP_PROFILE
00003 !     ###########################
00004 !
00005 !!****  *MODD_DUMMY_EXP_PROFILE - declaration For special f, dc exponential profile
00006 !!
00007 !!    PURPOSE
00008 !!    -------
00009 !
00010 !!
00011 !!**  IMPLICIT ARGUMENTS
00012 !!    ------------------
00013 !!      None 
00014 !!
00015 !!    REFERENCE
00016 !!    ---------
00017 !!
00018 !!    AUTHOR
00019 !!    ------
00020 !!     B. Vincendon
00021 !!
00022 !!    MODIFICATIONS
00023 !!    -------------
00024 !!      Original       10/08/11
00025 !
00026 !*       0.   DECLARATIONS
00027 !             ------------
00028 !
00029 USE MODD_TOPD_PAR, ONLY : JPCAT
00030 !
00031 IMPLICIT NONE
00032 !-------------------------------------------------------------------------------
00033 ! **** For special f, dc exponential profile
00034 ! values for each isba_mesh
00035 REAL, DIMENSION(:), ALLOCATABLE :: XF_PARAM
00036 REAL, DIMENSION(:), ALLOCATABLE :: XC_DEPTH_RATIO
00037 !values for each catchment
00038 REAL, DIMENSION(JPCAT) :: XF_PARAM_BV
00039 REAL, DIMENSION(JPCAT) :: XC_DEPTH_RATIO_BV
00040 !-------------------------------------------------------------------------------------
00041 !
00042 END MODULE MODD_DUMMY_EXP_PROFILE
00043