modd_sfx_oasis.F90

Go to the documentation of this file.

!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-C licence
!SFX_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt  
!SFX_LIC for details. version 1.
!###############
MODULE modd_sfx_oasis
!###############
!
!!****  *MODD_SFX_OASIS - declaration of variable for SFX-OASIS coupling
!!
!!    PURPOSE
!!    -------
!
!!
!!**  IMPLICIT ARGUMENTS
!!    ------------------
!!      None 
!!
!!    REFERENCE
!!    ---------
!!
!!    AUTHOR
!!    ------
!!      B. Decharme   *Meteo France*
!!
!!    MODIFICATIONS
!!    -------------
!!      Original       10/13
!!      S.Senesi       08/2015 : add CMODEL_NAME
!!    10/2016 B. Decharme : bug surface/groundwater coupling 
!
!*       0.   DECLARATIONS
!             ------------
!
IMPLICIT NONE
!
!-------------------------------------------------------------------------------
!
! * Surfex - Oasis coupling general key :
!
!-------------------------------------------------------------------------------
!
LOGICAL             :: loasis   = .false. ! To use oasis coupler or not
!
 CHARACTER(LEN=6)    :: cmodel_name        ! component model name (i.e. name under which 
!                                         ! Surfex is declared to Oasis)
!
REAL                :: xruntime = 0.0     ! Total simulated time in oasis namcouple (s)
!
!-------------------------------------------------------------------------------
!
! * Land surface variables for Surfex - Oasis coupling
!
!-------------------------------------------------------------------------------
!
LOGICAL             :: lcpl_land    = .false. ! Fields to/from surfex land area
LOGICAL             :: lcpl_calving = .false. ! Calving flux from surfex land area
LOGICAL             :: lcpl_gw      = .false. ! Fields to/from surfex land area to/from groundwater scheme
LOGICAL             :: lcpl_flood   = .false. ! Fields to/from surfex land area to/from floodplains scheme
!
! Output variables
!
INTEGER             :: nrunoff_id    ! Surface runoff id
INTEGER             :: ndrain_id     ! Drainage id
INTEGER             :: ncalving_id   ! Calving flux id
INTEGER             :: nsrcflood_id  ! Floodplains freshwater flux id
!
! Input variables
!
INTEGER             :: nwtd_id       ! water table depth id
INTEGER             :: nfwtd_id      ! grid-cell fraction of water table rise id
INTEGER             :: nfflood_id    ! Floodplains fraction id
INTEGER             :: npiflood_id   ! Potential flood infiltration id
!
!-------------------------------------------------------------------------------
!
! * Lake variables for Surfex - Oasis coupling
!
!-------------------------------------------------------------------------------
!
LOGICAL             :: lcpl_lake    = .false. ! Fields to/from surfex lake area
!
! Output variables
!
INTEGER             :: nlake_evap_id ! Evaporation id
INTEGER             :: nlake_rain_id ! Rainfall id
INTEGER             :: nlake_snow_id ! Snowfall id
INTEGER             :: nlake_watf_id ! Freshwater id
!
!-------------------------------------------------------------------------------
!
! * Sea variables for Surfex - Oasis coupling 
!
!-------------------------------------------------------------------------------
!
LOGICAL             :: lcpl_sea     = .false. ! Fields to/from surfex sea/water area
LOGICAL             :: lcpl_seaice  = .false. ! Fields to/from surfex sea-ice area (e.g. GELATO 3D, ...)
!
! Sea Output variables
!
INTEGER             :: nsea_fwsu_id ! zonal wind stress id
INTEGER             :: nsea_fwsv_id ! meridian wind stress id
INTEGER             :: nsea_heat_id ! Non solar net heat flux id
INTEGER             :: nsea_snet_id ! Solar net heat flux id
INTEGER             :: nsea_wind_id ! 10m wind speed id
INTEGER             :: nsea_fwsm_id ! wind stress id
INTEGER             :: nsea_evap_id ! Evaporation id
INTEGER             :: nsea_rain_id ! Rainfall id
INTEGER             :: nsea_snow_id ! Snowfall id
INTEGER             :: nsea_watf_id ! Freshwater id
!
! Sea-ice Output variables
!
INTEGER             :: nseaice_heat_id ! Sea-ice non solar net heat flux id
INTEGER             :: nseaice_snet_id ! Sea-ice solar net heat flux id
INTEGER             :: nseaice_evap_id ! Sea-ice sublimation id
!
! Sea Input variables
!
INTEGER             :: nsea_sst_id ! Sea surface temperature id
INTEGER             :: nsea_ucu_id ! Sea u-current stress id
INTEGER             :: nsea_vcu_id ! Sea v-current stress id
!
! Sea-ice Input variables
!
INTEGER             :: nseaice_sit_id  ! Sea-ice Temperature id
INTEGER             :: nseaice_cvr_id  ! Sea-ice cover id
INTEGER             :: nseaice_alb_id  ! Sea-ice albedo id
!
!-------------------------------------------------------------------------------
!
END MODULE modd_sfx_oasis