TEPHY Derived Type

type, public :: TEPHY

! LOGICAL :: LEPHYS ! LOGICAL :: LECOND ! LOGICAL :: LECUMF ! LOGICAL :: LEDCLD ! LOGICAL :: LEEVAP ! LOGICAL :: LEGWDG ! LOGICAL :: LEGWWMS ! LOGICAL :: LEOZOC ! LOGICAL :: LEQNGT ! LOGICAL :: LERADI ! LOGICAL :: LERADS ! LOGICAL :: LESICE ! LOGICAL :: LESURF ! LOGICAL :: LEVDIF ! LOGICAL :: LAGPHY ! LOGICAL :: LEPCLD ! LOGICAL :: LEO3CH ! LOGICAL :: LO3CH_SAFE ! LOGICAL :: LO3CH_OLDVER ! LOGICAL :: LO3CH_BMS ! LOGICAL :: LO3CH_HLO ! CHARACTER(LEN=4) :: CO3CHEM ! LOGICAL :: LECO2DIU ! LOGICAL :: LNEEONLINE ! LOGICAL :: LBUD23 ! LOGICAL :: LPPTILES ! LOGICAL :: LBUDCYCLE ! LOGICAL :: LEMETHOX ! LOGICAL :: LECURR ! LOGICAL :: LESURFTRAJ ! LOGICAL :: LVDFTRAC ! LOGICAL :: LMFTRAC ! LOGICAL :: LMFSCAV ! LOGICAL :: LERAIN ! LOGICAL :: LEMWAVE ! LOGICAL :: LEGBRAD ! LOGICAL :: LERAINGG ! LOGICAL :: LESMOS ! LOGICAL :: LESMAP ! LOGICAL :: LEOCWA ! LOGICAL :: LEOCCO ! LOGICAL :: LEOCSA ! LOGICAL :: LEOCLA ! LOGICAL :: LEVGEN ! LOGICAL :: LESSRO ! LOGICAL :: LEFLAKE ! LOGICAL :: LEOCML ! LOGICAL :: LEOBC ! LOGICAL :: LEOBCMAX ! REAL(KIND=JPRB) :: REOBCMAX ! LOGICAL :: LEOBCICE ! LOGICAL :: LEOCLAKE ! LOGICAL :: LEOLAKESST ! LOGICAL :: LOCMLTKE ! LOGICAL :: LECLIPQT0 ! LOGICAL :: LECLIPCLDT0 ! LOGICAL :: LDUCTDIA ! LOGICAL :: LDIAGTURB_EC ! LOGICAL :: LDIAGTURBGRAD_EC

! LOGICAL :: LSLPHY ! Moved from YOMCT0 /MH ! LOGICAL :: LESN09 ! LOGICAL :: LELAIV ! LOGICAL :: LECTESSEL ! LOGICAL :: LEAGS ! LOGICAL :: LSPCRM ! LOGICAL :: LELIGHT ! REAL(KIND=JPRB) :: RTHRFRTI ! REAL(KIND=JPRB) :: RCIMIN ! REAL(KIND=JPRB) :: RLAIINT ! INTEGER (KIND=JPIM) :: NPRACCL ! INTEGER (KIND=JPIM) :: NLIMODE ! LOGICAL :: LECLIM10D ! 10-day clim interpolation ! LOGICAL :: LESNML ! INTEGER (KIND=JPIM) :: NSNMLWS

! LOGICAL :: LBFASCO2

! INTEGER(KIND=JPIM) :: NCO2CLIMYY1 ! INTEGER(KIND=JPIM) :: NCO2CLIMYY2 ! INTEGER(KIND=JPIM) :: NCO2CLIMN1 ! INTEGER(KIND=JPIM) :: NCO2CLIMN2 ! INTEGER(KIND=JPIM) :: NCO2CLIMFRQ


Contents

Variables

Type-Bound Procedures


Components

Type Visibility Attributes Name Initial
integer(kind=JPIM), public :: NALBEDOSCHEME
integer(kind=JPIM), public :: NEMISSSCHEME

! REAL(KIND=JPRB) :: RALFMINPSN

! REAL(KIND=JPRB) :: RNORTHML ! REAL(KIND=JPRB) :: RSOUTHML ! REAL(KIND=JPRB) :: RWESTML ! REAL(KIND=JPRB) :: REASTML

! LOGICAL :: INVML ! LOGICAL :: LFPOS_EC_PHYS = .FALSE. ! LOGICAL :: LFPOS_ACC_RESET

! LOGICAL :: LRAD_CLOUD_INHOMOG

! TYPE(C_PTR) :: YSURF

Type-Bound Procedures

procedure, public, PASS :: PRINT => PRINT_CONFIGURATION

  • public subroutine PRINT_CONFIGURATION(SELF, KDEPTH, KOUTNO)

    Arguments

    Type IntentOptional Attributes Name
    class(TEPHY), intent(in) :: SELF
    integer, intent(in) :: KDEPTH
    integer, intent(in) :: KOUTNO