Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:15 EDT 2024 |
ENT_PRESCR_VEG | File: ent_GISSveg.f |
Author :
Version:
Subroutines:
- ed_woodydiameter
- popdensity
- prescr_calc_lai
- Returns GISS GCM leaf area index for given vegetation type, julian day
and hemisphere
- prescr_calc_rootprof
- prescr_calc_shc
- Returns GISS GCM specific heat capacity for canopy
- prescr_calc_shoot
- Returns GISS GCM veg shoot kg-C per plant for given vegetation type.
From Moorcroft, et al. (2001), who takes allometry data from
Saldarriaga et al. (1998).
- prescr_calcconst
- prescr_get_crownrad
- prescr_get_hdata
- prescr_get_initnm
- Mean canopy nitrogen (nmv; g/m2[leaf])
- prescr_get_pop
- prescr_get_rootprof
- prescr_get_soilcolor
- prescr_get_woodydiameter
- prescr_init_clab
- For herbaceous annuals, assume seed provides 0.5 of alamax mass (guess).
- prescr_plant_cpools
- prescr_veg_albedo
- returns albedo for vegetation of type pft
as it is computed in GISS modelE
- wooddensity_gcm3
Global Variables:
- alamax :
real*8, parameter, dimension(N_COVERTYPES)
- Initial Value
= (/ 0.d0, 1.5d0, 2.0d0, 2.5d0, 4.0d0, 6.0d0,8.0d0,7.0d0,3.0d0 ,0.d0, 0.d0, 2.d0 /)
- alamin :
real*8, parameter, dimension(N_COVERTYPES)
- Initial Value
= (/ 0.d0, 1.0d0, 1.0d0, 1.0d0, 1.0d0, 1.0d0, 6.0d0,6.0d0,1.0d0 ,0.d0, 0.d0, 1.d0 /)
- laday :
integer, parameter, dimension(N_COVERTYPES)
- Initial Value
= (/ 0, 196, 196, 196, 196, 196, 196, 196, 196 ,0, 0, 196 /)
- edpery :
real*8, parameter
- Initial Value
= 365.