YOM_YGFL Module


Uses

  • module~~yom_ygfl~~UsesGraph module~yom_ygfl YOM_YGFL module~parkind1~2 PARKIND1 module~yom_ygfl->module~parkind1~2

Used by

  • module~~yom_ygfl~~UsedByGraph module~yom_ygfl YOM_YGFL proc~sugfl SUGFL proc~sugfl->module~yom_ygfl module~gfl_subs GFL_SUBS proc~sugfl->module~gfl_subs module~yomgrb YOMGRB proc~sugfl->module~yomgrb proc~su_aerw~2 SU_AERW proc~su_aerw~2->module~yom_ygfl proc~rrtm_ecrt_140gp_mcica RRTM_ECRT_140GP_MCICA proc~rrtm_ecrt_140gp_mcica->module~yom_ygfl proc~sugfl~2 SUGFL proc~sugfl~2->module~yom_ygfl proc~sugfl~2->module~gfl_subs proc~sugfl~2->module~yomgrb proc~su_aerw SU_AERW proc~su_aerw->module~yom_ygfl module~gfl_subs->module~yom_ygfl module~yomgrb~2 YOMGRB module~yomgrb~2->module~yom_ygfl module~gfl_subs~2 GFL_SUBS module~gfl_subs~2->module~yom_ygfl module~yomgrb->module~yom_ygfl proc~suecrad~2 SUECRAD proc~suecrad~2->module~yom_ygfl proc~suecrad SUECRAD proc~suecrad->module~yom_ygfl

Contents


Variables

Type Visibility Attributes Name Initial
integer(kind=JPIM), public, parameter :: JPGFL = 2163
integer(kind=JPIM), public, parameter :: JPNAMED_GFL = 27
integer(kind=JPIM), public, parameter :: JPGHG = 3
integer(kind=JPIM), public, parameter :: JPTRAC = 10
integer(kind=JPIM), public, parameter :: JPCHEM = 66
integer(kind=JPIM), public, parameter :: JPGRG = 5
integer(kind=JPIM), public, parameter :: JPCHEM_ASSIM = 5
integer(kind=JPIM), public, parameter :: JPAERO = 16
integer(kind=JPIM), public, parameter :: JPFORC = 1800
integer(kind=JPIM), public, parameter :: JPERA40 = 14
integer(kind=JPIM), public, parameter :: JPSLDIA = 7
integer(kind=JPIM), public, parameter :: JPEZDIAG = 50
integer(kind=JPIM), public, parameter :: JPCH4S = 2
integer(kind=JPIM), public, parameter :: JPNOGW = 2
integer(kind=JPIM), public, parameter :: JPAEROUT = 17
integer(kind=JPIM), public, parameter :: JPUVP = 2
integer(kind=JPIM), public, parameter :: JPPHYS = 8
integer(kind=JPIM), public, parameter :: GRIB_CODE_GFL_PHYS = 81
type(TYPE_GFLD), public, POINTER :: YGFL => NULL()

Derived Types

type, public, sequence  ::  TYPE_GFL_COMP

Components

Type Visibility Attributes Name Initial
character(len=16), public :: CNAME = ''
integer(kind=JPIM), public :: IGRBCODE = -999
logical, public :: LADV = .FALSE.
logical, public :: LADV5 = .FALSE.
logical, public :: LTDIABLIN = .FALSE.
logical, public :: LHORTURB = .FALSE.
integer(kind=JPIM), public :: NREQIN = 0
logical, public :: LREQOUT = .FALSE.
logical, public :: LGPINGP = .TRUE.
logical, public :: LGP = .FALSE.
logical, public :: LSP = .FALSE.
logical, public :: LCDERS = .FALSE.
logical, public :: LACTIVE = .FALSE.
logical, public :: LTHERMACT = .FALSE.
real(kind=JPRB), public :: R = 0.0_JPRB
real(kind=JPRB), public :: RCP = 0.0_JPRB
logical, public :: LT9 = .FALSE.
logical, public :: LT1 = .FALSE.
logical, public :: LT5 = .FALSE.
logical, public :: LPHY = .FALSE.
logical, public :: LPT = .FALSE.
logical, public :: LTRAJIO = .FALSE.
logical, public :: LDIAG = .FALSE.
logical, public :: LPC = .FALSE.
real(kind=JPRB), public :: REFVALI = 0.0_JPRB
logical, public :: LADJUST0 = .FALSE.
logical, public :: LADJUST1 = .FALSE.
integer(kind=JPIM), public :: NCOUPLING = 0
real(kind=JPRB), public :: REFVALC = 0.0_JPRB
logical, public :: LBIPER = .FALSE.
character(len=12), public :: CSLINT = ''
integer(kind=JPIM), public :: MP = -99999999
integer(kind=JPIM), public :: MPL = -99999999
integer(kind=JPIM), public :: MPM = -99999999
integer(kind=JPIM), public :: MP9 = -99999999
integer(kind=JPIM), public :: MP9_PH = -99999999
integer(kind=JPIM), public :: MP1 = -99999999
integer(kind=JPIM), public :: MP5 = -99999999
integer(kind=JPIM), public :: MP5L = -99999999
integer(kind=JPIM), public :: MP5M = -99999999
integer(kind=JPIM), public :: MPSLP = -99999999
integer(kind=JPIM), public :: MPSP = -99999999
integer(kind=JPIM), public :: MP_SPL = -99999999
integer(kind=JPIM), public :: MP_SL1 = -99999999
integer(kind=JPIM), public :: MP_SLX = -99999999
integer(kind=JPIM), public :: MPPT = -99999999
integer(kind=JPIM), public :: MPPC = -99999999
logical, public :: LWATER
logical, public :: LPRECIP
real(kind=JPRB), public :: RLZER
integer(kind=JPIM), public :: NCOUPLO4
logical, public :: LASSIM
integer(kind=JPIM), public :: IGRIBDV
integer(kind=JPIM), public :: IGRIBTC
integer(kind=JPIM), public :: IGRIBSFC
logical, public :: LDIFF
logical, public :: LCONV
real(kind=JPRB), public :: RMOLMASS
real(kind=JPRB), public :: REFOLD
real(kind=JPRB), public :: HENRYA
real(kind=JPRB), public :: HENRYB
logical, public :: LNEGFIX
logical, public :: LMASSFIX
type(TYPE_GFL_COMP), public, POINTER :: PREVIOUS

type, public, sequence  ::  TYPE_GFL_NAML

Components

Type Visibility Attributes Name Initial
character(len=16), public :: CNAME
integer(kind=JPIM), public :: IGRBCODE
integer(kind=JPIM), public :: NREQIN
real(kind=JPRB), public :: REFVALI
logical, public :: LREQOUT
logical, public :: LGPINGP
logical, public :: LGP
logical, public :: LSP
logical, public :: LCDERS
logical, public :: LT9
logical, public :: LT1
logical, public :: LT5
logical, public :: LPHY
logical, public :: LPT
logical, public :: LTRAJIO
logical, public :: LDIAG
logical, public :: LPC
logical, public :: LADV
logical, public :: LADV5
logical, public :: LINTLIN
logical, public :: LTDIABLIN
logical, public :: LHORTURB
logical, public :: LQM
logical, public :: LQMH
logical, public :: LQM3D
logical, public :: LSLHD
logical, public :: LCOMAD
logical, public :: LHV
logical, public :: LVSPLIP
integer(kind=JPIM), public :: NCOUPLING
real(kind=JPRB), public :: REFVALC
integer(kind=JPIM), public :: NCOUPLO4
logical, public :: LASSIM
integer(kind=JPIM), public :: IGRIBDV
integer(kind=JPIM), public :: IGRIBTC
integer(kind=JPIM), public :: IGRIBSFC
logical, public :: LDIFF
logical, public :: LCONV
logical, public :: LNEGFIX
logical, public :: LMASSFIX
real(kind=JPRB), public :: RMOLMASS
real(kind=JPRB), public :: REFOLD
real(kind=JPRB), public :: HENRYA
real(kind=JPRB), public :: HENRYB

type, public, sequence  ::  TYPE_GFLD

Components

Type Visibility Attributes Name Initial
integer(kind=JPIM), public :: NUMFLDS = 0
integer(kind=JPIM), public :: NDERS = 0
integer(kind=JPIM), public :: NUMSPFLDS = 0
integer(kind=JPIM), public :: NUMGPFLDS = 0
integer(kind=JPIM), public :: NUMFLDS9 = 0
integer(kind=JPIM), public :: NUMFLDS1 = 0
integer(kind=JPIM), public :: NUMSPFLDS1 = 0
integer(kind=JPIM), public :: NUMFLDS5 = 0
integer(kind=JPIM), public :: NUMFLDSPHY = 0
integer(kind=JPIM), public :: NUMFLDS_SPL = 0
integer(kind=JPIM), public :: NUMFLDS_SL1 = 0
integer(kind=JPIM), public :: NUMFLDSPC = 0
integer(kind=JPIM), public :: NDIM = 0
integer(kind=JPIM), public :: NUMFLDSPT = 0
integer(kind=JPIM), public :: NDIM0 = 0
integer(kind=JPIM), public :: NDIM9 = 0
integer(kind=JPIM), public :: NDIM1 = 0
integer(kind=JPIM), public :: NDIM5 = 0
integer(kind=JPIM), public :: NDIMSLP = 0
integer(kind=JPIM), public :: NDIM_SPL = 0
integer(kind=JPIM), public :: NDIMPT = 0
integer(kind=JPIM), public :: NDIMPC = 0
integer(kind=JPIM), public :: NGFL_EXT
integer(kind=JPIM), public :: NGFL_FORC
integer(kind=JPIM), public :: NGFL_EZDIAG
integer(kind=JPIM), public :: NGHG
integer(kind=JPIM), public :: NTRAC
integer(kind=JPIM), public :: NGRG
integer(kind=JPIM), public :: NGRG_CPLO4
integer(kind=JPIM), public :: NGRG_ASSIM
integer(kind=JPIM), public :: NAERO
integer(kind=JPIM), public :: NACTAERO
integer(kind=JPIM), public :: NDDHAERO
integer(kind=JPIM), public :: NERA40
integer(kind=JPIM), public :: NNOGW
integer(kind=JPIM), public :: NAEROUT
integer(kind=JPIM), public :: NUVP
integer(kind=JPIM), public :: NSLDIA
integer(kind=JPIM), public :: NSLDIAGP
integer(kind=JPIM), public :: NGFL_PHYS
logical, public :: LCO2SFC
logical, public :: LCH4SFC
logical, public :: LAEROSFC
logical, public :: LFIRE
logical, public :: LAERODIU
logical, public :: LTRCMFIX
logical, public :: LTRCMFIX_PS
logical, public :: LAEROUT
logical, public :: LUVPOUT
logical, public :: LCHEM
integer(kind=JPIM), public :: NGEMS
integer(kind=JPIM), public :: NCHEM
integer(kind=JPIM), public :: NCHEM_ASSIM
integer(kind=JPIM), public :: NCHEM_FLX
integer(kind=JPIM), public :: NCHEM_DV
integer(kind=JPIM), public :: NCHEM_TC
integer(kind=JPIM), public :: NCHEM_SCV
integer(kind=JPIM), public :: NNEGAFIX
integer(kind=JPIM), public :: NOPTNEGFIX
logical, public :: LQM3DCONS
logical, public :: LADVNEGFIX
logical, public :: LTRCMFBC
logical, public :: LTRCMFPR
logical, public :: LTRCMFMG
logical, public :: LEXTRADF
integer(kind=JPIM), public :: NFLDSFIX
integer(kind=JPIM), public :: NOPTMFIX
integer(kind=JPIM), public :: NOPTVFE
integer(kind=JPIM), public :: NPMFIX
integer(kind=JPIM), public :: NMFDIAGLEV
integer(kind=JPIM), public :: NMFIXFLDS(JPNAMED_GFL+JPGHG+JPGRG+JPCHEM+JPAERO+JPTRAC)
integer(kind=JPIM), public :: NNEGFLDS(JPNAMED_GFL+JPGHG+JPGRG+JPCHEM+JPAERO+JPTRAC)
real(kind=JPRB), public :: ZMFIXEPS
type(TYPE_GFL_COMP), public :: YCOMP(JPGFL)
type(TYPE_GFL_COMP), public, POINTER :: YQ => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YI => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YL => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YLCONV => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YICONV => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YRCONV => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YSCONV => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YIRAD => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YLRAD => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YS => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YR => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YG => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YH => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YTKE => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YTTE => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YEFB1 => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YEFB2 => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YEFB3 => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YA => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YO3 => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YSRC => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YMXL => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YSCC2 => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YGCCA => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YCPF => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YSPF => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YCVGQ => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YQVA => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YGHG(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YGRG(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YCHEM(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YGRGTEND(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YAERO(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YTRAC(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YLRCH4 => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YCH4S => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YFORC(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YEZDIAG(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YERA40(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YNOGW(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YSLDIA(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YAEROUT(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YUVP(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YPHYS(:) => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YSDSAT => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YCVV => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YRKTH => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YRKTQV => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YRKTQC => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YUOM => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YUAL => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YDOM => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YDAL => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YUEN => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YUNEBH => NULL()
type(TYPE_GFL_COMP), public, POINTER :: YEXT(:) => NULL()
type(TYPE_GFL_NAML), public :: YQ_NL
type(TYPE_GFL_NAML), public :: YI_NL
type(TYPE_GFL_NAML), public :: YL_NL
type(TYPE_GFL_NAML), public :: YLCONV_NL
type(TYPE_GFL_NAML), public :: YICONV_NL
type(TYPE_GFL_NAML), public :: YRCONV_NL
type(TYPE_GFL_NAML), public :: YSCONV_NL
type(TYPE_GFL_NAML), public :: YIRAD_NL
type(TYPE_GFL_NAML), public :: YLRAD_NL
type(TYPE_GFL_NAML), public :: YS_NL
type(TYPE_GFL_NAML), public :: YR_NL
type(TYPE_GFL_NAML), public :: YG_NL
type(TYPE_GFL_NAML), public :: YH_NL
type(TYPE_GFL_NAML), public :: YTKE_NL
type(TYPE_GFL_NAML), public :: YTTE_NL
type(TYPE_GFL_NAML), public :: YEFB1_NL
type(TYPE_GFL_NAML), public :: YEFB2_NL
type(TYPE_GFL_NAML), public :: YEFB3_NL
type(TYPE_GFL_NAML), public :: YA_NL
type(TYPE_GFL_NAML), public :: YO3_NL
type(TYPE_GFL_NAML), public :: YSRC_NL
type(TYPE_GFL_NAML), public :: YMXL_NL
type(TYPE_GFL_NAML), public :: YSCC2_NL
type(TYPE_GFL_NAML), public :: YGCCA_NL
type(TYPE_GFL_NAML), public :: YCPF_NL
type(TYPE_GFL_NAML), public :: YSPF_NL
type(TYPE_GFL_NAML), public :: YCVGQ_NL
type(TYPE_GFL_NAML), public :: YQVA_NL
type(TYPE_GFL_NAML), public :: YGHG_NL(JPGHG)
type(TYPE_GFL_NAML), public :: YGRG_NL(JPGRG)
type(TYPE_GFL_NAML), public :: YCHEM_NL(JPCHEM)
type(TYPE_GFL_NAML), public :: YGRGTEND_NL(JPGRG)
type(TYPE_GFL_NAML), public :: YAERO_NL(JPAERO)
type(TYPE_GFL_NAML), public :: YTRAC_NL(JPTRAC)
type(TYPE_GFL_NAML), public :: YERA40_NL(JPERA40)
type(TYPE_GFL_NAML), public :: YNOGW_NL(JPNOGW)
type(TYPE_GFL_NAML), public :: YSLDIA_NL(JPSLDIA)
type(TYPE_GFL_NAML), public :: YLRCH4_NL
type(TYPE_GFL_NAML), public :: YCH4S_NL
type(TYPE_GFL_NAML), public :: YAEROUT_NL(JPAEROUT)
type(TYPE_GFL_NAML), public :: YUVP_NL(JPUVP)
type(TYPE_GFL_NAML), public :: YRKTH_NL
type(TYPE_GFL_NAML), public :: YRKTQV_NL
type(TYPE_GFL_NAML), public :: YRKTQC_NL
type(TYPE_GFL_NAML), public :: YPHYS_NL(JPPHYS)
type(TYPE_GFL_NAML), public :: YSDSAT_NL
type(TYPE_GFL_NAML), public :: YCVV_NL
type(TYPE_GFL_NAML), public :: YFORC_NL(JPFORC)
type(TYPE_GFL_NAML), public :: YEZDIAG_NL(JPEZDIAG)
type(TYPE_GFL_NAML), public :: YEXT_NL(JPGFL-JPNAMED_GFL-JPGHG-JPGRG-JPFORC-JPEZDIAG-JPAERO-JPTRAC-JPERA40-JPNOGW-JPSLDIA-JPCH4S-JPAEROUT-JPUVP-JPCHEM-JPPHYS)
type(TYPE_GFL_NAML), public :: YUOM_NL
type(TYPE_GFL_NAML), public :: YUAL_NL
type(TYPE_GFL_NAML), public :: YDOM_NL
type(TYPE_GFL_NAML), public :: YDAL_NL
type(TYPE_GFL_NAML), public :: YUEN_NL
type(TYPE_GFL_NAML), public :: YUNEBH_NL