rlwinit()

subroutine, public rrtmg_lw::rlwinit	(	integer, intent(in)	me,
		integer, intent(in)	rad_hr_units,
		logical, intent(in)	inc_minor_gas,
		integer, intent(in)	ilwcliq,
		integer, intent(in)	isubclw,
		integer, intent(in)	iovr,
		integer, intent(in)	iovr_rand,
		integer, intent(in)	iovr_maxrand,
		integer, intent(in)	iovr_max,
		integer, intent(in)	iovr_dcorr,
		integer, intent(in)	iovr_exp,
		integer, intent(in)	iovr_exprand,
		integer, intent(out)	errflg,
		character(len=*), intent(out)	errmsg )

Lookup tables are computed for use in the lw radiative transfer, and input absorption coefficient data for each spectral band are reduced from 256 g-point intervals to 140.

Parameters

me	print control for parallel process

rlwinit General Algorithm

• Setup default surface emissivity for each band.

• Setup constant factors for flux and heating rate the 1.0e-2 is to convert pressure from mb to \(N/m^2\).

• Compute lookup tables for transmittance, tau transition function, and clear sky tau (for the cloudy sky radiative transfer). tau is computed as a function of the tau transition function, transmittance is calculated as a function of tau, and the tau transition function is calculated using the linear in tau formulation at values of tau above 0.01. tf is approximated as tau/6 for tau < 0.01. all tables are computed at intervals of 0.001. the inverse of the constant used in the pade approximation to the tau transition function is set to b.

Referenced by gfs_rrtmg_setup::gfs_rrtmg_setup_init().

Here is the caller graph for this function: