rrtmgp_sw_main_run()

subroutine, public rrtmgp_sw_main::rrtmgp_sw_main_run	(	logical, intent(in)	doswrad,
		logical, intent(in)	doswclrsky,
		logical, intent(in)	top_at_1,
		logical, intent(in)	dogp_sgs_cnv,
		logical, intent(in)	dogp_sgs_pbl,
		integer, intent(in)	ncol,
		integer, intent(in)	nday,
		integer, intent(in)	nlay,
		integer, intent(in)	ngases,
		integer, intent(in)	rrtmgp_phys_blksz,
		integer, dimension(:), intent(in)	idx,
		integer, dimension(:), intent(in), optional	icseed_sw,
		integer, intent(in)	iovr,
		integer, intent(in)	iovr_convcld,
		integer, intent(in)	iovr_max,
		integer, intent(in)	iovr_maxrand,
		integer, intent(in)	iovr_rand,
		integer, intent(in)	iovr_dcorr,
		integer, intent(in)	iovr_exp,
		integer, intent(in)	iovr_exprand,
		integer, intent(in)	isubc_sw,
		integer, intent(in)	isfc,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_nir_dir,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_nir_dif,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_uvvis_dir,
		real(kind_phys), dimension(:), intent(in)	sfc_alb_uvvis_dif,
		real(kind_phys), dimension(:), intent(in)	coszen,
		real(kind_phys), dimension(:,:), intent(in), optional	p_lay,
		real(kind_phys), dimension(:,:), intent(in), optional	p_lev,
		real(kind_phys), dimension(:,:), intent(in), optional	t_lay,
		real(kind_phys), dimension(:,:), intent(in), optional	t_lev,
		real(kind_phys), dimension(:,:), intent(in), optional	vmr_o2,
		real(kind_phys), dimension(:,:), intent(in), optional	vmr_h2o,
		real(kind_phys), dimension(:,:), intent(in), optional	vmr_o3,
		real(kind_phys), dimension(:,:), intent(in), optional	vmr_ch4,
		real(kind_phys), dimension(:,:), intent(in), optional	vmr_n2o,
		real(kind_phys), dimension(:,:), intent(in), optional	vmr_co2,
		real(kind_phys), dimension(:,:), intent(in)	cld_frac,
		real(kind_phys), dimension(:,:), intent(in)	cld_lwp,
		real(kind_phys), dimension(:,:), intent(in)	cld_reliq,
		real(kind_phys), dimension(:,:), intent(in)	cld_iwp,
		real(kind_phys), dimension(:,:), intent(in)	cld_reice,
		real(kind_phys), dimension(:,:), intent(in)	cld_swp,
		real(kind_phys), dimension(:,:), intent(in)	cld_resnow,
		real(kind_phys), dimension(:,:), intent(in)	cld_rwp,
		real(kind_phys), dimension(:,:), intent(in)	cld_rerain,
		real(kind_phys), dimension(:,:), intent(in), optional	precip_frac,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_lwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_reliq,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_iwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_cnv_reice,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_lwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_reliq,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_iwp,
		real(kind_phys), dimension(:,:), intent(in), optional	cld_pbl_reice,
		real(kind_phys), dimension(:,:), intent(in), optional	cloud_overlap_param,
		character(len=*), dimension(:), intent(in), optional	active_gases_array,
		real(kind_phys), dimension(:,:,:), intent(in)	aersw_tau,
		real(kind_phys), dimension(:,:,:), intent(in)	aersw_ssa,
		real(kind_phys), dimension(:,:,:), intent(in)	aersw_g,
		real(kind_phys), intent(in)	solcon,
		type(cmpfsw_type), dimension(:), intent(inout)	scmpsw,
		real(kind_phys), dimension(:,:), intent(inout), optional	fluxswup_allsky,
		real(kind_phys), dimension(:,:), intent(inout), optional	fluxswdown_allsky,
		real(kind_phys), dimension(:,:), intent(inout), optional	fluxswup_clrsky,
		real(kind_phys), dimension(:,:), intent(inout), optional	fluxswdown_clrsky,
		real(kind_phys), dimension(:,:), intent(inout)	cldtausw,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg )

Argument Table

local_name	standard_name	long_name	units	type	dimensions	kind	intent
doSWrad	flag_for_calling_shortwave_radiation	logical flags for sw radiation calls	flag	logical	()		in
doSWclrsky	flag_for_output_of_tendency_of_air_temperature_due_to_shortwave_heating_on_radiation_timestep_assuming_clear_sky	flag to output sw heating rate (Radtend%swhc)	flag	logical	()		in
top_at_1	flag_for_vertical_ordering_in_radiation	flag for vertical ordering in radiation	flag	logical	()		in
iSFC	vertical_index_for_surface_in_rrtmgp	index for surface layer in RRTMGP	flag	integer	()		in
doGP_sgs_cnv	flag_to_include_sgs_convective_cloud_in_rrtmgp	logical flag to control sgs convective cloud in RRTMGP	flag	logical	()		in
doGP_sgs_pbl	flag_to_include_sgs_mynn_edmf_cloud_in_rrtmgp	logical flag to control MYNN-EDMF PBL cloud in RRTMGP	flag	logical	()		in
ncol	horizontal_loop_extent	horizontal dimension	count	integer	()		in
nLay	vertical_layer_dimension	number of vertical levels	count	integer	()		in
rrtmgp_phys_blksz	number_of_columns_per_rrtmgp_sw_block	number of columns to process at a time by RRTMGP SW scheme	count	integer	()		in
nGases	number_of_active_gases_used_by_rrtmgp	number of gases available used by RRTMGP (Model%nGases)	count	integer	()		in
nday	daytime_points_dimension	daytime points dimension	count	integer	()		in
idx	daytime_points	daytime points	index	integer	(ccpp_constant_one:horizontal_loop_extent)		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	in
isubc_sw	flag_for_sw_clouds_grid_approximation	flag for sw clouds sub-grid approximation	flag	integer	()		in
iovr	flag_for_cloud_overlap_method_for_radiation	max-random overlap clouds	flag	integer	()		in
iovr_maxrand	flag_for_maximum_random_cloud_overlap_method	choice of maximum-random 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
iovr_rand	flag_for_random_cloud_overlap_method	choice of 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_convcld	flag_for_convective_cloud_overlap_method_for_radiation	flag for convective cloud overlap method	flag	integer	()		in
icseed_sw	random_number_seed_for_mcica_shortwave	seed for random number generation for shortwave radiation	none	integer	(ccpp_constant_one:horizontal_loop_extent)		in
p_lay	air_pressure_at_layer_for_rrtmgp	air pressure at vertical layer for radiation calculation	Pa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
p_lev	air_pressure_at_interface_for_rrtmgp	air pressure at vertical interface for radiation calculation	Pa	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	in
t_lay	air_temperature_at_layer_for_rrtmgp	air temperature at vertical layer for radiation calculation	K	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
t_lev	air_temperature_at_interface_for_rrtmgp	air temperature at vertical interface for radiation calculation	K	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	in
vmr_o2	volume_mixing_ratio_for_o2	molar mixing ratio of o2 in with respect to dry air	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
vmr_h2o	volume_mixing_ratio_for_h2o	molar mixing ratio of h2o in with respect to dry air	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
vmr_o3	volume_mixing_ratio_for_o3	molar mixing ratio of o3 in with respect to dry air	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
vmr_ch4	volume_mixing_ratio_for_ch4	molar mixing ratio of ch4 in with respect to dry air	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
vmr_n2o	volume_mixing_ratio_for_n2o	molar mixing ratio of n2o in with respect to dry air	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
vmr_co2	volume_mixing_ratio_for_co2	molar mixing ratio of co2 in with respect to dry air	1	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_frac	total_cloud_fraction	layer total cloud fraction	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_lwp	cloud_liquid_water_path	layer cloud liquid water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_reliq	mean_effective_radius_for_liquid_cloud	mean effective radius for liquid cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_iwp	cloud_ice_water_path	layer cloud ice water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_reice	mean_effective_radius_for_ice_cloud	mean effective radius for ice cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_swp	cloud_snow_water_path	layer cloud snow water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_resnow	mean_effective_radius_for_snow_flake	mean effective radius for snow cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_rwp	cloud_rain_water_path	layer cloud rain water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_rerain	mean_effective_radius_for_rain_drop	mean effective radius for rain cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
precip_frac	precipitation_fraction_by_layer	precipitation fraction in each layer	frac	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_cnv_lwp	convective_cloud_liquid_water_path	layer convective cloud liquid water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_cnv_iwp	convective_cloud_ice_water_path	layer convective cloud ice water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_cnv_reliq	mean_effective_radius_for_liquid_convective_cloud	mean effective radius for liquid convective cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_cnv_reice	mean_effective_radius_for_ice_convective_cloud	mean effective radius for ice convective cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_pbl_lwp	mynn_sgs_cloud_liquid_water_path	layer convective cloud liquid water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_pbl_iwp	mynn_sgs_cloud_ice_water_path	layer convective cloud ice water path	g m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_pbl_reliq	mean_effective_radius_for_liquid_mynn_sgs_cloud	mean effective radius for liquid MYNN_SGS cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cld_pbl_reice	mean_effective_radius_for_ice_mynn_sgs_cloud	mean effective radius for ice MYNN_SGS cloud	um	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
cloud_overlap_param	cloud_overlap_param	cloud overlap parameter	km	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	in
sfc_alb_nir_dir	surface_albedo_due_to_near_ir_direct	surface albedo due to near IR direct beam	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
sfc_alb_nir_dif	surface_albedo_due_to_near_ir_diffused	surface albedo due to near IR diffused beam	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
sfc_alb_uvvis_dir	surface_albedo_due_to_uv_and_vis_direct	surface albedo due to UV+VIS direct beam	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
sfc_alb_uvvis_dif	surface_albedo_due_to_uv_and_vis_diffused	surface albedo due to UV+VIS diffused beam	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
active_gases_array	list_of_active_gases_used_by_rrtmgp	list of active gases used by RRTMGP	none	character	(ccpp_constant_one:number_of_active_gases_used_by_RRTMGP)	len=*	in
aersw_tau	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:vertical_layer_dimension, ccpp_constant_one:number_of_aerosol_bands_for_shortwave_radiation)	kind_phys	in
aersw_ssa	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:vertical_layer_dimension, ccpp_constant_one:number_of_aerosol_bands_for_shortwave_radiation)	kind_phys	in
aersw_g	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:vertical_layer_dimension, ccpp_constant_one:number_of_aerosol_bands_for_shortwave_radiation)	kind_phys	in
solcon	solar_constant	solar constant	W m-2	real	()	kind_phys	in
scmpsw	components_of_surface_downward_shortwave_fluxes	derived type for special components of surface downward shortwave fluxes	W m-2	cmpfsw_type	(ccpp_constant_one:horizontal_loop_extent)	cmpfsw_type	inout
fluxswUP_allsky	rrtmgp_sw_flux_profile_upward_allsky	RRTMGP upward shortwave all-sky flux profile	W m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	inout
fluxswDOWN_allsky	rrtmgp_sw_flux_profile_downward_allsky	RRTMGP downward shortwave all-sky flux profile	W m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	inout
fluxswUP_clrsky	rrtmgp_sw_flux_profile_upward_clrsky	RRTMGP upward shortwave clr-sky flux profile	W m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	inout
fluxswDOWN_clrsky	rrtmgp_sw_flux_profile_downward_clrsky	RRTMGP downward shortwave clr-sky flux profile	W m-2	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)	kind_phys	inout
cldtausw	cloud_optical_depth_layers_at_0p55mu_band	approx .55mu band layer cloud optical depth	none	real	(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)	kind_phys	inout
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

Definition at line 83 of file rrtmgp_sw_main.F90.