OCEAN_REL_t Derived Type

  1. modd_ocean_reln.F90
  2. MODD_OCEAN_REL_n
  3. OCEAN_REL_t

type, public :: OCEAN_REL_t


Contents

Variables

Source Code

OCEAN_REL_t

Components

TypeVisibility AttributesNameInitial
real, public :: XTAU_REL
real, public :: XQCORR
logical, public :: LREL_CUR
logical, public :: LREL_TS
logical, public :: LFLUX_NULL
logical, public :: LFLX_CORR
logical, public :: LDIAPYCNAL
real, public, POINTER, DIMENSION(:,:):: XSEAU_REL
real, public, POINTER, DIMENSION(:,:):: XSEAV_REL
real, public, POINTER, DIMENSION(:,:):: XSEAT_REL
real, public, POINTER, DIMENSION(:,:):: XSEAS_REL

Source Code

TYPE OCEAN_REL_t
!
 REAL                :: XTAU_REL   ! Time of relaxation  (s)
!
 REAL                :: XQCORR     ! correction coefficient  for surface fluxes  (BArnier et al. 1998) typcial val: 100.
!
 LOGICAL                            :: LREL_CUR   ! flag for  relxation on current
 LOGICAL                            :: LREL_TS    ! flag for relaxation on ocean temperature
 LOGICAL                            :: LFLUX_NULL ! Flag for testing zero  incoming flux at the surface 
!
 LOGICAL                            :: LFLX_CORR  ! Flag for  flux  correction 
 LOGICAL                            :: LDIAPYCNAL ! Flag for diapycnal mixing activation
!
 REAL, POINTER, DIMENSION(:,:) :: XSEAU_REL  ! ref. U current  profile (C)
 REAL, POINTER, DIMENSION(:,:) :: XSEAV_REL  ! ref. V current  profile (C)
 REAL, POINTER, DIMENSION(:,:) :: XSEAT_REL  ! ref. temperature  profile (C)
 REAL, POINTER, DIMENSION(:,:) :: XSEAS_REL  ! ---- salinity   ---------- (%)
!
END TYPE OCEAN_REL_t