YOESRTA21 Module

** YOESRTA21 - SRTM COEFFICIENTS FOR INTERVAL 21 BAND 21: 6150-7700 cm-1 (low - H2O,CO2; high - H2O,CO2)



Uses

  • module~~yoesrta21~~UsesGraph module~yoesrta21 YOESRTA21 module~parkind1~2 PARKIND1 module~yoesrta21->module~parkind1~2

Used by

  • module~~yoesrta21~~UsedByGraph module~yoesrta21 YOESRTA21 proc~srtm_cmbgb21 SRTM_CMBGB21 proc~srtm_cmbgb21->module~yoesrta21 proc~srtm_kgb21~2 SRTM_KGB21 proc~srtm_kgb21~2->module~yoesrta21 proc~srtm_kgb21 SRTM_KGB21 proc~srtm_kgb21->module~yoesrta21 proc~srtm_kgb21~3 SRTM_KGB21 proc~srtm_kgb21~3->module~yoesrta21 proc~srtm_taumol21~3 SRTM_TAUMOL21 proc~srtm_taumol21~3->module~yoesrta21 proc~srtm_cmbgb21~4 SRTM_CMBGB21 proc~srtm_cmbgb21~4->module~yoesrta21 proc~srtm_kgb21~4 SRTM_KGB21 proc~srtm_kgb21~4->module~yoesrta21 proc~srtm_taumol21 SRTM_TAUMOL21 proc~srtm_taumol21->module~yoesrta21 proc~srtm_cmbgb21~2 SRTM_CMBGB21 proc~srtm_cmbgb21~2->module~yoesrta21 proc~srtm_taumol21~2 SRTM_TAUMOL21 proc~srtm_taumol21~2->module~yoesrta21 proc~srtm_cmbgb21~3 SRTM_CMBGB21 proc~srtm_cmbgb21~3->module~yoesrta21 proc~srtm_taumol21~4 SRTM_TAUMOL21 proc~srtm_taumol21~4->module~yoesrta21 proc~modify_wv_continuum MODIFY_WV_CONTINUUM proc~modify_wv_continuum->module~yoesrta21

Contents


Variables

Type Visibility Attributes Name Initial
integer(kind=JPIM), public, parameter :: JPG = 16
integer(kind=JPIM), public, parameter :: NG21 = 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,9)
real(kind=JPRB), public :: RAYL
real(kind=JPRB), public :: STRRAT
integer(kind=JPIM), public :: LAYREFFR
real(kind=JPRB), public :: KAC(9,5,13,NG21)
real(kind=JPRB), public :: ABSA(585,NG21)
real(kind=JPRB), public :: KBC(5,5,13:59,NG21)
real(kind=JPRB), public :: ABSB(1175,NG21)
real(kind=JPRB), public :: SELFREFC(10,NG21)
real(kind=JPRB), public :: FORREFC(4,NG21)
real(kind=JPRB), public :: SFLUXREFC(NG21,9)