YOESRTA22 Module

** YOESRTA22 - SRTM COEFFICIENTS FOR INTERVAL 22 BAND 22: 7700-8050 cm-1 (low - H2O,O2; high - O2)


Uses

  • module~~yoesrta22~~UsesGraph module~yoesrta22 YOESRTA22 module~parkind1~2 PARKIND1 module~yoesrta22->module~parkind1~2

Used by

  • module~~yoesrta22~~UsedByGraph module~yoesrta22 YOESRTA22 proc~srtm_cmbgb22~3 SRTM_CMBGB22 proc~srtm_cmbgb22~3->module~yoesrta22 proc~srtm_kgb22~3 SRTM_KGB22 proc~srtm_kgb22~3->module~yoesrta22 proc~srtm_cmbgb22~2 SRTM_CMBGB22 proc~srtm_cmbgb22~2->module~yoesrta22 proc~srtm_cmbgb22~4 SRTM_CMBGB22 proc~srtm_cmbgb22~4->module~yoesrta22 proc~srtm_taumol22 SRTM_TAUMOL22 proc~srtm_taumol22->module~yoesrta22 proc~srtm_kgb22 SRTM_KGB22 proc~srtm_kgb22->module~yoesrta22 proc~srtm_taumol22~2 SRTM_TAUMOL22 proc~srtm_taumol22~2->module~yoesrta22 proc~srtm_taumol22~3 SRTM_TAUMOL22 proc~srtm_taumol22~3->module~yoesrta22 proc~srtm_taumol22~4 SRTM_TAUMOL22 proc~srtm_taumol22~4->module~yoesrta22 proc~srtm_kgb22~4 SRTM_KGB22 proc~srtm_kgb22~4->module~yoesrta22 proc~modify_wv_continuum MODIFY_WV_CONTINUUM proc~modify_wv_continuum->module~yoesrta22 proc~srtm_kgb22~2 SRTM_KGB22 proc~srtm_kgb22~2->module~yoesrta22 proc~srtm_cmbgb22 SRTM_CMBGB22 proc~srtm_cmbgb22->module~yoesrta22

Contents

Variables


Variables

Type Visibility Attributes Name Initial
integer(kind=JPIM), public, parameter :: JPG = 16
integer(kind=JPIM), public, parameter :: NG22 = 16
real(kind=JPRB), public :: KA(9,5,13,JPG)
real(kind=JPRB), public :: KB(5,13:59,JPG)
real(kind=JPRD), public :: KA_D(9,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(3,JPG)
real(kind=JPRB), public :: SFLUXREF(JPG,9)
real(kind=JPRB), public :: RAYL
real(kind=JPRB), public :: STRRAT
integer(kind=JPIM), public :: LAYREFFR
real(kind=JPRB), public :: KAC(9,5,13,NG22)
real(kind=JPRB), public :: ABSA(585,NG22)
real(kind=JPRB), public :: KBC(5,13:59,NG22)
real(kind=JPRB), public :: ABSB(235,NG22)
real(kind=JPRB), public :: SELFREFC(10,NG22)
real(kind=JPRB), public :: FORREFC(3,NG22)
real(kind=JPRB), public :: SFLUXREFC(NG22,9)