◆ clim_aerinit()

subroutine module_radiation_aerosols::clim_aerinit	(	real (kind=kind_phys), dimension(:)	solfwv,
		real (kind=kind_phys), dimension(:)	eirfwv,
		integer, intent(in)	me
	)

private

Parameters

solfwv	(NWVTOT), solar flux for each individual wavenumber \((w/m^2)\)
eirfwv	(NWVTIR), IR flux(273k) for each individual wavenumber \((w/m^2)\)
me	print message control flag

General Algorithm