YOESRTA20 Module

** YOESRTA20 - SRTM COEFFICIENTS FOR INTERVAL 20 BAND 20: 5150-6150 cm-1 (low - H2O; high - H2O)



Uses

  • module~~yoesrta20~2~~UsesGraph module~yoesrta20~2 YOESRTA20 module~parkind1~2 PARKIND1 module~yoesrta20~2->module~parkind1~2

Contents


Variables

Type Visibility Attributes Name Initial
integer(kind=JPIM), public, parameter :: JPG = 16
integer(kind=JPIM), public, parameter :: NG20 = 16
real(kind=JPRB), public :: KA(5,13,JPG)
real(kind=JPRB), public :: KB(5,13:59,JPG)
real(kind=JPRD), public :: KA_D(5,13,JPG)
real(kind=JPRD), public :: KB_D(5,13:59,JPG)
real(kind=JPRB), public :: SELFREF(10,JPG)
real(kind=JPRB), public :: FORREF(4,JPG)
real(kind=JPRB), public :: SFLUXREF(JPG)
real(kind=JPRB), public :: ABSCH4(JPG)
real(kind=JPRB), public :: RAYL
integer(kind=JPIM), public :: LAYREFFR
real(kind=JPRB), public :: KAC(5,13,NG20)
real(kind=JPRB), public :: ABSA(65,NG20)
real(kind=JPRB), public :: KBC(5,13:59,NG20)
real(kind=JPRB), public :: ABSB(235,NG20)
real(kind=JPRB), public :: SELFREFC(10,NG20)
real(kind=JPRB), public :: FORREFC(4,NG20)
real(kind=JPRB), public :: SFLUXREFC(NG20)
real(kind=JPRB), public :: ABSCH4C(NG20)