!SFX_LIC Copyright 1994-2014 CNRS, Meteo-France and Universite Paul Sabatier !SFX_LIC This is part of the SURFEX software governed by the CeCILL version 2.1 !SFX_LIC version 1. See LICENSE, Licence_CeCILL_V2.1-en.txt and Licence_CeCILL_V2.1-fr.txt !SFX_LIC for details. version 1. ! #################### MODULE MODD_SURF_ATM ! #################### ! !!**** *MODD_SURF_ATM - declaration of surface ATM !! !! PURPOSE !! ------- ! Declaration of surface parameters ! !! !!** IMPLICIT ARGUMENTS !! ------------------ !! None !! !! REFERENCE !! --------- !! !! AUTHOR !! ------ !! P. Le Moigne *Meteo France* !! !! MODIFICATIONS !! ------------- !! Original 10/2007 ! !* 0. DECLARATIONS ! ------------ ! !! B.Decharme 04/2009 Add flag used to Read/Write precipitation forcing from/into the restart file for ARPEGE/ALADIN run !! B.Decharme 08/2009 Add flag used to know if you use SURFEX in the Earth System Model !! B.Decharme 09/2012 New wind implicitation key option !! B.Decharme 04/2013 Flag used to Read/Write some field from/into the restart file for coupling with ARPEGE/ALADIN !! Delete LRW_PRECIP, LSAVE_PRECIP !! Vertical shift for LW and Precip !! R. Séférian 03/2014 Adding key for decouple CO2 for photosynthesis (XCO2UNCPL) ! IMPLICIT NONE ! !----------------------------------------------------------------------------------------------------- REAL :: XCISMIN ! minimum wind shear REAL :: XVMODMIN ! minimum wind speed LOGICAL :: LALDTHRES! activate aladin threshold for wind ! LOGICAL :: LDRAG_COEF_ARP ! activate aladin formulation for Cd and Ch LOGICAL :: LALDZ0H ! LOGICAL :: LNOSOF ! No parameterization of Subgrid Orography effects on atmospheric Forcing LOGICAL :: LVERTSHIFT ! vertical shift from atmospheric orography to surface orography LOGICAL :: LVSHIFT_LW ! vertical shift for LW LOGICAL :: LVSHIFT_PRCP ! vertical shift for Precip ! LOGICAL :: LVZIUSTAR0_ARP ! activate aladin formulation for zoh over sea LOGICAL :: LRRGUST_ARP ! activate aladin formulation for CD CH, CDN, correction due to moist gustiness LOGICAL :: LCPL_ARP ! activate aladin formulation for Cp and L LOGICAL :: LQVNPLUS ! An option for the resolution of the surface temperature equation ! LOGICAL :: LCPL_GCM ! Flag used to Read/Write some field from/into the restart file for coupling with ARPEGE/ALADIN ! REAL :: XEDB REAL :: XEDC REAL :: XEDD REAL :: XEDK REAL :: XUSURIC REAL :: XUSURID REAL :: XUSURICL REAL :: XVCHRNK REAL :: XVZ0CM REAL :: XRIMAX REAL :: XDELTA_MAX ! Maximum fraction of the foliage covered by intercepted water for high vegetation ! REAL :: XWINDMIN ! minimum wind speed (canopy) ! REAL :: XRZHZ0M REAL :: XVZIUSTAR0 REAL :: XRRSCALE REAL :: XRRGAMMA REAL :: XUTILGUST ! REAL :: XCO2UNCPL ! uncoupled CO2 values (ppmv) ! !----------------------------------------------------------------------------------------------------- ! END MODULE MODD_SURF_ATM