gfs_rrtmg_pre_run()

subroutine, public gfs_rrtmg_pre::gfs_rrtmg_pre_run	(	integer, intent(in)	im,
		integer, intent(in)	levs,
		integer, intent(in)	lm,
		integer, intent(in)	lmk,
		integer, intent(in)	lmp,
		integer, intent(in)	n_var_lndp,
		integer, intent(in)	imfdeepcnv,
		integer, intent(in)	imfdeepcnv_gf,
		integer, intent(in)	me,
		integer, intent(in)	ncnd,
		integer, intent(in)	ntrac,
		integer, intent(in)	num_p3d,
		integer, intent(in)	npdf3d,
		integer, intent(in)	ncnvcld3d,
		integer, intent(in)	ntqv,
		integer, intent(in)	ntcw,
		integer, intent(in)	ntiw,
		integer, intent(in)	ntlnc,
		integer, intent(in)	ntinc,
		integer, intent(in)	ntrnc,
		integer, intent(in)	ntsnc,
		integer, intent(in)	ntccn,
		integer, intent(in)	ntrw,
		integer, intent(in)	ntsw,
		integer, intent(in)	ntgl,
		integer, intent(in)	nthl,
		integer, intent(in)	ntwa,
		integer, intent(in)	ntoz,
		integer, intent(in)	ntclamt,
		integer, intent(in)	nleffr,
		integer, intent(in)	nieffr,
		integer, intent(in)	nseffr,
		integer, intent(in)	lndp_type,
		integer, intent(in)	kdt,
		integer, intent(in)	imp_physics,
		integer, intent(in)	imp_physics_nssl,
		logical, intent(in)	nssl_ccn_on,
		logical, intent(in)	nssl_invertccn,
		integer, intent(in)	imp_physics_thompson,
		integer, intent(in)	imp_physics_gfdl,
		integer, intent(in)	imp_physics_zhao_carr,
		integer, intent(in)	imp_physics_zhao_carr_pdf,
		integer, intent(in)	imp_physics_mg,
		integer, intent(in)	imp_physics_wsm6,
		integer, intent(in)	imp_physics_fer_hires,
		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(in)	idcor_con,
		integer, intent(in)	idcor_hogan,
		integer, intent(in)	idcor_oreopoulos,
		real(kind=kind_phys), intent(in)	julian,
		integer, intent(in)	yearlen,
		character(len=3), dimension(:), intent(in)	lndp_var_list,
		logical, intent(in)	lsswr,
		logical, intent(in)	lslwr,
		logical, intent(in)	ltaerosol,
		logical, intent(in)	lgfdlmprad,
		logical, intent(in)	uni_cld,
		logical, intent(in)	effr_in,
		logical, intent(in)	do_mynnedmf,
		logical, intent(in)	lmfshal,
		logical, intent(in)	lmfdeep2,
		real(kind=kind_phys), intent(in)	fhswr,
		real(kind=kind_phys), intent(in)	fhlwr,
		real(kind=kind_phys), intent(in)	solhr,
		real(kind=kind_phys), intent(in)	sup,
		real(kind=kind_phys), intent(in)	con_eps,
		real(kind=kind_phys), intent(in)	epsm1,
		real(kind=kind_phys), intent(in)	fvirt,
		real(kind=kind_phys), intent(in)	rog,
		real(kind=kind_phys), intent(in)	rocp,
		real(kind=kind_phys), intent(in)	con_rd,
		real(kind=kind_phys), dimension(:), intent(in)	xlat_d,
		real(kind=kind_phys), dimension(:), intent(in)	xlat,
		real(kind=kind_phys), dimension(:), intent(in)	xlon,
		real(kind=kind_phys), dimension(:), intent(in)	coslat,
		real(kind=kind_phys), dimension(:), intent(in)	sinlat,
		real(kind=kind_phys), dimension(:), intent(in)	tsfc,
		real(kind=kind_phys), dimension(:), intent(in)	slmsk,
		real(kind=kind_phys), dimension(:,:), intent(in)	prsi,
		real(kind=kind_phys), dimension(:,:), intent(in)	prsl,
		real(kind=kind_phys), dimension(:,:), intent(in)	prslk,
		real(kind=kind_phys), dimension(:,:), intent(in)	tgrs,
		real(kind=kind_phys), dimension(:,:), intent(in)	sfc_wts,
		real(kind=kind_phys), dimension(:,:), intent(in)	mg_cld,
		real(kind=kind_phys), dimension(:,:), intent(in)	effrr_in,
		logical, intent(in)	pert_clds,
		real(kind=kind_phys), dimension(:,:), intent(in)	sppt_wts,
		real(kind=kind_phys), intent(in)	sppt_amp,
		real(kind=kind_phys), dimension(:,:), intent(in)	cnvw_in,
		real(kind=kind_phys), dimension(:,:), intent(in)	cnvc_in,
		real(kind=kind_phys), dimension(:,:,:), intent(in)	qgrs,
		real(kind=kind_phys), dimension(:,:,:), intent(in)	aer_nm,
		real(kind=kind_phys), dimension(:), intent(in)	dx,
		integer, intent(in)	icloud,
		real(kind=kind_phys), dimension(:), intent(inout)	coszen,
		real(kind=kind_phys), dimension(:), intent(inout)	coszdg,
		real(kind=kind_phys), dimension(:,:), intent(inout)	effrl_inout,
		real(kind=kind_phys), dimension(:,:), intent(inout)	effri_inout,
		real(kind=kind_phys), dimension(:,:), intent(inout)	effrs_inout,
		real(kind=kind_phys), dimension(:,:), intent(inout)	clouds1,
		real(kind=kind_phys), dimension(:,:), intent(inout)	clouds2,
		real(kind=kind_phys), dimension(:,:), intent(inout)	clouds3,
		real(kind=kind_phys), dimension(:,:), intent(inout)	clouds4,
		real(kind=kind_phys), dimension(:,:), intent(inout)	clouds5,
		real(kind=kind_phys), dimension(:,:), intent(in)	qci_conv,
		integer, intent(out)	kd,
		integer, intent(out)	kt,
		integer, intent(out)	kb,
		integer, dimension(:,:), intent(out)	mtopa,
		integer, dimension(:,:), intent(out)	mbota,
		real(kind=kind_phys), intent(out)	raddt,
		real(kind=kind_phys), dimension(:), intent(out)	tsfg,
		real(kind=kind_phys), dimension(:), intent(out)	tsfa,
		real(kind=kind_phys), dimension(:), intent(out)	de_lgth,
		real(kind=kind_phys), dimension(:), intent(out)	alb1d,
		real(kind=kind_phys), dimension(:,:), intent(out)	delp,
		real(kind=kind_phys), dimension(:,:), intent(out)	dz,
		real(kind=kind_phys), dimension(:,:), intent(out)	plvl,
		real(kind=kind_phys), dimension(:,:), intent(out)	plyr,
		real(kind=kind_phys), dimension(:,:), intent(out)	tlvl,
		real(kind=kind_phys), dimension(:,:), intent(out)	tlyr,
		real(kind=kind_phys), dimension(:,:), intent(out)	qlyr,
		real(kind=kind_phys), dimension(:,:), intent(out)	olyr,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_co2,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_n2o,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_ch4,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_o2,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_co,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_cfc11,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_cfc12,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_cfc22,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_ccl4,
		real(kind=kind_phys), dimension(:,:), intent(out)	gasvmr_cfc113,
		real(kind=kind_phys), dimension(:,:), intent(out)	aerodp,
		real(kind=kind_phys), dimension(:,:), intent(out)	clouds6,
		real(kind=kind_phys), dimension(:,:), intent(out)	clouds7,
		real(kind=kind_phys), dimension(:,:), intent(out)	clouds8,
		real(kind=kind_phys), dimension(:,:), intent(out)	clouds9,
		real(kind=kind_phys), dimension(:,:), intent(out)	cldsa,
		real(kind=kind_phys), dimension(:,:), intent(out)	cldfra,
		real(kind=kind_phys), dimension(:), intent(out)	cldfra2d,
		real(kind=kind_phys), dimension(:), intent(out)	lwp_ex,
		real(kind=kind_phys), dimension(:), intent(out)	iwp_ex,
		real(kind=kind_phys), dimension(:), intent(out)	lwp_fc,
		real(kind=kind_phys), dimension(:), intent(out)	iwp_fc,
		real(kind=kind_phys), dimension(:,:,:), intent(out)	faersw1,
		real(kind=kind_phys), dimension(:,:,:), intent(out)	faersw2,
		real(kind=kind_phys), dimension(:,:,:), intent(out)	faersw3,
		real(kind=kind_phys), dimension(:,:,:), intent(out)	faerlw1,
		real(kind=kind_phys), dimension(:,:,:), intent(out)	faerlw2,
		real(kind=kind_phys), dimension(:,:,:), intent(out)	faerlw3,
		real(kind=kind_phys), dimension(:,:), intent(out)	alpha,
		real(kind_phys), dimension(:,:), intent(in)	spp_wts_rad,
		integer, intent(in)	spp_rad,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Argument Table

local_name	standard_name	long_name	units	type	dimensions	kind	intent
im	horizontal_loop_extent	horizontal loop extent	count	integer	()		in
levs	vertical_layer_dimension	number of vertical levels	count	integer	()		in
lm	vertical_dimension_for_radiation	number of vertical layers for radiation calculation	count	integer	()		in
lmk	adjusted_vertical_layer_dimension_for_radiation	number of vertical layers for radiation	count	integer	()		in
lmp	adjusted_vertical_level_dimension_for_radiation	number of vertical levels for radiation	count	integer	()		in
n_var_lndp	number_of_perturbed_land_surface_variables	number of land surface variables perturbed	count	integer	()		in
imfdeepcnv	control_for_deep_convection_scheme	flag for mass-flux deep convection scheme	flag	integer	()		in
imfdeepcnv_gf	identifier_for_grell_freitas_deep_convection	flag for Grell-Freitas deep convection scheme	flag	integer	()		in
me	mpi_rank	current MPI-rank	index	integer	()		in
ncnd	number_of_condensate_species	number of cloud condensate types	count	integer	()		in
ntrac	number_of_tracers	number of tracers	count	integer	()		in
num_p3d	number_of_microphysics_variables_in_xyz_dimensioned_restart_array	number of 3D arrays needed for microphysics	count	integer	()		in
npdf3d	number_of_pdf_based_variables_in_xyz_dimensioned_restart_array	number of 3d arrays associated with pdf based clouds/mp	count	integer	()		in
ncnvcld3d	number_of_convective_cloud_variables_in_xyz_dimensioned_restart_array	number of convective 3d clouds fields	count	integer	()		in
ntqv	index_of_specific_humidity_in_tracer_concentration_array	tracer index for water vapor (specific humidity)	index	integer	()		in
ntcw	index_of_cloud_liquid_water_mixing_ratio_in_tracer_concentration_array	tracer index for cloud condensate (or liquid water)	index	integer	()		in
ntiw	index_of_cloud_ice_mixing_ratio_in_tracer_concentration_array	tracer index for ice water	index	integer	()		in
ntlnc	index_of_mass_number_concentration_of_cloud_droplets_in_tracer_concentration_array	tracer index for liquid number concentration	index	integer	()		in
ntinc	index_of_mass_number_concentration_of_cloud_ice_in_tracer_concentration_array	tracer index for ice number concentration	index	integer	()		in
ntrnc	index_of_mass_number_concentration_of_rain_in_tracer_concentration_array	tracer index for rain number concentration	index	integer	()		in
ntsnc	index_of_mass_number_concentration_of_snow_in_tracer_concentration_array	tracer index for snow number concentration	index	integer	()		in
ntrw	index_of_rain_mixing_ratio_in_tracer_concentration_array	tracer index for rain water	index	integer	()		in
ntsw	index_of_snow_mixing_ratio_in_tracer_concentration_array	tracer index for snow water	index	integer	()		in
ntgl	index_of_graupel_mixing_ratio_in_tracer_concentration_array	tracer index for graupel	index	integer	()		in
nthl	index_of_hail_mixing_ratio_in_tracer_concentration_array	tracer index for hail	index	integer	()		in
ntccn	index_of_cloud_condensation_nuclei_number_concentration_in_tracer_concentration_array	tracer index for cloud condensation nuclei number concentration	index	integer	()		in
ntwa	index_of_mass_number_concentration_of_hygroscopic_aerosols_in_tracer_concentration_array	tracer index for water friendly aerosol	index	integer	()		in
ntoz	index_of_ozone_mixing_ratio_in_tracer_concentration_array	tracer index for ozone mixing ratio	index	integer	()		in
nssl_ccn_on	nssl_ccn_on	CCN activation flag in NSSL micro	flag	logical	()		in
nssl_invertccn	nssl_invertccn	flag to invert CCN in NSSL micro	flag	logical	()		in
ntclamt	index_of_cloud_area_fraction_in_atmosphere_layer_in_tracer_concentration_array	tracer index for cloud amount integer	index	integer	()		in
nleffr	index_of_cloud_liquid_water_effective_radius_in_xyz_dimensioned_restart_array	the index of cloud liquid water effective radius in phy_f3d	index	integer	()		in
nieffr	index_of_cloud_ice_effective_radius_in_xyz_dimensioned_restart_array	the index of ice effective radius in phy_f3d	index	integer	()		in
nseffr	index_of_snow_effective_radius_in_xyz_dimensioned_restart_array	the index of snow effective radius in phy_f3d	index	integer	()		in
lndp_type	control_for_stochastic_land_surface_perturbation	index for stochastic land surface perturbations type	index	integer	()		in
kdt	index_of_timestep	current forecast iteration	index	integer	()		in
imp_physics	control_for_microphysics_scheme	choice of microphysics scheme	flag	integer	()		in
imp_physics_nssl	identifier_for_nssl_microphysics_scheme	choice of NSSL 2-moment microphysics scheme	flag	integer	()		in
imp_physics_thompson	identifier_for_thompson_microphysics_scheme	choice of Thompson microphysics scheme	flag	integer	()		in
imp_physics_gfdl	identifier_for_gfdl_microphysics_scheme	choice of GFDL microphysics scheme	flag	integer	()		in
imp_physics_zhao_carr	identifier_for_zhao_carr_microphysics_scheme	choice of Zhao-Carr microphysics scheme	flag	integer	()		in
imp_physics_zhao_carr_pdf	identifier_for_zhao_carr_pdf_microphysics_scheme	choice of Zhao-Carr microphysics scheme with PDF clouds	flag	integer	()		in
imp_physics_mg	identifier_for_morrison_gettelman_microphysics_scheme	choice of Morrison-Gettelman microphysics scheme	flag	integer	()		in
imp_physics_wsm6	identifier_for_wsm6_microphysics_scheme	choice of WSM6 microphysics scheme	flag	integer	()		in
imp_physics_fer_hires	identifier_for_fer_hires_microphysics_scheme	choice of Ferrier-Aligo microphysics scheme	flag	integer	()		in
iovr_rand	flag_for_random_cloud_overlap_method	choice of random cloud overlap method	flag	integer	()		in
iovr_maxrand	flag_for_maximum_random_cloud_overlap_method	choice of maximum-random cloud overlap method	flag	integer	()		in
iovr_max	flag_for_maximum_cloud_overlap_method	choice of maximum cloud overlap method	flag	integer	()		in
iovr_dcorr	flag_for_decorrelation_length_cloud_overlap_method	choice of decorrelation-length cloud overlap method	flag	integer	()		in
iovr_exp	flag_for_exponential_cloud_overlap_method	choice of exponential cloud overlap method	flag	integer	()		in
iovr_exprand	flag_for_exponential_random_cloud_overlap_method	choice of exponential-random cloud overlap method	flag	integer	()		in
idcor_con	flag_for_constant_decorrelation_length_method	choice of decorrelation length computation (costant)	flag	integer	()		in
idcor_hogan	flag_for_hogan_decorrelation_length_method	choice of decorrelation length computation (hogan)	flag	integer	()		in
idcor_oreopoulos	flag_for_oreopoulos_decorrelation_length_method	choice of decorrelation length computation (oreopoulos)	flag	integer	()		in
julian	forecast_julian_day	julian day	days	real	()	kind_phys	in
yearlen	number_of_days_in_current_year	number of days in a year	days	integer	()		in
lndp_var_list	land_surface_perturbation_variables	variables to be perturbed for landperts	none	character	(ccpp_constant_one:number_of_perturbed_land_surface_variables)	len=3	in
lsswr	flag_for_calling_shortwave_radiation	logical flags for sw radiation calls	flag	logical	()		in
lslwr	flag_for_calling_longwave_radiation	logical flags for lw radiation calls	flag	logical	()		in
ltaerosol	flag_for_aerosol_physics	flag for aerosol physics	flag	logical	()		in
lgfdlmprad	flag_for_gfdl_microphysics_radiation_interaction	flag for GFDL microphysics-radiation interaction	flag	logical	()		in
uni_cld	flag_for_shoc_cloud_area_fraction_for_radiation	flag for uni_cld	flag	logical	()		in
effr_in	flag_for_cloud_effective_radii	flag for cloud effective radii calculations in GFDL microphysics	flag	logical	()		in
do_mynnedmf	flag_for_mellor_yamada_nakanishi_niino_pbl_scheme	flag to activate MYNN-EDMF	flag	logical	()		in
lmfshal	flag_for_cloud_area_fraction_option_for_radiation	flag for lmfshal	flag	logical	()		in
lmfdeep2	flag_for_scale_aware_mass_flux_deep_convection_for_radiation	flag for some scale-aware mass-flux convection scheme active	flag	logical	()		in
fhswr	period_of_shortwave_radiation_calls	frequency for shortwave radiation	s	real	()	kind_phys	in
fhlwr	period_of_longwave_radiation_calls	frequency for longwave radiation	s	real	()	kind_phys	in
solhr	forecast_utc_hour	time in hours after 00z at the current timestep	h	real	()	kind_phys	in
sup	tunable_parameter_for_ice_supersaturation	ice supersaturation parameter for PDF clouds	none	real	()	kind_phys	in
con_eps	ratio_of_dry_air_to_water_vapor_gas_constants	rd/rv	none	real	()	kind_phys	in
epsm1	ratio_of_dry_air_to_water_vapor_gas_constants_minus_one	(rd/rv) - 1	none	real	()	kind_phys	in
fvirt	ratio_of_vapor_to_dry_air_gas_constants_minus_one	(rv/rd) - 1 (rv = ideal gas constant for water vapor)	none	real	()	kind_phys	in
rog	ratio_of_gas_constant_dry_air_to_gravitational_acceleration	(rd/g)	J s2 K-1 kg-1 m-1	real	()	kind_phys	in
rocp	ratio_of_gas_constant_dry_air_to_specific_heat_of_dry_air_at_constant_pressure	(rd/cp)	none	real	()	kind_phys	in
con_rd	gas_constant_of_dry_air	ideal gas constant for dry air	J kg-1 K-1	real	()	kind_phys	in
xlat_d	latitude_in_degree	latitude in degree north	degree_north	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
xlat	latitude	latitude	radian	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
xlon	longitude	longitude	radian	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
coslat	cosine_of_latitude	cosine of latitude	none	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
sinlat	sine_of_latitude	sine of latitude	none	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
tsfc	surface_skin_temperature	surface skin temperature	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
slmsk	area_type	landmask: sea/land/ice=0/1/2	flag	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
prsi	air_pressure_at_interface	air pressure at model layer interfaces	Pa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	in
prsl	air_pressure	mean layer pressure	Pa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
prslk	dimensionless_exner_function	dimensionless Exner function at model layer centers	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
tgrs	air_temperature	model layer mean temperature	K	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
sfc_wts	surface_stochastic_weights_from_coupled_process	weights for stochastic surface physics perturbation	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:number_of_perturbed_land_surface_variables)	kind_phys	in
mg_cld	cloud_fraction_for_mg	cloud fraction used by Morrison-Gettelman MP	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
effrr_in	effective_radius_of_stratiform_cloud_rain_particle	effective radius of cloud rain particle in micrometers	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
pert_clds	flag_for_stochastic_cloud_fraction_perturbations	flag for stochastic cloud fraction physics perturbations	flag	logical	()		in
sppt_wts	sppt_weights_from_coupled_process	weights for stochastic sppt perturbation	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
sppt_amp	total_amplitude_of_sppt_perturbation	total ampltidue of stochastic sppt perturbation	none	real	()	kind_phys	in
cnvw_in	convective_cloud_condensate_mixing_ratio	convective cloud water mixing ratio in the phy_f3d array	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cnvc_in	convective_cloud_area_fraction	convective cloud cover in the phy_f3d array	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
qgrs	tracer_concentration	model layer mean tracer concentration	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension, ccpp_constant_one:number_of_tracers)	kind_phys	in
aer_nm	mass_number_concentration_of_aerosol_from_gocart_climatology	GOCART aerosol climatology number concentration	kg-1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension, ccpp_constant_one:number_of_aerosol_tracers_MG)	kind_phys	in
dx	characteristic_grid_lengthscale	relative dx for the grid cell	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
icloud	control_for_cloud_area_fraction_option	cloud effect to the optical depth and cloud fraction in radiation	flag	integer	()		in
coszen	cosine_of_solar_zenith_angle_for_daytime_points_on_radiation_timestep	mean cos of zenith angle over rad call period	none	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
coszdg	cosine_of_solar_zenith_angle_on_radiation_timestep	daytime mean cosz over rad call period	none	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
effrl_inout	effective_radius_of_stratiform_cloud_liquid_water_particle	eff. radius of cloud liquid water particle in micrometer	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	inout
effri_inout	effective_radius_of_stratiform_cloud_ice_particle	eff. radius of cloud ice water particle in micrometer	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	inout
effrs_inout	effective_radius_of_stratiform_cloud_snow_particle	effective radius of cloud snow particle in micrometers	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	inout
clouds1	total_cloud_fraction	layer total cloud fraction	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	inout
clouds2	cloud_liquid_water_path	layer cloud liquid water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	inout
clouds3	mean_effective_radius_for_liquid_cloud	mean effective radius for liquid cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	inout
clouds4	cloud_ice_water_path	layer cloud ice water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	inout
clouds5	mean_effective_radius_for_ice_cloud	mean effective radius for ice cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	inout
qci_conv	convective_cloud_condesate_after_rainout	convective cloud condesate after rainout	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
kd	vertical_index_difference_between_inout_and_local	vertical index difference between in/out and local	index	integer	()		out
kt	vertical_index_difference_between_layer_and_upper_bound	vertical index difference between layer and upper bound	index	integer	()		out
kb	vertical_index_difference_between_layer_and_lower_bound	vertical index difference between layer and lower bound	index	integer	()		out
mtopa	model_layer_number_at_cloud_top	vertical indices for low, middle and high cloud tops	index	integer	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:3)		out
mbota	model_layer_number_at_cloud_base	vertical indices for low, middle and high cloud bases	index	integer	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:3)		out
raddt	time_step_for_radiation	radiation time step	s	real	()	kind_phys	out
tsfg	surface_ground_temperature_for_radiation	surface ground temperature for radiation	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
tsfa	surface_air_temperature_for_radiation	lowest model layer air temperature for radiation	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
de_lgth	cloud_decorrelation_length	cloud decorrelation length	km	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
alb1d	surface_albedo_perturbation	surface albedo perturbation	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
delp	layer_pressure_thickness_for_radiation	layer pressure thickness on radiation levels	hPa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
dz	layer_thickness_for_radiation	layer thickness on radiation levels	km	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
plvl	air_pressure_at_interface_for_radiation_in_hpa	air pressure at vertical interface for radiation calculation	hPa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_level_dimension_for_radiation)	kind_phys	out
plyr	air_pressure_at_layer_for_radiation_in_hpa	air pressure at vertical layer for radiation calculation	hPa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
tlvl	air_temperature_at_interface_for_radiation	air temperature at vertical interface for radiation calculation	K	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_level_dimension_for_radiation)	kind_phys	out
tlyr	air_temperature_at_layer_for_radiation	air temperature at vertical layer for radiation calculation	K	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
qlyr	water_vapor_specific_humidity_at_layer_for_radiation	water vapor specific humidity at vertical layer for radiation calculation	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
olyr	ozone_concentration_at_layer_for_radiation	ozone concentration	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_co2	volume_mixing_ratio_of_co2	CO2 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_n2o	volume_mixing_ratio_of_n2o	N2O volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_ch4	volume_mixing_ratio_of_ch4	CH4 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_o2	volume_mixing_ratio_of_o2	O2 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_co	volume_mixing_ratio_of_co	CO volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_cfc11	volume_mixing_ratio_of_cfc11	CFC11 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_cfc12	volume_mixing_ratio_of_cfc12	CFC12 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_cfc22	volume_mixing_ratio_of_cfc22	CFC22 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_ccl4	volume_mixing_ratio_of_ccl4	CCL4 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
gasvmr_cfc113	volume_mixing_ratio_of_cfc113	CFC113 volume mixing ratio	m3 m-3	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
aerodp	atmosphere_optical_thickness_due_to_ambient_aerosol_particles	vertical integrated optical depth for various aerosol species	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:number_of_species_for_aerosol_optical_depth)	kind_phys	out
clouds6	cloud_rain_water_path	cloud rain water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
clouds7	mean_effective_radius_for_rain_drop	mean effective radius for rain drop	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
clouds8	cloud_snow_water_path	cloud snow water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
clouds9	mean_effective_radius_for_snow_flake	mean effective radius for snow flake	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
cldsa	cloud_area_fraction_for_radiation	fraction of clouds for low, middle,high, total and BL	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:5)	kind_phys	out
cldfra	instantaneous_3d_cloud_fraction	instantaneous 3D cloud fraction for all MPs	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
cldfra2d	max_in_column_cloud_fraction	instantaneous 2D (max-in-column) cloud fraction	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
lwp_ex	liq_water_path_from_microphysics	total liquid water path from explicit microphysics	kg m-2	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
iwp_ex	ice_water_path_from_microphysics	total ice water path from explicit microphysics	kg m-2	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
lwp_fc	liq_water_path_from_cloud_fraction	total liquid water path from cloud fraction scheme	kg m-2	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
iwp_fc	ice_water_path_from_cloud_fraction	total ice water path from cloud fraction scheme	kg m-2	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
faersw1	aerosol_optical_depth_for_shortwave_bands_01_16	aerosol optical depth for shortwave bands 01-16	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation, ccpp_constant_one:number_of_aerosol_bands_for_shortwave_radiation)	kind_phys	out
faersw2	aerosol_single_scattering_albedo_for_shortwave_bands_01_16	aerosol single scattering albedo for shortwave bands 01-16	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation, ccpp_constant_one:number_of_aerosol_bands_for_shortwave_radiation)	kind_phys	out
faersw3	aerosol_asymmetry_parameter_for_shortwave_bands_01_16	aerosol asymmetry parameter for shortwave bands 01-16	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation, ccpp_constant_one:number_of_aerosol_bands_for_shortwave_radiation)	kind_phys	out
faerlw1	aerosol_optical_depth_for_longwave_bands_01_16	aerosol optical depth for longwave bands 01-16	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation, ccpp_constant_one:number_of_aerosol_bands_for_longwave_radiation)	kind_phys	out
faerlw2	aerosol_single_scattering_albedo_for_longwave_bands_01_16	aerosol single scattering albedo for longwave bands 01-16	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation, ccpp_constant_one:number_of_aerosol_bands_for_longwave_radiation)	kind_phys	out
faerlw3	aerosol_asymmetry_parameter_for_longwave_bands_01_16	aerosol asymmetry parameter for longwave bands 01-16	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation, ccpp_constant_one:number_of_aerosol_bands_for_longwave_radiation)	kind_phys	out
alpha	cloud_overlap_decorrelation_parameter	cloud overlap decorrelation parameter	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:adjusted_vertical_layer_dimension_for_radiation)	kind_phys	out
spp_wts_rad	spp_weights_for_radiation_scheme	spp weights for radiation scheme	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
spp_rad	control_for_radiation_spp_perturbations	control for radiation spp perturbations	count	integer	()		in
errmsg	ccpp_error_message	error message for error handling in CCPP	none	character	()	len=*	out
errflg	ccpp_error_code	error code for error handling in CCPP	1	integer	()		out

General Algorithm

• Setup surface ground temperature and ground/air skin temperature if required.
• Prepare atmospheric profiles for radiation input.
• Compute relative humidity.
• Recast remaining all tracers (except sphum) forcing them all to be positive.
• Get layer ozone mass mixing ratio (if use ozone climatology data, call getozn()).
• Call coszmn(), to compute cosine of zenith angle (only when SW is called)
• Call getgases(), to set up non-prognostic gas volume mixing ratioes (gasvmr).
• Get temperature at layer interface, and layer moisture.
• Call module_radiation_aerosols::setaer(),to setup aerosols property profile for radiation.
• Obtain cloud information for radiation calculations (clouds,cldsa,mtopa,mbota)
• Call Thompson's subroutine calc_effectRad() to compute effective radii
• Call radiation_clouds_prop() to calculate cloud properties.
• Call ppfbet() to perturb cld cover.
• Call cdfnor() to pert surface albedo.

References module_radiation_clouds::adjust_cloudfinal(), module_radiation_clouds::adjust_cloudh2o(), module_radiation_clouds::adjust_cloudice(), module_radiation_clouds::cal_cldfra3(), module_mp_thompson::calc_effectrad(), surface_perturbation::cdfnor(), module_radiation_astronomy::coszmn(), module_radiation_gases::getgases(), module_radiation_gases::getozn(), module_mp_thompson_make_number_concentrations::make_dropletnumber(), module_mp_thompson_make_number_concentrations::make_icenumber(), module_mp_thompson_make_number_concentrations::make_rainnumber(), module_radiation_clouds::nf_clds, module_radiation_gases::nf_vgas, surface_perturbation::ppfbet(), and module_radiation_clouds::radiation_clouds_prop().

Here is the call graph for this function: