module_radiation_gases Module Reference

This module sets up ozone climatological profiles and other constant gas profiles, such as co2, ch4, n2o, o2, and those of cfc gases.

Functions/Subroutines
subroutine, public	gas_init (me)
	This subroutine sets up ozone, co2, etc. parameters. If climatology ozone then read in monthly ozone data. More...
subroutine, public	gas_update (iyear, imon, iday, ihour, loz1st, ldoco2, me)
	This subroutine reads in 2-d monthly co2 data set for a specified year. Data are in a 15 degree lat/lon horizontal resolution. More...
subroutine, public	getgases (plvl, xlon, xlat, IMAX, LMAX, gasdat )
	This subroutine sets up global distribution of radiation absorbing gases in volume mixing ratio. Currently only co2 has the options from observed values, all other gases are asigned to the climatological values. More...
subroutine, public	getozn (prslk, xlat, IMAX, LM, o3mmr )
	This subroutine sets up climatological ozone profile for radiation calculation. This code is originally written by Shrinivas Moorthi. More...

Variables
character(40), parameter	vtaggas ='NCEP-Radiation_gases v5.1 Nov 2012 '
integer, parameter, public	nf_vgas = 10
	number of gas species More...
integer, parameter	imxco2 = 24
	input CO2 data longitude points More...
integer, parameter	jmxco2 = 12
	input CO2 data latitude points More...
integer, parameter	minyear = 1957
	earlist year 2D CO2 data available More...
real(kind=kind_phys), parameter	resco2 =15.0
	horizontal resolution in degree More...
real(kind=kind_phys), parameter	raddeg =180.0/con_pi
	rad->deg conversion More...
real(kind=kind_phys), parameter	prsco2 =788.0
	pressure limitation for 2D CO2 (mb) More...
real(kind=kind_phys), parameter	hfpi =0.5*con_pi
	half of pi More...
real(kind=kind_phys), parameter	co2vmr_def = 350.0e-6
	parameter constant for CO2 volume mixing ratio More...
real(kind=kind_phys), parameter	n2ovmr_def = 0.31e-6
	parameter constant for N2O volume mixing ratio More...
real(kind=kind_phys), parameter	ch4vmr_def = 1.50e-6
	parameter constant for CH4 volume mixing ratio More...
real(kind=kind_phys), parameter	o2vmr_def = 0.209
	parameter constant for O2 volume mixing ratio More...
real(kind=kind_phys), parameter	covmr_def = 1.50e-8
	parameter constant for CO colume mixing ratio More...
real(kind=kind_phys), parameter	f11vmr_def = 3.520e-10
real(kind=kind_phys), parameter	f12vmr_def = 6.358e-10
real(kind=kind_phys), parameter	f22vmr_def = 1.500e-10
real(kind=kind_phys), parameter	cl4vmr_def = 1.397e-10
real(kind=kind_phys), parameter	f113vmr_def = 8.2000e-11
real(kind=kind_phys), dimension(:), allocatable	pkstr
real(kind=kind_phys), dimension(:,:,:), allocatable	o3r
integer	k1oz = 0
integer	k2oz = 0
real(kind=kind_phys)	facoz = 0.0
real(kind=kind_phys), dimension(:,:,:), allocatable	co2vmr_sav
real(kind=kind_phys), dimension(:,:,:), allocatable	co2cyc_sav
real(kind=kind_phys)	co2_glb = co2vmr_def
real(kind=kind_phys), dimension(12)	gco2cyc
integer	kyrsav = 0
integer	kmonsav = 1