subroutine, public rrtmg_lw::rlwinit

(

integer, intent(in)

me

)

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

1. Check cloud flags for consistency.
2. Setup default surface emissivity for each band.
3. Setup constant factors for flux and heating rate the 1.0e-2 is to convert pressure from mb to \(N/m^2\).
4. 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.

References bpade, physcons::con_cp, physcons::con_g, exp_tbl, f_one, f_zero, fluxfac, heatfac, physparam::icldflg, physparam::ilwcliq, physparam::ilwrate, physparam::ilwrgas, physparam::iovrlw, physparam::isubclw, module_radlw_parameters::ntbl, semiss0, tau_tbl, tfn_tbl, and vtaglw.

Referenced by gfs_rrtmg_setup::radinit().