modd_trip_oasis.F90

Go to the documentation of this file.

!###############
MODULE modd_trip_oasis
!###############
!
!!****  *MODD_TRIP_OASIS - declaration of variable for TRIP-OASIS coupling
!!
!!    PURPOSE
!!    -------
!
!!
!!**  IMPLICIT ARGUMENTS
!!    ------------------
!!      None 
!!
!!    REFERENCE
!!    ---------
!!
!!    AUTHOR
!!    ------
!!      B. Decharme   *Meteo France*
!!
!!    MODIFICATIONS
!!    -------------
!!      Original       10/13
!!      B. Decharme 10/2016  bug surface/groundwater coupling
!
!*       0.   DECLARATIONS
!             ------------
!
IMPLICIT NONE
!
!-------------------------------------------------------------------------------
!
! * Trip - Oasis coupling general key :
!
!-------------------------------------------------------------------------------
!
LOGICAL             :: lcpl_land    = .false. ! Fields from trip to land surface model (e.g. SURFEX, ...)
LOGICAL             :: lcpl_calving = .false. ! Calving flux from land surface glacier
LOGICAL             :: lcpl_gw      = .false. ! Fields for/from trip groundwater scheme
LOGICAL             :: lcpl_flood   = .false. ! Fields for/from trip floodplains scheme
LOGICAL             :: lcpl_sea     = .false. ! Fields from trip to ocean model (e.g. NEMO, ...)
LOGICAL             :: lcpl_calvsea = .false. ! Calving fluxes from trip to ocean model (e.g. NEMO, ...)
!
!-------------------------------------------------------------------------------
!
! *  Land surface variables for Trip - Oasis coupling
!
!-------------------------------------------------------------------------------
!
! Input 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
!
! Output variables
!
INTEGER             :: nfflood_id    ! Floodplains fraction id
INTEGER             :: npiflood_id   ! Potential flood infiltration id
INTEGER             :: nwtd_id       ! Water table depth id
INTEGER             :: nfwtd_id      ! grid-cell fraction of WTD to rise id
!
!-------------------------------------------------------------------------------
!
! * Sea variables for Trip - Oasis coupling
!
!-------------------------------------------------------------------------------
!
! Output variables
!
INTEGER             :: nrivdis_id    ! River discharge id
INTEGER             :: ncalvgre_id   ! Calving flux over greenland id
INTEGER             :: ncalvant_id   ! Calving flux over antarctica id
!
!-------------------------------------------------------------------------------
!
END MODULE modd_trip_oasis