gfs_surface_composites_pre_run()

subroutine, public gfs_surface_composites_pre::gfs_surface_composites_pre_run	(	integer, intent(in)	im,
		integer, intent(in)	lkm,
		logical, intent(in)	frac_grid,
		integer, intent(in)	iopt_lake,
		integer, intent(in)	iopt_lake_clm,
		logical, dimension(:), intent(inout)	flag_cice,
		logical, intent(in)	cplflx,
		logical, intent(in)	cplice,
		logical, intent(in)	cplwav2atm,
		integer, intent(in)	lsm,
		integer, intent(in)	lsm_ruc,
		real(kind=kind_phys), dimension(:), intent(in)	landfrac,
		real(kind=kind_phys), dimension(:), intent(in)	lakefrac,
		real(kind=kind_phys), dimension(:), intent(in)	lakedepth,
		real(kind=kind_phys), dimension(:), intent(in)	oceanfrac,
		real(kind=kind_phys), dimension(:), intent(out)	frland,
		logical, dimension(:), intent(inout)	dry,
		logical, dimension(:), intent(inout)	icy,
		logical, dimension(:), intent(inout)	lake,
		integer, dimension(:), intent(in)	use_lake_model,
		logical, dimension(:), intent(inout)	wet,
		real(kind=kind_phys), dimension(:), intent(inout)	hice,
		real(kind=kind_phys), dimension(:), intent(inout)	cice,
		real(kind=kind_phys), dimension(:), intent(inout)	zorlo,
		real(kind=kind_phys), dimension(:), intent(inout)	zorll,
		real(kind=kind_phys), dimension(:), intent(inout)	zorli,
		real(kind=kind_phys), dimension(:), intent(in)	snowd,
		real(kind=kind_phys), dimension(:), intent(inout)	snowd_lnd,
		real(kind=kind_phys), dimension(:), intent(inout)	snowd_ice,
		real(kind=kind_phys), dimension(:), intent(in)	tprcp,
		real(kind=kind_phys), dimension(:), intent(inout)	tprcp_wat,
		real(kind=kind_phys), dimension(:), intent(inout)	tgrs1,
		real(kind=kind_phys), dimension(:), intent(inout)	tprcp_lnd,
		real(kind=kind_phys), dimension(:), intent(inout)	tprcp_ice,
		real(kind=kind_phys), dimension(:), intent(in)	uustar,
		real(kind=kind_phys), dimension(:), intent(inout)	uustar_wat,
		real(kind=kind_phys), dimension(:), intent(inout)	uustar_lnd,
		real(kind=kind_phys), dimension(:), intent(inout)	uustar_ice,
		real(kind=kind_phys), dimension(:), intent(in)	weasd,
		real(kind=kind_phys), dimension(:), intent(inout)	weasd_lnd,
		real(kind=kind_phys), dimension(:), intent(inout)	weasd_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	ep1d_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfc,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfco,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfcl,
		real(kind=kind_phys), dimension(:), intent(inout)	tsfc_wat,
		real(kind=kind_phys), dimension(:), intent(in)	tisfc,
		real(kind=kind_phys), dimension(:), intent(inout)	tsurf_wat,
		real(kind=kind_phys), dimension(:), intent(inout)	tsurf_lnd,
		real(kind=kind_phys), dimension(:), intent(inout)	tsurf_ice,
		real(kind=kind_phys), dimension(:), intent(inout)	gflx_ice,
		real(kind=kind_phys), intent(in)	tgice,
		integer, dimension(:), intent(inout)	islmsk,
		integer, dimension(:), intent(inout)	islmsk_cice,
		real(kind=kind_phys), dimension(:), intent(inout)	slmsk,
		real(kind=kind_phys), dimension(:), intent(in)	qss,
		real(kind=kind_phys), dimension(:), intent(inout)	qss_wat,
		real(kind=kind_phys), dimension(:), intent(inout)	qss_lnd,
		real(kind=kind_phys), dimension(:), intent(inout)	qss_ice,
		real(kind=kind_phys), intent(in)	min_lakeice,
		real(kind=kind_phys), intent(in)	min_seaice,
		integer, intent(in)	kdt,
		real(kind=kind_phys), intent(in)	huge,
		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
lkm	control_for_lake_model_execution_method	control for lake model execution: 0=no lake, 1=lake, 2=lake+nsst	flag	integer	()		in
frac_grid	flag_for_fractional_landmask	flag for fractional grid	flag	logical	()		in
flag_cice	flag_for_cice	flag for cice	flag	logical	(ccpp_constant_one:horizontal_loop_extent)		inout
cplflx	flag_for_surface_flux_coupling	flag controlling cplflx collection (default off)	flag	logical	()		in
cplice	flag_for_sea_ice_coupling	flag controlling cplice collection (default on)	flag	logical	()		in
cplwav2atm	flag_for_one_way_ocean_wave_coupling_to_atmosphere	flag controlling ocean wave coupling to the atmosphere (default off)	flag	logical	()		in
lsm	control_for_land_surface_scheme	flag for land surface model	flag	integer	()		in
lsm_ruc	identifier_for_ruc_land_surface_scheme	flag for RUC land surface model	flag	integer	()		in
landfrac	land_area_fraction	fraction of horizontal grid area occupied by land	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
lakefrac	lake_area_fraction	fraction of horizontal grid area occupied by lake	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
lakedepth	lake_depth	lake depth	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
oceanfrac	sea_area_fraction	fraction of horizontal grid area occupied by ocean	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
frland	land_area_fraction_for_microphysics	land area fraction used in microphysics schemes	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	out
dry	flag_nonzero_land_surface_fraction	flag indicating presence of some land surface area fraction	flag	logical	(ccpp_constant_one:horizontal_loop_extent)		inout
icy	flag_nonzero_sea_ice_surface_fraction	flag indicating presence of some sea ice surface area fraction	flag	logical	(ccpp_constant_one:horizontal_loop_extent)		inout
lake	flag_nonzero_lake_surface_fraction	flag indicating presence of some lake surface area fraction	flag	logical	(ccpp_constant_one:horizontal_loop_extent)		inout
use_lake_model	flag_for_using_lake_model	flag indicating lake points using a lake model	flag	integer	(ccpp_constant_one:horizontal_loop_extent)		in
iopt_lake	control_for_lake_model_selection	control for lake model selection	1	integer	()		in
iopt_lake_clm	clm_lake_model_control_selection_value	value that indicates clm lake model in the control for lake model selection	1	integer	()		in
wet	flag_nonzero_wet_surface_fraction	flag indicating presence of some ocean or lake surface area fraction	flag	logical	(ccpp_constant_one:horizontal_loop_extent)		inout
hice	sea_ice_thickness	sea ice thickness	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
cice	sea_ice_area_fraction_of_sea_area_fraction	ice fraction over open water	frac	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
zorlo	surface_roughness_length_over_water	surface roughness length over water	cm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
zorll	surface_roughness_length_over_land	surface roughness length over land	cm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
zorli	surface_roughness_length_over_ice	surface roughness length over ice	cm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
snowd	lwe_surface_snow	water equivalent snow depth	mm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
snowd_lnd	surface_snow_thickness_water_equivalent_over_land	water equivalent snow depth over land	mm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
snowd_ice	surface_snow_thickness_water_equivalent_over_ice	water equivalent snow depth over ice	mm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tgrs1	air_temperature_at_surface_adjacent_layer	mean temperature at lowest model layer	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
tprcp	nonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep	total precipitation amount in each time step	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
tprcp_wat	nonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep_over_water	total precipitation amount in each time step over water	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tprcp_lnd	nonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep_over_land	total precipitation amount in each time step over land	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tprcp_ice	nonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep_over_ice	total precipitation amount in each time step over ice	m	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
uustar	surface_friction_velocity	boundary layer parameter	m s-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
uustar_wat	surface_friction_velocity_over_water	surface friction velocity over water	m s-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
uustar_lnd	surface_friction_velocity_over_land	surface friction velocity over land	m s-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
uustar_ice	surface_friction_velocity_over_ice	surface friction velocity over ice	m s-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
weasd	lwe_thickness_of_surface_snow_amount	water equiv of acc snow depth over land and sea ice	mm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
weasd_lnd	water_equivalent_accumulated_snow_depth_over_land	water equiv of acc snow depth over land	mm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
weasd_ice	water_equivalent_accumulated_snow_depth_over_ice	water equiv of acc snow depth over ice	mm	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
ep1d_ice	surface_upward_potential_latent_heat_flux_over_ice	surface upward potential latent heat flux over ice	W m-2	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tsfc	surface_skin_temperature	surface skin temperature	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tsfco	sea_surface_temperature	sea surface temperature	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tsfcl	surface_skin_temperature_over_land	surface skin temperature over land	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tsfc_wat	surface_skin_temperature_over_water	surface skin temperature over water	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tisfc	surface_skin_temperature_over_ice	surface skin temperature over ice	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
tsurf_wat	surface_skin_temperature_after_iteration_over_water	surface skin temperature after iteration over water	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tsurf_lnd	surface_skin_temperature_after_iteration_over_land	surface skin temperature after iteration over land	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tsurf_ice	surface_skin_temperature_after_iteration_over_ice	surface skin temperature after iteration over ice	K	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
gflx_ice	upward_heat_flux_in_soil_over_ice	soil heat flux over ice	W m-2	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
tgice	freezing_point_temperature_of_seawater	freezing point temperature of seawater	K	real	()	kind_phys	in
islmsk	sea_land_ice_mask	sea/land/ice mask (=0/1/2)	flag	integer	(ccpp_constant_one:horizontal_loop_extent)		inout
islmsk_cice	sea_land_ice_mask_cice	sea/land/ice mask cice (=0/1/2)	flag	integer	(ccpp_constant_one:horizontal_loop_extent)		inout
slmsk	area_type	landmask: sea/land/ice=0/1/2	flag	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
qss	surface_specific_humidity	surface air saturation specific humidity	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	in
qss_wat	surface_specific_humidity_over_water	surface air saturation specific humidity over water	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
qss_lnd	surface_specific_humidity_over_land	surface air saturation specific humidity over land	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
qss_ice	surface_specific_humidity_over_ice	surface air saturation specific humidity over ice	kg kg-1	real	(ccpp_constant_one:horizontal_loop_extent)	kind_phys	inout
min_lakeice	min_lake_ice_area_fraction	minimum lake ice value	frac	real	()	kind_phys	in
min_seaice	min_sea_ice_area_fraction	minimum sea ice value	frac	real	()	kind_phys	in
kdt	index_of_timestep	current forecast iteration	index	integer	()		in
huge	netcdf_float_fillvalue	definition of NetCDF float FillValue	none	real	()	kind_phys	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