CanopyReflectance Subroutine

private subroutine CanopyReflectance(CanopyRefl_beam, CanopyRefl_dif, mp, nrb, Cgauss_w, veg_mask, AlbSnow, xk, rhoch, ExtCoeff_beam, ExtCoeff_dif)

Arguments

Type IntentOptional Attributes Name
real, intent(out) :: CanopyRefl_beam(mp,nrb)
real, intent(out) :: CanopyRefl_dif(mp,nrb)
integer, intent(in) :: mp
integer, intent(in) :: nrb
real, intent(in) :: Cgauss_w(nrb)
logical, intent(in) :: veg_mask(mp)
real, intent(in) :: AlbSnow(mp,nrb)
real, intent(in) :: xk(mp,nrb)
real, intent(in) :: rhoch(mp,nrb)
real, intent(in) :: ExtCoeff_beam(mp)
real, intent(in) :: ExtCoeff_dif(mp)

Called by

proc~~canopyreflectance~~CalledByGraph proc~canopyreflectance CanopyReflectance proc~albedo Albedo proc~albedo->proc~canopyreflectance proc~cbm cbm proc~cbm->proc~albedo proc~mpidrv_worker~2 mpidrv_worker proc~mpidrv_worker~2->proc~cbm proc~serialdrv serialdrv proc~serialdrv->proc~cbm program~cable_offline_driver cable_offline_driver program~cable_offline_driver->proc~serialdrv