chem_surfvals.F90 File Reference

Modules
module	chem_surfvals

Functions/Subroutines
subroutine, public	chem_surfvals::chem_surfvals_readnl (nlfile)
subroutine, public	chem_surfvals::chem_surfvals_init ()
subroutine	chem_surfvals::ghg_ramp_read ()
real(r8) function, public	chem_surfvals::chem_surfvals_get (name)
real(r8) function, public	chem_surfvals::chem_surfvals_co2_rad (vmr_in)
subroutine, public	chem_surfvals::chem_surfvals_set ()
subroutine	chem_surfvals::chem_surfvals_set_all ()
subroutine	chem_surfvals::chem_surfvals_set_co2 ()

Variables
real(r8)	chem_surfvals::o2mmr = .23143_r8
real(r8)	chem_surfvals::co2vmr_rad = -1.0_r8
real(r8)	chem_surfvals::co2vmr = -1.0_r8
real(r8)	chem_surfvals::n2ovmr = -1.0_r8
real(r8)	chem_surfvals::ch4vmr = -1.0_r8
real(r8)	chem_surfvals::f11vmr = -1.0_r8
real(r8)	chem_surfvals::f12vmr = -1.0_r8
character(len=16)	chem_surfvals::scenario_ghg = 'FIXED'
integer	chem_surfvals::rampyear_ghg = 0
character(len=256)	chem_surfvals::bndtvghg = ' '
integer	chem_surfvals::ramp_co2_start_ymd = 0
real(r8)	chem_surfvals::ramp_co2_annual_rate = 1.0_r8
real(r8)	chem_surfvals::ramp_co2_cap = -9999.0_r8
integer	chem_surfvals::ghg_yearstart_model = 0
integer	chem_surfvals::ghg_yearstart_data = 0
logical	chem_surfvals::ghg_use_calendar
logical	chem_surfvals::doramp_ghg
logical	chem_surfvals::ramp_just_co2
integer	chem_surfvals::fixyear_ghg
integer	chem_surfvals::co2_start
real(r8)	chem_surfvals::co2_daily_factor
real(r8)	chem_surfvals::co2_limit
real(r8)	chem_surfvals::co2_base
integer	chem_surfvals::ntim = -1
integer, dimension(:), allocatable	chem_surfvals::yrdata
real(r8), dimension(:), allocatable	chem_surfvals::co2
real(r8), dimension(:), allocatable	chem_surfvals::ch4
real(r8), dimension(:), allocatable	chem_surfvals::n2o
real(r8), dimension(:), allocatable	chem_surfvals::f11
real(r8), dimension(:), allocatable	chem_surfvals::f12
real(r8), dimension(:), allocatable	chem_surfvals::adj
character(len=256)	chem_surfvals::flbc_file = ' '
character(len=16), dimension(pcnst), public	chem_surfvals::flbc_list = ''
type(time_ramp)	chem_surfvals::flbc_timing