EffectiveReflectance Subroutine

private subroutine EffectiveReflectance(EffRefl, mp, nrb, CanopyRefl, AlbSnow, CanopyTransmit, mask)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(out)			::	EffRefl(mp,nrb)
integer,	intent(in)			::	mp
integer,	intent(in)			::	nrb
real,	intent(in)			::	CanopyRefl(mp,nrb)
real,	intent(in)			::	AlbSnow(mp,nrb)
real,	intent(in)			::	CanopyTransmit(mp,nrb)
logical,	intent(in)			::	mask(mp)