CCPP Scientific Documentation
v5.0.0
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