gas_init()

subroutine, public module_radiation_gases::gas_init	(	integer, intent(in)	me,
		character(len=26), intent(in)	co2usr_file,
		character(len=26), intent(in)	co2cyc_file,
		integer, intent(in)	ico2flg,
		integer, intent(in)	ictmflg,
		real(kind=kind_phys), intent(in)	con_pi,
		integer, intent(out)	errflg,
		character(len=*), intent(out)	errmsg )

Parameters

me	print message control flag
co2usr_file	co2 user defined data table
co2cyc_file	co2 climotology monthly cycle data table
ictmflg	data ic time/date control flag
ico2flg	co2 data source control flag
con_pi	physical constant Pi
errflg	error flag
errmsg	error message

gas_init General Algorithm

Definition at line 191 of file radiation_gases.f.

References co2_glb, co2cyc_sav, co2vmr_def, co2vmr_sav, gco2cyc, hfpi, imxco2, jmxco2, kmonsav, kyrsav, and raddeg.