Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:15 EDT 2024 |
canopy_transmittance | Module: BIOPHYSICS | File: canopyspitters.f |
Author :
Version:
Declaration:
subroutine canopy_transmittance(trans_sw, sbeta, fdir, crp)
- trans_sw :
real*8, intent(out)
- Total canopy transmittance of shortwave (fraction)
- sbeta :
real*8, intent(in)
- Cos of solar zenith angle
- fdir :
real*8, intent(in)
- Fraction of surface visible radiation that is direct
- crp :
type(canraddrv)
- absdf :
real*8
- Absorbance of diffuse SW radiation (fraction)
- sigma :
real*8
- sqrtexpr :
real*8
- rhor :
real*8
- kbl :
real*8
- kdf :
real*8
- alai :
real*8
- absdr :
real*8
- Absorbance of direct SW radiation (fraction)
- absdrdr :
real*8
- Absorbance of direct SW that remains direct (fraction)
- abssh :
real*8
- Absorbance of SW through shaded foliage (fraction)
- abssl :
real*8
- Absorbance of SW through sunlit foliage (fraction)
- fracsl :
real*8
- Fraction of leaves in canopy that are sunlit (fraction)