Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:15 EDT 2024 |
canopy_rad | Module: BIOPHYSICS | File: canopyspitters.f |
Author :
Version:
Declaration:
subroutine canopy_rad( lc, crp, isla, isha, fsl)
- lc :
real*8, intent(in)
- isla :
real*8, intent(out)
- PAR absorbed by sunlit foliage at Lc (umol/m[foliage]2/s).
- crp :
type(canraddrv)
- isha :
real*8, intent(out)
- PAR absorbed by shaded foliage at Lc (umol/m[foliage]2/s).
- fsl :
real*8, intent(out)
- Fraction of sunlit foliage in layer at Lc (unitless).
- sbeta :
real*8
- idfa :
real*8
- Diffuse PAR in canopy at Lc (umol/m[ground]2/s).
- i0df :
real*8
- i0dr :
real*8
- idra :
real*8
- Direct PAR in canopy at Lc (umol/m[ground]2/s).
- idrdra :
real*8
- Direct PAR at Lc that remains direct (umol/m[ground]2/s).
- zero :
real*8, parameter
- Initial Value
= 0.d0
- ish :
real*8
- isl :
real*8