getgases()

subroutine, public module_radiation_gases::getgases	(	real (kind=kind_phys), dimension(:,:), intent(in)	plvl,
		real (kind=kind_phys), dimension(:), intent(in)	xlon,
		real (kind=kind_phys), dimension(:), intent(in)	xlat,
		integer, intent(in)	IMAX,
		integer, intent(in)	LMAX,
		real (kind=kind_phys), dimension(:,:,:), intent(out)	gasdat
	)

Parameters

plvl	(IMAX,LMAX+1), pressure at model layer interfaces (mb)
xlon	(IMAX), grid longitude in radians, ok both 0->2pi or -pi -> +pi arrangements
xlat	(IMAX), grid latitude in radians, default range to pi/2 -> -pi/2, otherwise see in-line comment
IMAX,LMAX	horizontal/vertical dimensions for output data
gasdat	(IMAX,LMAX,NF_VGAS) - gases volume mixing ratioes (:,:,1) - co2 (:,:,2) - n2o (:,:,3) - ch4 (:,:,4) - o2 (:,:,5) - co (:,:,6) - cfc11 (:,:,7) - cfc12 (:,:,8) - cfc22 (:,:,9) - ccl4 (:,:,10) - cfc113

getgases General Algorithm

Parameters

[in]

imax

- External module variables: (in physparam) ico2flg - co2 data source control flag =0: use prescribed co2 global mean value =1: use input global mean co2 value (co2_glb) =2: use input 2-d monthly co2 value (co2vmr_sav) ivflip - vertical profile indexing flag

• Internal module variables :
  co2vmr_sav - saved monthly co2 concentration from sub gas_update
  co2_glb - saved global annual mean co2 value from gas_update
  gco2cyc - saved global seasonal variation of co2 climatology in 12-month form

  Parameters

  [in]

  lmax

  - External module variables: (in physparam) ico2flg - co2 data source control flag =0: use prescribed co2 global mean value =1: use input global mean co2 value (co2_glb) =2: use input 2-d monthly co2 value (co2vmr_sav) ivflip - vertical profile indexing flag

• Internal module variables :
  co2vmr_sav - saved monthly co2 concentration from sub gas_update
  co2_glb - saved global annual mean co2 value from gas_update
  gco2cyc - saved global seasonal variation of co2 climatology in 12-month form

References ch4vmr_def, cl4vmr_def, co2_glb, co2vmr_def, co2vmr_sav, covmr_def, f113vmr_def, f11vmr_def, f12vmr_def, f22vmr_def, gco2cyc, hfpi, imxco2, jmxco2, kmonsav, n2ovmr_def, o2vmr_def, prsco2, raddeg, and resco2.

Referenced by gfs_rrtmg_pre::gfs_rrtmg_pre_run().

Here is the caller graph for this function: