This file contains routines that set up ozone climatological profiles and other constant gas profiles, such as co2, ch4, n2o, o2, and those of cfc gases. All data are entered as mixing ratio by volume, except ozone which is mass mixing ratio (g/g). More...

Variables
parameter constants
integer, parameter, public	module_radiation_gases::nf_vgas = 10
	number of gas species

integer, parameter	module_radiation_gases::imxco2 = 24
	input co2 dat lon points

integer, parameter	module_radiation_gases::jmxco2 = 12
	input co2 data lat points

integer, parameter	module_radiation_gases::minyear = 1957
	earlist year 2-d co2 data available

real(kind=kind_phys), parameter	module_radiation_gases::resco2 =15.0
	horizontal resolution in degree

real(kind=kind_phys), parameter	module_radiation_gases::raddeg =180.0/con_pi
	rad->deg conversion

real(kind=kind_phys), parameter	module_radiation_gases::prsco2 =788.0
	pressure limitation for 2-d co2 (mb)

real(kind=kind_phys), parameter	module_radiation_gases::hfpi =0.5*con_pi
	half of pi

parameter constants for gas volume mixing ratioes
real(kind=kind_phys), parameter	module_radiation_gases::co2vmr_def = 350.0e-6

real(kind=kind_phys), parameter	module_radiation_gases::n2ovmr_def = 0.31e-6

real(kind=kind_phys), parameter	module_radiation_gases::ch4vmr_def = 1.50e-6

real(kind=kind_phys), parameter	module_radiation_gases::o2vmr_def = 0.209

real(kind=kind_phys), parameter	module_radiation_gases::covmr_def = 1.50e-8

real(kind=kind_phys), parameter	module_radiation_gases::f11vmr_def = 3.520e-10
	aer 2003 value

real(kind=kind_phys), parameter	module_radiation_gases::f12vmr_def = 6.358e-10
	aer 2003 value

real(kind=kind_phys), parameter	module_radiation_gases::f22vmr_def = 1.500e-10
	aer 2003 value

real(kind=kind_phys), parameter	module_radiation_gases::cl4vmr_def = 1.397e-10
	aer 2003 value

real(kind=kind_phys), parameter	module_radiation_gases::f113vmr_def = 8.2000e-11
	gfdl 1999 value

variables for climatology ozone (ioznflg = 0)
real(kind=kind_phys), dimension(:), allocatable	module_radiation_gases::pkstr

real(kind=kind_phys), dimension(:,:,:), allocatable	module_radiation_gases::o3r

integer	module_radiation_gases::k1oz = 0

integer	module_radiation_gases::k2oz = 0

real(kind=kind_phys)	module_radiation_gases::facoz = 0.0

arrays for co2 2-d monthly data and global mean values from observed data
real(kind=kind_phys), dimension(:,:,:), allocatable	module_radiation_gases::co2vmr_sav

real(kind=kind_phys), dimension(:,:,:), allocatable	module_radiation_gases::co2cyc_sav

real(kind=kind_phys)	module_radiation_gases::co2_glb = co2vmr_def

real(kind=kind_phys), dimension(12)	module_radiation_gases::gco2cyc

integer	module_radiation_gases::kyrsav = 0

integer	module_radiation_gases::kmonsav = 1

subroutine, public	module_radiation_gases::gas_init
	This subroutine sets up ozone, co2, etc. parameters. If climatology ozone then read in monthly ozone data. More...

subroutine, public	module_radiation_gases::gas_update
	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	module_radiation_gases::getgases
	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	module_radiation_gases::getozn
	This subroutine sets up climatological ozone profile for radiation calculation. This code is originally written by Shrinivas Moorthi. More...

Detailed Description

This file contains routines that set up ozone climatological profiles and other constant gas profiles, such as co2, ch4, n2o, o2, and those of cfc gases. All data are entered as mixing ratio by volume, except ozone which is mass mixing ratio (g/g).

Definition in file radiation_gases.f.

Go to the source code of this file.

Variables

arrays for co2 2-d monthly data and global mean values from observed data

Detailed Description