lsm_ruc_init()

subroutine, public lsm_ruc::lsm_ruc_init	(	integer, intent(in)	me,
		integer, intent(in)	master,
		integer, intent(in)	isot,
		integer, intent(in)	ivegsrc,
		integer, intent(in)	nlunit,
		logical, intent(in)	lsm_cold_start,
		logical, intent(in)	flag_init,
		real (kind=kind_phys), intent(in)	con_fvirt,
		real (kind=kind_phys), intent(in)	con_rd,
		integer, intent(in)	im,
		integer, intent(in)	lsoil_ruc,
		integer, intent(in)	lsoil,
		integer, intent(in)	kice,
		integer, intent(in)	nlev,
		integer, intent(in)	lsm_ruc,
		integer, intent(in)	lsm,
		real (kind=kind_phys), dimension(:), intent(in)	slmsk,
		integer, dimension(:), intent(in)	stype,
		integer, dimension(:), intent(in)	vtype,
		real (kind=kind_phys), dimension(:), intent(in)	landfrac,
		real (kind=kind_phys), dimension(:), intent(in)	q1,
		real (kind=kind_phys), dimension(:), intent(in)	prsl1,
		real (kind=kind_phys), dimension(:), intent(in)	tsfc_lnd,
		real (kind=kind_phys), dimension(:), intent(in)	tsfc_ice,
		real (kind=kind_phys), dimension(:), intent(in)	tsfc_wat,
		real (kind=kind_phys), dimension(:), intent(in)	tg3,
		real (kind=kind_phys), dimension(:,:), intent(in)	smc,
		real (kind=kind_phys), dimension(:,:), intent(in)	slc,
		real (kind=kind_phys), dimension(:,:), intent(in)	stc,
		real (kind=kind_phys), dimension(:), intent(in)	fice,
		real (kind=kind_phys), intent(in)	min_seaice,
		real (kind=kind_phys), dimension(:), intent(in)	sncovr_lnd,
		real (kind=kind_phys), dimension(:), intent(in)	sncovr_ice,
		real (kind=kind_phys), dimension(:), intent(in)	snoalb,
		real (kind=kind_phys), dimension(:), intent(in)	facsf,
		real (kind=kind_phys), dimension(:), intent(in)	facwf,
		real (kind=kind_phys), dimension(:), intent(in)	alvsf,
		real (kind=kind_phys), dimension(:), intent(in)	alvwf,
		real (kind=kind_phys), dimension(:), intent(in)	alnsf,
		real (kind=kind_phys), dimension(:), intent(in)	alnwf,
		real (kind=kind_phys), dimension(:), intent(inout)	sfcqv_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	sfcqv_ice,
		real (kind=kind_phys), dimension(:), intent(inout)	sfalb_lnd_bck,
		real (kind=kind_phys), dimension(:), intent(out)	semisbase,
		real (kind=kind_phys), dimension(:), intent(inout)	semis_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	semis_ice,
		real (kind=kind_phys), dimension(:), intent(inout)	albdvis_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	albdnir_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	albivis_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	albinir_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	albdvis_ice,
		real (kind=kind_phys), dimension(:), intent(inout)	albdnir_ice,
		real (kind=kind_phys), dimension(:), intent(inout)	albivis_ice,
		real (kind=kind_phys), dimension(:), intent(inout)	albinir_ice,
		real (kind=kind_phys), dimension(:), intent(out)	zs,
		real (kind=kind_phys), dimension(:,:), intent(inout)	sh2o,
		real (kind=kind_phys), dimension(:,:), intent(inout)	smfrkeep,
		real (kind=kind_phys), dimension(:,:), intent(inout)	tslb,
		real (kind=kind_phys), dimension(:,:), intent(inout)	smois,
		real (kind=kind_phys), dimension(:), intent(inout)	wetness,
		real (kind=kind_phys), dimension(:,:), intent(inout)	tsice,
		real (kind=kind_phys), dimension(:), intent(out)	pores,
		real (kind=kind_phys), dimension(:), intent(out)	resid,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg
	)

Argument Table

local_name	standard_name	long_name	units	type	dimensions	kind	intent
me	mpi_rank	current MPI-rank	index	integer	()		in
master	mpi_root	master MPI-rank	index	integer	()		in
isot	control_for_soil_type_dataset	soil type dataset choice	index	integer	()		in
ivegsrc	control_for_vegetation_dataset	land use dataset choice	index	integer	()		in
nlunit	iounit_of_namelist	fortran unit number for file opens	none	integer	()		in
lsm_cold_start	do_lsm_cold_start	flag to signify LSM is cold-started	flag	logical	()		in
flag_init	flag_for_first_timestep	flag signaling first time step for time integration loop	flag	logical	()		in
con_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
con_rd	gas_constant_of_dry_air	ideal gas constant for dry air	J kg-1 K-1	real	()	kind_phys	in
im	horizontal_dimension	horizontal dimension	count	integer	()		in
lsoil_ruc	vertical_dimension_of_soil_internal_to_land_surface_scheme	number of soil layers internal to land surface model	count	integer	()		in
lsoil	vertical_dimension_of_soil	soil vertical layer dimension	count	integer	()		in
kice	vertical_dimension_of_sea_ice	vertical loop extent for ice levels, start at 1	count	integer	()		in
nlev	vertical_layer_dimension	number of vertical levels	count	integer	()		in
lsm_ruc	identifier_for_ruc_land_surface_scheme	flag for RUC land surface model	flag	integer	()		in
lsm	control_for_land_surface_scheme	flag for land surface model	flag	integer	()		in
slmsk	area_type	landmask: sea/land/ice=0/1/2	flag	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
stype	soil_type_classification	soil type for lsm	index	integer	(ccpp_constant_one:horizontal_dimension)		in
vtype	vegetation_type_classification	vegetation type for lsm	index	integer	(ccpp_constant_one:horizontal_dimension)		in
landfrac	land_area_fraction	fraction of horizontal grid area occupied by land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
q1	specific_humidity_at_surface_adjacent_layer	water vapor specific humidity at lowest model layer	kg kg-1	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
prsl1	air_pressure_at_surface_adjacent_layer	mean pressure at lowest model layer	Pa	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
tsfc_lnd	surface_skin_temperature_over_land	surface skin temperature over land	K	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
tsfc_ice	surface_skin_temperature_over_ice	surface skin temperature over ice	K	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
tsfc_wat	sea_surface_temperature	surface skin temperature over water	K	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
tg3	deep_soil_temperature	deep soil temperature	K	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
smc	volume_fraction_of_condensed_water_in_soil	total soil moisture	frac	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil)	kind_phys	in
slc	volume_fraction_of_unfrozen_water_in_soil	liquid soil moisture	frac	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil)	kind_phys	in
stc	soil_temperature	soil temperature	K	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil)	kind_phys	in
fice	sea_ice_area_fraction_of_sea_area_fraction	ice fraction over open water	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
min_seaice	min_sea_ice_area_fraction	minimum sea ice value	frac	real	()	kind_phys	in
sncovr_lnd	surface_snow_area_fraction_over_land	surface snow area fraction over land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
sncovr_ice	surface_snow_area_fraction_over_ice	surface snow area fraction over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
snoalb	upper_bound_of_max_albedo_assuming_deep_snow	maximum snow albedo	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
facsf	strong_cosz_area_fraction	fractional coverage with strong cosz dependency	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
facwf	weak_cosz_area_fraction	fractional coverage with weak cosz dependency	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
alvsf	vis_albedo_strong_cosz	mean vis albedo with strong cosz dependency	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
alvwf	vis_albedo_weak_cosz	mean vis albedo with weak cosz dependency	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
alnsf	nir_albedo_strong_cosz	mean nir albedo with strong cosz dependency	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
alnwf	nir_albedo_weak_cosz	mean nir albedo with weak cosz dependency	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	in
sfcqv_lnd	water_vapor_mixing_ratio_at_surface_over_land	water vapor mixing ratio at surface over land	kg kg-1	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
sfcqv_ice	water_vapor_mixing_ratio_at_surface_over_ice	water vapor mixing ratio at surface over ice	kg kg-1	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
sfalb_lnd_bck	surface_snow_free_albedo_over_land	surface snow-free albedo over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
semisbase	baseline_surface_longwave_emissivity	baseline surface lw emissivity in fraction	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	out
semis_lnd	surface_longwave_emissivity_over_land	surface lw emissivity in fraction over land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
semis_ice	surface_longwave_emissivity_over_ice	surface lw emissivity in fraction over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albdvis_lnd	surface_albedo_direct_visible_over_land	direct surface albedo visible band over land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albdnir_lnd	surface_albedo_direct_nir_over_land	direct surface albedo NIR band over land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albivis_lnd	surface_albedo_diffuse_visible_over_land	diffuse surface albedo visible band over land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albinir_lnd	surface_albedo_diffuse_nir_over_land	diffuse surface albedo NIR band over land	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albdvis_ice	surface_albedo_direct_visible_over_ice	direct surface albedo visible band over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albdnir_ice	surface_albedo_direct_nir_over_ice	direct surface albedo NIR band over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albivis_ice	surface_albedo_diffuse_visible_over_ice	diffuse surface albedo visible band over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
albinir_ice	surface_albedo_diffuse_nir_over_ice	diffuse surface albedo NIR band over ice	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
zs	depth_of_soil_layers	depth of soil levels for land surface model	m	real	(ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)	kind_phys	out
sh2o	volume_fraction_of_unfrozen_soil_moisture_for_land_surface_model	volume fraction of unfrozen soil moisture for lsm	frac	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)	kind_phys	inout
smfrkeep	volume_fraction_of_frozen_soil_moisture_for_land_surface_model	volume fraction of frozen soil moisture for lsm	frac	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)	kind_phys	inout
tslb	soil_temperature_for_land_surface_model	soil temperature for land surface model	K	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)	kind_phys	inout
smois	volume_fraction_of_soil_moisture_for_land_surface_model	volumetric fraction of soil moisture for lsm	frac	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)	kind_phys	inout
wetness	normalized_soil_wetness_for_land_surface_model	normalized soil wetness	frac	real	(ccpp_constant_one:horizontal_dimension)	kind_phys	inout
tsice	temperature_in_ice_layer	sea ice internal temperature	K	real	(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_sea_ice)	kind_phys	inout
pores	maximum_soil_moisture_content_for_land_surface_model	maximum soil moisture for a given soil type for land surface model	m	real	(ccpp_constant_one:30)	kind_phys	out
resid	minimum_soil_moisture_content_for_land_surface_model	minimum soil moisture for a given soil type for land surface model	m	real	(ccpp_constant_one:30)	kind_phys	out
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

• Call rucinit() to initialize soil/ice/water variables

References module_soil_pre::init_soil_depth_3(), module_sf_ruclsm::rslf(), rucinit(), and set_soilveg_ruc_mod::set_soilveg_ruc().

Here is the call graph for this function: