Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:15 EDT 2024 |
photosynth_analyticsoln | Module: PHOTCONDMOD | File: FBBphotosynthesis.f |
Author :
Version:
Declaration:
subroutine photosynth_analyticsoln(pft, ipar, ca, ci, tl, pa, rh, gb, gs, atot, rd, sunlitshaded, isp)
- pft :
integer, intent(in)
- ipar :
real*8, intent(in)
- ca :
real*8, intent(in)
- tl :
real*8, intent(in)
- rh :
real*8, intent(in)
- pa :
real*8, intent(in)
- gb :
real*8, intent(in)
- ci :
real*8, intent(out)
- gs :
real*8, intent(out)
- atot :
real*8, intent(out)
- rd :
real*8, intent(out)
- isp :
real*8, intent(out)
- sunlitshaded :
integer, intent(in)
- o2pres :
real*8, parameter
- Initial Value
= 20900.d0
- cie :
real*8
- cic :
real*8
- cis :
real*8
- je1 :
real*8
- jc1 :
real*8
- js1 :
real*8
- anet :
real*8
- aiso :
real*8
- cs :
real*8
- ae :
real*8
- ac :
real*8
- as :
real*8
- a1c :
real*8, save
- Initial Value
= 1.d30
- f1c :
real*8, save
- Initial Value
= -1.d30
- a1e :
real*8
- f1e :
real*8
- alpha :
real*8, parameter
- Initial Value
= .08d0
- need_isoprene :
logical, parameter
- Initial Value
= .false.
- counter :
integer, save
- Initial Value
= 0