subroutine sgscloud_radpre::sgscloud_radpre_run	(	integer, intent(in)	im,
		integer, intent(in)	levs,
		logical, intent(in)	flag_init,
		logical, intent(in)	flag_restart,
		logical, intent(in)	do_mynnedmf,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qc,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qi,
		real(kind=kind_phys), dimension(im,levs), intent(in)	qv,
		real(kind=kind_phys), dimension(im,levs), intent(in)	T3D,
		real(kind=kind_phys), dimension(im,levs), intent(in)	P3D,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qr,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qs,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qg,
		real(kind=kind_phys), dimension(:,:), intent(inout)	qci_conv,
		integer, intent(in)	imfdeepcnv,
		integer, intent(in)	imfdeepcnv_gf,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qc_save,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	qi_save,
		real(kind=kind_phys), dimension(im,levs), intent(in)	qc_bl,
		real(kind=kind_phys), dimension(im,levs), intent(in)	qi_bl,
		real(kind=kind_phys), dimension(im,levs), intent(in)	cldfra_bl,
		real(kind=kind_phys), dimension(im,levs), intent(in)	delp,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	clouds1,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	clouds2,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	clouds3,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	clouds4,
		real(kind=kind_phys), dimension(im,levs), intent(inout)	clouds5,
		real(kind=kind_phys), dimension(im), intent(in)	slmsk,
		integer, intent(in)	nlay,
		real(kind=kind_phys), dimension(im,nlay), intent(in)	plyr,
		real(kind=kind_phys), dimension(im), intent(in)	xlat,
		real(kind=kind_phys), dimension(im,nlay), intent(in)	dz,
		real(kind=kind_phys), dimension(im), intent(in)	de_lgth,
		real(kind=kind_phys), dimension(im,5), intent(inout)	cldsa,
		integer, dimension(im,3), intent(inout)	mtopa,
		integer, dimension(im,3), intent(inout)	mbota,
		integer, intent(in)	imp_physics,
		integer, intent(in)	imp_physics_gfdl,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Argument Table

local_name	standard_name	long_name	units	type	dimensions	kind	intent	optional
im	horizontal_loop_extent	horizontal loop extent	count	integer	()		in	False
levs	vertical_dimension	vertical layer dimension	count	integer	()		in	False
flag_init	flag_for_first_time_step	flag signaling first time step for time integration loop	flag	logical	()		in	False
flag_restart	flag_for_restart	flag for restart (warmstart) or coldstart	flag	logical	()		in	False
qc	cloud_condensed_water_mixing_ratio	ratio of mass of cloud water to mass of dry air plus vapor (without condensates)	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
qi	ice_water_mixing_ratio	ratio of mass of ice water to mass of dry air plus vapor (without condensates)	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
qv	water_vapor_specific_humidity	water vapor specific humidity	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	in	False
T3D	air_temperature	layer mean air temperature	K	real	(horizontal_dimension, vertical_dimension)	kind_phys	in	False
P3D	air_pressure	mean layer pressure	Pa	real	(horizontal_dimension, vertical_dimension)	kind_phys	in	False
qr	rain_water_mixing_ratio	moist (dry+vapor, no condensates) mixing ratio of rain water	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
qs	snow_water_mixing_ratio	moist (dry+vapor, no condensates) mixing ratio of snow water	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
qg	graupel_mixing_ratio	graupel mixing ratio wrt dry+vapor (no condensates)	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
qci_conv	convective_cloud_condesate_after_rainout	convective cloud condesate after rainout	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
imfdeepcnv	flag_for_mass_flux_deep_convection_scheme	flag for mass-flux deep convection scheme	flag	integer	()		in	False
imfdeepcnv_gf	flag_for_gf_deep_convection_scheme	flag for Grell-Freitas deep convection scheme	flag	integer	()		in	False
qc_save	cloud_condensed_water_mixing_ratio_save	ratio of mass of cloud water to mass of dry air plus vapor (without condensates) before entering a physics scheme	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
qi_save	ice_water_mixing_ratio_save	ratio of mass of ice water to mass of dry air plus vapor (without condensates) before entering a physics scheme	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
QC_BL	subgrid_cloud_water_mixing_ratio_pbl	subgrid cloud water mixing ratio from PBL scheme	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	in	False
QI_BL	subgrid_cloud_ice_mixing_ratio_pbl	subgrid cloud ice mixing ratio from PBL scheme	kg kg-1	real	(horizontal_dimension, vertical_dimension)	kind_phys	in	False
CLDFRA_BL	subgrid_cloud_fraction_pbl	subgrid cloud fraction from PBL scheme	frac	real	(horizontal_dimension, vertical_dimension)	kind_phys	in	False
delp	layer_pressure_thickness_for_radiation	layer pressure thickness on radiation levels	hPa	real	(horizontal_dimension, adjusted_vertical_layer_dimension_for_radiation)	kind_phys	in	False
clouds1	total_cloud_fraction	layer total cloud fraction	frac	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
clouds2	cloud_liquid_water_path	layer cloud liquid water path	g m-2	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
clouds3	mean_effective_radius_for_liquid_cloud	mean effective radius for liquid cloud	micron	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
clouds4	cloud_ice_water_path	layer cloud ice water path	g m-2	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
clouds5	mean_effective_radius_for_ice_cloud	mean effective radius for ice cloud	micron	real	(horizontal_dimension, vertical_dimension)	kind_phys	inout	False
slmsk	sea_land_ice_mask_real	landmask: sea/land/ice=0/1/2	flag	real	(horizontal_dimension)	kind_phys	in	False
nlay	adjusted_vertical_layer_dimension_for_radiation	number of vertical layers for radiation	count	integer	()		in	False
plyr	air_pressure_at_layer_for_radiation_in_hPa	air pressure at vertical layer for radiation calculation	hPa	real	(horizontal_dimension, adjusted_vertical_layer_dimension_for_radiation)	kind_phys	in	False
xlat	latitude	grid latitude	radian	real	(horizontal_dimension)	kind_phys	in	False
dz	layer_thickness_for_radiation	layer thickness on radiation levels	km	real	(horizontal_dimension, adjusted_vertical_layer_dimension_for_radiation)	kind_phys	in	False
de_lgth	cloud_decorrelation_length	cloud decorrelation length	km	real	(horizontal_dimension)	kind_phys	in	False
cldsa	cloud_area_fraction_for_radiation	fraction of clouds for low, middle,high, total and BL	frac	real	(horizontal_dimension, 5)	kind_phys	inout	False
mtopa	model_layer_number_at_cloud_top	vertical indices for low, middle and high cloud tops	index	integer	(horizontal_dimension, 3)		inout	False
mbota	model_layer_number_at_cloud_base	vertical indices for low, middle and high cloud bases	index	integer	(horizontal_dimension, 3)		inout	False
do_mynnedmf	do_mynnedmf	flag to activate MYNN-EDMF	flag	logical	()		in	False
imp_physics	flag_for_microphysics_scheme	choice of microphysics scheme	flag	integer	()		in	False
imp_physics_gfdl	flag_for_gfdl_microphysics_scheme	choice of GFDL microphysics scheme	flag	integer	()		in	False
errmsg	ccpp_error_message	error message for error handling in CCPP	none	character	()	len=*	out	False
errflg	ccpp_error_flag	error flag for error handling in CCPP	flag	integer	()		out	False

cloud array description: ! clouds(:,:,1) - layer total cloud fraction ! clouds(:,:,2) - layer cloud liq water path ! clouds(:,:,3) - mean effective radius for liquid cloud ! clouds(:,:,4) - layer cloud ice water path ! clouds(:,:,5) - mean effective radius for ice cloud !

GSD SGS Scheme General Algorithm

• Compute SFC/low/middle/high cloud top pressure for each cloud domain for given latitude.
• Recompute the diagnostic high, mid, low, total and bl cloud fraction

References physcons::con_eps, physcons::con_g, physcons::con_pi, funcphys::fpvs(), module_radiation_clouds::gethml(), and radcons::qmin.

Here is the call graph for this function: