|
SURFEX v7.3
General documentation of Surfex
|
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
1.8.0