SURFEX v7.3
General documentation of Surfex
 All Classes Files Functions Variables Typedefs
/home/dasprezs/EXPORT_v7_3/src/SURFEX/modd_deepsoil.F90
Go to the documentation of this file.
00001 !     ###############
00002       MODULE MODD_DEEPSOIL
00003 !     ###############
00004 !
00005 !!****  *MODD_DEEPSOIL* - declaration of deep soil characteristics
00006 
00007 !!    PURPOSE
00008 !!    -------
00009 !       The purpose of this declarative module is to declare  the 
00010 !     calibrated constants for deep soil fields 
00011 !
00012 !!
00013 !!**  IMPLICIT ARGUMENTS
00014 !!    ------------------
00015 !!      None 
00016 !!
00017 !!    REFERENCE
00018 !!    ---------
00019 !!          
00020 !!    AUTHOR
00021 !!    ------
00022 !!      P. LE MOIGNE *Meteo France*
00023 !!
00024 !!    MODIFICATIONS
00025 !!    -------------
00026 !!      Original    05/2008
00027 !-------------------------------------------------------------------------------
00028 !
00029 !*       0.   DECLARATIONS
00030 !             ------------
00031 !
00032 IMPLICIT NONE 
00033 !
00034 LOGICAL                             :: LPHYSDOMC
00035                                         ! General switch to impose CT
00036                                         ! and soil water/ice contents
00037 LOGICAL                             :: LDEEPSOIL
00038                                         ! General switch for deep soil fields
00039                                         ! (temperature and relaxation time)
00040 !
00041 REAL, PARAMETER, DIMENSION(12)      :: XTDEEP_CLI =(/236.,236.,220.,209.,206.,211.,214.,210.,207.,212.,220.,229./)
00042                                         ! deep soil temperature (K)
00043 !                                        
00044 REAL, PARAMETER, DIMENSION(12)      :: XGAMMAT_CLI=(/4.,4.,4.,3.,1.,2.,3.,1.,1.,1.,1.,2./)
00045                                         ! deep soil relaxation time (days)
00046 !
00047 END MODULE MODD_DEEPSOIL