SUSW15 Subroutine

subroutine SUSW15()

Uses

  • proc~~susw15~2~~UsesGraph proc~susw15~2 SUSW15 module~parkind1~2 PARKIND1 proc~susw15~2->module~parkind1~2 module~yomcst~3 YOMCST proc~susw15~2->module~yomcst~3 module~yomhook yomhook proc~susw15~2->module~yomhook module~yomsw15 YOMSW15 proc~susw15~2->module~yomsw15 module~yomcst~3->module~parkind1~2 module~yomsw15->module~parkind1~2

*** SUSW15 - INITIALIZE COMMON YOMSW15 *** FROZEN VERSION (CYCLE 15) OF SUSW

  • INTERFACE. ---------- CALL *SUSW15

    1. SET VALUES. -----------

DERIVED FROM HITRAN APRIL 1991 H2O: Pref=300 hPa, Tref=240K, Pdep=0.8 O3 : unchanged

INTERVAL 2: 0.68 - 4.00 MICRONS DERIVED FROM HITRAN APRIL 1991 H2O: Pref=300 hPa, Tref=240K, Pdep=0.80 UMG: Pref=300 hPa, Tref=240K, Pdep=0.75 (CO2+O2+CH4+N2O+CO) O3 : unchanged

Arguments

None

Calls

proc~~susw15~2~~CallsGraph proc~susw15~2 SUSW15 proc~dr_hook dr_hook proc~susw15~2->proc~dr_hook

Contents

None