YOESRTA18 Module

** YOESRTA18 - SRTM COEFFICIENTS FOR INTERVAL 16 BAND 18: 4000-4650 cm-1 (low - H2O,CH4; high - CH4)



Uses

  • module~~yoesrta18~~UsesGraph module~yoesrta18 YOESRTA18 module~parkind1~2 PARKIND1 module~yoesrta18->module~parkind1~2

Used by

  • module~~yoesrta18~~UsedByGraph module~yoesrta18 YOESRTA18 proc~srtm_taumol18~2 SRTM_TAUMOL18 proc~srtm_taumol18~2->module~yoesrta18 proc~srtm_cmbgb18~2 SRTM_CMBGB18 proc~srtm_cmbgb18~2->module~yoesrta18 proc~srtm_kgb18~3 SRTM_KGB18 proc~srtm_kgb18~3->module~yoesrta18 proc~srtm_taumol18 SRTM_TAUMOL18 proc~srtm_taumol18->module~yoesrta18 proc~srtm_kgb18~2 SRTM_KGB18 proc~srtm_kgb18~2->module~yoesrta18 proc~srtm_taumol18~4 SRTM_TAUMOL18 proc~srtm_taumol18~4->module~yoesrta18 proc~srtm_cmbgb18~4 SRTM_CMBGB18 proc~srtm_cmbgb18~4->module~yoesrta18 proc~srtm_kgb18 SRTM_KGB18 proc~srtm_kgb18->module~yoesrta18 proc~srtm_cmbgb18 SRTM_CMBGB18 proc~srtm_cmbgb18->module~yoesrta18 proc~srtm_taumol18~3 SRTM_TAUMOL18 proc~srtm_taumol18~3->module~yoesrta18 proc~srtm_cmbgb18~3 SRTM_CMBGB18 proc~srtm_cmbgb18~3->module~yoesrta18 proc~srtm_kgb18~4 SRTM_KGB18 proc~srtm_kgb18~4->module~yoesrta18 proc~modify_wv_continuum MODIFY_WV_CONTINUUM proc~modify_wv_continuum->module~yoesrta18

Contents


Variables

Type Visibility Attributes Name Initial
integer(kind=JPIM), public, parameter :: JPG = 16
integer(kind=JPIM), public, parameter :: NG18 = 16
integer(kind=JPIM), public, parameter :: NGS17 = 32
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,NG18)
real(kind=JPRB), public :: ABSA(585,NG18)
real(kind=JPRB), public :: KBC(5,13:59,NG18)
real(kind=JPRB), public :: ABSB(235,NG18)
real(kind=JPRB), public :: SELFREFC(10,NG18)
real(kind=JPRB), public :: FORREFC(3,NG18)
real(kind=JPRB), public :: SFLUXREFC(NG18,9)