SurfaceAlbedoMod Module

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=r8),	public		::	albice(numrad)	=	(/0.80_r8, 0.55_r8/)
real(kind=r8),	public		::	lake_melt_icealb(numrad)	=	(/0.10_r8, 0.10_r8/)
real(kind=r8),	public,	parameter	::	calb	=	95.6_r8

Subroutines

public subroutine SurfaceAlbedoInitTimeConst(bounds)

Arguments

Type	Intent	Optional	Attributes		Name
type(bounds_type),	intent(in)			::	bounds

public subroutine SurfaceAlbedo(bounds, nc, num_nourbanc, filter_nourbanc, num_nourbanp, filter_nourbanp, num_urbanc, filter_urbanc, num_urbanp, filter_urbanp, nextsw_cday, declinp1, clm_fates, aerosol_inst, canopystate_inst, waterstate_inst, lakestate_inst, temperature_inst, surfalb_inst)

Arguments

Type	Intent	Optional	Attributes		Name
type(bounds_type),	intent(in)			::	bounds
integer,	intent(in)			::	nc
integer,	intent(in)			::	num_nourbanc
integer,	intent(in)			::	filter_nourbanc(:)
integer,	intent(in)			::	num_nourbanp
integer,	intent(in)			::	filter_nourbanp(:)
integer,	intent(in)			::	num_urbanc
integer,	intent(in)			::	filter_urbanc(:)
integer,	intent(in)			::	num_urbanp
integer,	intent(in)			::	filter_urbanp(:)
real(kind=r8),	intent(in)			::	nextsw_cday
real(kind=r8),	intent(in)			::	declinp1
type(hlm_fates_interface_type),	intent(inout)			::	clm_fates
type(aerosol_type),	intent(in)			::	aerosol_inst
type(CanopyState_type),	intent(in)			::	canopystate_inst
type(waterstate_type),	intent(in)			::	waterstate_inst
type(lakestate_type),	intent(in)			::	lakestate_inst
type(temperature_type),	intent(in)			::	temperature_inst
type(surfalb_type),	intent(inout)			::	surfalb_inst