Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:15 EDT 2024 |
PHENOLOGY | File: phenology.f |
Author : Y. Kim
Version:
Subroutines:
- cdead2dbh
- cfol2height
- clim_stats
- Calculate climate statistics such as 10 day running average
- dbh2cdead
- dbh2cfol
- dbh2height
- ddbhdcdead
- ddbhdcfol
- dhddbh
- frost_hardiness
- due to frost hardiness phenology.
- growth_cpools_active
- growth_cpools_structural
- height2cfol
- height2dbh
- litter_cohort
- patch: Clossacc
- litter_growth_cohort
- patch: Clossacc
- litter_old
- litter_patch
- litter_dead. Update soil Tpools following litterfall.
- litter_turnover_cohort
- patch: Clossacc
- maxdbh
- nplant
- pheno_update
- Update statstics for phneology_update
- phenology_diag
- photosyn_acclim
- Hanninen & Kramer (2007),and Makela et al (2006)
- sla
- update_plant_cpools
- veg_update
- AND growth respiration from growth and tissue turnnover
- water_stress
Global Variables:
- seconds_per_day : used from timeconstants_mod
- seconds_per_minute : used from timeconstants_mod
- l_fract :
real*8, parameter
- Initial Value
= 0.50d0
- q :
real*8, parameter
- Initial Value
= 1.0d0
- iqsw :
real*8, parameter
- Initial Value
= 1000.0d0/3900.0d0/2.0d0
- hw_fract :
real*8, parameter
- Initial Value
= 0.70d0
- c2b :
real*8, parameter
- Initial Value
= 2.0d0
- airtemp_par :
real*8, parameter
- Initial Value
= 5.d0
- gdd_par1 :
real*8, parameter
- Initial Value
= -68.d0
- gdd_par2 :
real*8, parameter
- Initial Value
= 638.d0
- gdd_par3 :
real*8, parameter
- Initial Value
= -0.01d0
- gdd_length :
real*8, parameter
- Initial Value
= 50.d0
- airt_max_w :
real*8, parameter
- Initial Value
= 15.d0
- airt_min_w :
real*8, parameter
- Initial Value
= 5.d0
- ld_threshold :
real*8, parameter
- Initial Value
= 655.d0
- ld_min :
real*8, parameter
- Initial Value
= 540.d0
- ld_max :
real*8, parameter
- Initial Value
= 550.d0
- ddfacu :
real*8, parameter
- Initial Value
= 1.d0/15.d0
- paw_max_w :
real*8, parameter
- Initial Value
= 0.3d0
- paw_min_w :
real*8, parameter
- Initial Value
= -0.1d0
- paw_res_w :
real*8, parameter
- Initial Value
= 0.25d0
- paw_max_h :
real*8, parameter
- Initial Value
= 0.4d0
- paw_min_h :
real*8, parameter
- Initial Value
= 0.1d0
- paw_res_h :
real*8, parameter
- Initial Value
= 1.0d0
- par_turnover_int :
real*8, parameter
- Initial Value
= -12.d0
- par_turnover_slope :
real*8, parameter
- Initial Value
= 0.18d0
- r_fract :
real*8, parameter
- Initial Value
= 0.3d0
- c_fract :
real*8, parameter
- Initial Value
= 0.7d0