modn_trip_oasis.F90

Go to the documentation of this file.

!###############
MODULE modn_trip_oasis
!###############
!
!!****  *MODN_TRIP_OASIS - declaration of namelist 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
!
!-------------------------------------------------------------------------------
!
! *  Land surface variables for Trip - Oasis coupling
!
!-------------------------------------------------------------------------------
!
REAL             :: xtstep_cpl_land = -1.0     ! Coupling time step 
!
! Input variables
!
 CHARACTER(LEN=8) :: crunoff     = '        '   ! Surface runoff 
 CHARACTER(LEN=8) :: cdrain      = '        '   ! Deep drainage 
 CHARACTER(LEN=8) :: ccalving    = '        '   ! Calving flux
 CHARACTER(LEN=8) :: csrcflood   = '        '   ! Floodplains freshwater flux
!
! Output variables
!
 CHARACTER(LEN=8) :: cfflood     = '        '   ! Floodplains fraction  
 CHARACTER(LEN=8) :: cpiflood    = '        '   ! Flood potential infiltartion  
 CHARACTER(LEN=8) :: cwtd        = '        '   ! Water table depth  
 CHARACTER(LEN=8) :: cfwtd       = '        '   ! Grid-cell fraction of WTD to rise  
!
!-------------------------------------------------------------------------------
!
! * Sea variables for Trip - Oasis coupling
!
!-------------------------------------------------------------------------------
!
REAL             :: xtstep_cpl_sea = -1.0   ! Coupling time step
!
 CHARACTER(LEN=8) :: crivdis  = '        '   ! River discharges to ocean
 CHARACTER(LEN=8) :: ccalvgre = '        '   ! Calving flux over greenland
 CHARACTER(LEN=8) :: ccalvant = '        '   ! Calving flux over antarctica
!
!-------------------------------------------------------------------------------
!
!*       1.    NAMELISTS TRIP COUPLED WITH A LAND SURFACE MODEL
!              ------------------------------------------------
!
NAMELIST/nam_trip_land_cpl/xtstep_cpl_land,crunoff,cdrain, &
                           cfflood,cpiflood,cwtd,cfwtd,    &
                           ccalving,csrcflood
!
!
!*       2.    NAMELISTS TRIP COUPLED WITH A OCEANIC GENERAL CIRCULATION MODEL
!              ---------------------------------------------------------------
!
NAMELIST/nam_trip_sea_cpl/xtstep_cpl_sea,crivdis,ccalvgre,ccalvant
!
!-------------------------------------------------------------------------------
!
END MODULE modn_trip_oasis