ISBA_OPTIONS_t Derived Type

type, public :: ISBA_OPTIONS_t


Contents

Source Code


Components

TypeVisibility AttributesNameInitial
logical, public :: LECOCLIMAP
logical, public :: LPAR
integer, public :: NPATCH
integer, public :: NGROUND_LAYER
character(len=3), public :: CISBA
character(len=4), public :: CPEDOTF
character(len=3), public :: CPHOTO
real, public, POINTER, DIMENSION(:):: XSOILGRID
logical, public :: LTR_ML
real, public :: XRM_PATCH
logical, public :: LSOCP
logical, public :: LCTI
logical, public :: LPERM
logical, public :: LNOF
character(len=4), public :: CTYPE_HVEG
character(len=4), public :: CTYPE_LVEG
character(len=4), public :: CTYPE_NVEG
character(len=5), public :: CTYP_COV
integer, public :: NNBIOMASS
integer, public :: NNLITTER
integer, public :: NNLITTLEVS
integer, public :: NNSOILCARB
logical, public, POINTER, DIMENSION(:):: LMEB_PATCH
logical, public :: LFORC_MEASURE
logical, public :: LMEB_LITTER
logical, public :: LMEB_GNDRES
logical, public :: LCANOPY
character(len=3), public :: CRESPSL
character(len=4), public :: CC1DRY
character(len=4), public :: CSCOND
character(len=3), public :: CSOILFRZ
character(len=4), public :: CDIFSFCOND
character(len=3), public :: CSNOWRES
character(len=4), public :: CALBEDO
character(len=3), public :: CCPSURF
real, public :: XOUT_TSTEP
real, public :: XTSTEP
real, public :: XCGMAX
real, public :: XCDRAG
logical, public :: LGLACIER
logical, public :: LCANOPY_DRAG
logical, public :: LVEGUPD
logical, public :: LPERTSURF
integer, public :: NLAYER_HORT
integer, public :: NLAYER_DUN
character(len=4), public :: CRUNOFF
character(len=3), public :: CKSAT
logical, public :: LSOC
character(len=3), public :: CRAIN
character(len=3), public :: CHORT
logical, public :: LNITRO_DILU
logical, public :: LSPINUPCARBS
logical, public :: LSPINUPCARBW
real, public :: XSPINMAXS
real, public :: XSPINMAXW
real, public :: XCO2_START
real, public :: XCO2_END
integer, public :: NNBYEARSPINS
integer, public :: NNBYEARSPINW
integer, public :: NNBYEARSOLD
integer, public :: NSPINS
integer, public :: NSPINW
logical, public :: LAGRI_TO_GRASS
logical, public :: LSNOWDRIFT
logical, public :: LSNOWDRIFT_SUBLIM
logical, public :: LSNOW_ABS_ZENITH
character(len=3), public :: CSNOWMETAMO
character(len=3), public :: CSNOWRAD
logical, public :: LFLOOD
logical, public :: LWTD
logical, public :: LCPL_RRM
logical, public :: LTEMP_ARP
integer, public :: NTEMPLAYER_ARP
real, public, POINTER, DIMENSION(:):: XSODELX

Source Code

TYPE ISBA_OPTIONS_t
!
! *  General PGD options
!
LOGICAL :: LECOCLIMAP         ! T: parameters computed from ecoclimap
!                             ! F: they are read in the file
!
LOGICAL :: LPAR               ! T: parameters computed from ecoclimap
!                             ! F: they are read in the file
!
INTEGER :: NPATCH             ! maximum number of sub-tiles (patches)
!                             ! used at any grid point within a 
!                             ! natural surface fraction
INTEGER :: NGROUND_LAYER      ! number of ground layers
!
 CHARACTER(LEN=3) :: CISBA    ! type of ISBA version:
!                             ! '2-L' (default)
!                             ! '3-L'
!                             ! 'DIF'
 CHARACTER(LEN=4) :: CPEDOTF  ! NOTE: Only used when HISBA = DIF
!                             ! 'CH78' = Clapp and Hornberger 1978 for BC (Default)
!                             ! 'CO84' = Cosby et al. 1988 for BC
 CHARACTER(LEN=3) :: CPHOTO   ! type of photosynthesis
!                             ! 'NON'
!                             ! 'AST'
!                             ! 'NIT'
!                             ! 'NCB'
!
REAL, POINTER, DIMENSION(:)  :: XSOILGRID   ! Soil layer grid as reference for DIF
!
LOGICAL :: LTR_ML             ! new radiative transfert
!
REAL :: XRM_PATCH             ! threshold to remove little fractions of patches 
!
LOGICAL :: LSOCP              ! Soil organic carbon profile data
LOGICAL :: LCTI               ! Topographic index data
LOGICAL :: LPERM              ! Permafrost distribution data
LOGICAL :: LNOF  
!
! Type of vegetation (simplification of vegetation charaterization)
!
CHARACTER(LEN=4)             :: CTYPE_HVEG   ! type of high vegetation
CHARACTER(LEN=4)             :: CTYPE_LVEG   ! type of low vegetation
CHARACTER(LEN=4)             :: CTYPE_NVEG   ! type of bare soil (no vegetation)
CHARACTER(LEN=5)             :: CTYP_COV     ! type of green roof
!
! * AGS and Carbon PGD options
!
INTEGER :: NNBIOMASS    ! number of biomass pools
INTEGER :: NNLITTER     ! number of litter pools
INTEGER :: NNLITTLEVS   ! number of litter levels
INTEGER :: NNSOILCARB   ! number of soil carbon pools  
!
! * PGD MEB OPTIONS
!
LOGICAL, POINTER, DIMENSION(:) :: LMEB_PATCH  ! Vector with T/F values
                                              ! True = treat patch with multi-energy balance 
                                              ! False = treat patch with classical ISBA 
LOGICAL                        :: LFORC_MEASURE ! True = Forcing data from observations
!                                               ! False = Forcing data from atmospheric model (default)
LOGICAL                        :: LMEB_LITTER ! Activate Litter
LOGICAL                        :: LMEB_GNDRES ! Activate Ground Resistance
!
! * General PREP options
!
LOGICAL :: LCANOPY ! T: SBL scheme within the canopy
!                  ! F: no atmospheric layers below forcing level
!
! * Carbon PREP options
 CHARACTER(LEN=3) :: CRESPSL  ! Soil respiration
!                             ! 'DEF' = Default: Norman (1992)
!                             ! 'PRM' = New Parameterization
!                             ! 'CNT' = CENTURY model (Gibelin 2007)
!
!
! * General MODEL options
!
 CHARACTER(LEN=4) :: CC1DRY   ! C1 formulation for dry soils
!                             ! 'DEF ' = DEFault: Giard-Bazile formulation
!                             ! 'GB93' = Giordani 1993, Braud 1993 
!                             ! discontinuous at WILT
 CHARACTER(LEN=4) :: CSCOND   ! Thermal conductivity
!                             ! 'DEF ' = DEFault: NP89 implicit method
!                             ! 'PL98' = Peters-Lidard et al. 1998 used
!                             ! for explicit computation of CG
 CHARACTER(LEN=3) :: CSOILFRZ ! soil freezing-physics option
!                             ! 'DEF' = Default (Boone et al. 2000; 
!                             !        Giard and Bazile 2000)
!                             ! 'LWT' = Phase changes as above,
!                             !         but relation between unfrozen 
!                             !         water and temperature considered
 CHARACTER(LEN=4) :: CDIFSFCOND ! Mulch effects
!                               ! 'MLCH' = include the insulating effect of
!                               ! leaf litter/mulch on the surf. thermal cond.
!                               ! 'DEF ' = no mulch effect
!                               NOTE: Only used when YISBA = DIF
 CHARACTER(LEN=3) :: CSNOWRES   ! Turbulent exchanges over snow
!                               ! 'DEF' = Default: Louis (ISBA)
!                               ! 'RIL' = Maximum Richardson number limit
!                               !         for stable conditions ISBA-SNOW3L
!                               !         turbulent exchange option
 CHARACTER(LEN=4) :: CALBEDO    ! albedo type
!                               ! 'DRY ' 
!                               ! 'EVOL' 
!                               ! 'WET ' 
!                               ! 'USER' 
!                            NOTE that when using the YISBA='DIF' multi-layer soil option,
!                            the 'LWT' method is used. It is only an option
!                            when using the force-restore soil method ('2-L' or '3-L')
 CHARACTER(LEN=3) :: CCPSURF    ! specific heat at surface
!                               ! 'DRY' = default value (dry Cp)
!                               ! 'HUM' = Cp as a fct of specific humidity  
!
REAL :: XOUT_TSTEP              ! ISBA output writing time step
REAL :: XTSTEP                  ! ISBA time step
REAL :: XCGMAX                  ! maximum soil heat capacity
REAL :: XCDRAG                  ! drag coefficient in canopy
!
LOGICAL :: LGLACIER             ! True = Over permanent snow and ice, 
!                                 initialise WGI=WSAT,
!                                 Hsnow>=10m and allow 0.8<SNOALB<0.85
                                ! False = No specific treatment
LOGICAL :: LCANOPY_DRAG         ! T: drag activated in SBL scheme within the canopy
!                               ! F: no drag activated in SBL atmospheric layers
LOGICAL :: LVEGUPD              ! True = update vegetation parameters every decade
LOGICAL :: LPERTSURF            ! True  = apply random perturbations for ensemble prediction
                                ! False = no random perturbation (default)
!
!
! * SGH model options
!
! - Adjustable physical parameters
!
INTEGER :: NLAYER_HORT
INTEGER :: NLAYER_DUN
!
! - Sub-grid hydrology and vertical hydrology
!                                                     
 CHARACTER(LEN=4) :: CRUNOFF ! surface runoff formulation
!                            ! 'WSAT'
!                            ! 'DT92'
!                            ! 'SGH ' Topmodel
!                                                     
 CHARACTER(LEN=3) :: CKSAT   ! ksat
!                            ! 'DEF' = default value 
!                            ! 'SGH' = profil exponentiel
!                                           
LOGICAL :: LSOC              ! soil organic carbon effect
!                            ! False = default value 
!                            ! True  = soil SOC profil
!
 CHARACTER(LEN=3) :: CRAIN   ! Rainfall spatial distribution
                             ! 'DEF' = No rainfall spatial distribution
                             ! 'SGH' = Rainfall exponential spatial distribution
                             ! 
!
 CHARACTER(LEN=3) :: CHORT   ! Horton runoff
                             ! 'DEF' = no Horton runoff
                             ! 'SGH' = Horton runoff
!
! * AGS and carbon options
!
LOGICAL :: LNITRO_DILU          ! nitrogen dilution fct of CO2 (Calvet et al. 2008)
                                ! False = keep vegetation parameters constant in time
!
LOGICAL  :: LSPINUPCARBS  ! T: do the soil carb spinup, F: no
LOGICAL  :: LSPINUPCARBW  ! T: do the wood carb spinup, F: no  
REAL :: XSPINMAXS         ! max number of times CARBON_SOIL subroutine is
                          ! called for each timestep in simulation during
                          ! acceleration procedure number                             
REAL :: XSPINMAXW         ! max number of times the wood is accelerated  
REAL :: XCO2_START        ! Pre-industrial CO2 concentration
REAL :: XCO2_END          ! Begin-transient CO2 concentration
INTEGER :: NNBYEARSPINS   ! nbr years needed to reaches soil equilibrium 
INTEGER :: NNBYEARSPINW   ! nbr years needed to reaches wood equilibrium
INTEGER :: NNBYEARSOLD    ! nbr years executed at curent time step
INTEGER :: NSPINS         ! number of times the soil is accelerated
INTEGER :: NSPINW         ! number of times the wood is accelerated
!
LOGICAL :: LAGRI_TO_GRASS ! During soil carbon spinup with ISBA-CC, 
                          ! grass parameters are attributed to all agricultural PFT
!
! * Snow model options
!                                           
LOGICAL :: LSNOWDRIFT, LSNOWDRIFT_SUBLIM ! Logicals for snowdrift and sublimation

LOGICAL :: LSNOW_ABS_ZENITH  ! if True modify solar absorption as a function of solar zenithal angle
                             ! (physically wrong but better results in polar regions when CSNOWRAD=B92)
! Scheme of snow metamorphism (Crocus)
 CHARACTER(3) :: CSNOWMETAMO ! B92 (historical version, Brun et al 92), C13, T07, F06 (see Carmagnola et al 2014)
!
! radiative transfer scheme in snow (Crocus)
 CHARACTER(3) :: CSNOWRAD    ! B92 (historical version, Brun et al 92), TAR, TA1, TA2 (see Libois et al 2013)
!
! * Other options
!
LOGICAL :: LFLOOD       ! Activation of the flooding scheme
LOGICAL :: LWTD         ! Activation of Water table depth coupling
LOGICAL :: LCPL_RRM     ! Activation of the coupling
!
LOGICAL :: LTEMP_ARP      ! True  = time-varying force-restore soil temperature (as in ARPEGE)
                          ! False = No time-varying force-restore soil temperature (Default
INTEGER :: NTEMPLAYER_ARP ! Number of force-restore soil temperature layer, including Ts (Default = 4)
                          ! Only used if LTEMP_ARP=True
REAL, POINTER, DIMENSION(:) ::  XSODELX       ! Pulsation for each layer (Only used if LTEMP_ARP=True)
!
END TYPE ISBA_OPTIONS_t