YOESRTA17 Module

** YOESRTA17 - SRTM COEFFICIENTS FOR INTERVAL 17 BAND 17: 3250-4000 cm-1 (low - H2O,CO2; high - H2O,CO2)



Uses

  • module~~yoesrta17~2~~UsesGraph module~yoesrta17~2 YOESRTA17 module~parkind1~2 PARKIND1 module~yoesrta17~2->module~parkind1~2

Contents


Variables

Type Visibility Attributes Name Initial
integer(kind=JPIM), public, parameter :: JPG = 16
integer(kind=JPIM), public, parameter :: NG17 = 16
integer(kind=JPIM), public, parameter :: NGS16 = 16
real(kind=JPRB), public :: KA(9,5,13,JPG)
real(kind=JPRB), public :: KB(5,5,13:59,JPG)
real(kind=JPRD), public :: KA_D(9,5,13,JPG)
real(kind=JPRD), public :: KB_D(5,5,13:59,JPG)
real(kind=JPRB), public :: SELFREF(10,JPG)
real(kind=JPRB), public :: FORREF(4,JPG)
real(kind=JPRB), public :: SFLUXREF(JPG,5)
real(kind=JPRB), public :: RAYL
real(kind=JPRB), public :: STRRAT
integer(kind=JPIM), public :: LAYREFFR
real(kind=JPRB), public :: KAC(9,5,13,NG17)
real(kind=JPRB), public :: ABSA(585,NG17)
real(kind=JPRB), public :: KBC(5,5,13:59,NG17)
real(kind=JPRB), public :: ABSB(1175,NG17)
real(kind=JPRB), public :: SELFREFC(10,NG17)
real(kind=JPRB), public :: FORREFC(4,NG17)
real(kind=JPRB), public :: SFLUXREFC(NG17,5)