|
type(ed_cohort_type),
|
public, |
pointer
|
:: |
tallest |
=> |
null() |
|
|
type(ed_cohort_type),
|
public, |
pointer
|
:: |
shortest |
=> |
null() |
|
|
type(ed_patch_type),
|
public, |
pointer
|
:: |
older |
=> |
null() |
|
|
type(ed_patch_type),
|
public, |
pointer
|
:: |
younger |
=> |
null() |
|
|
integer,
|
public |
|
:: |
patchno |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
age |
|
|
|
|
integer,
|
public |
|
:: |
age_class |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
area |
|
|
|
|
integer,
|
public |
|
:: |
countcohorts |
|
|
|
|
integer,
|
public |
|
:: |
ncl_p |
|
|
|
|
integer,
|
public |
|
:: |
anthro_disturbance_label |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
age_since_anthro_disturbance |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
pft_agb_profile(maxpft,n_dbh_bins) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
canopy_layer_tlai(nclmax) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
total_canopy_area |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
total_tree_area |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
zstar |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
c_stomata |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
c_lblayer |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
tlai_profile(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
elai_profile(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
tsai_profile(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
esai_profile(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
layer_height_profile(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
canopy_area_profile(nclmax,maxpft,nlevleaf) |
|
|
|
|
integer,
|
public |
|
:: |
canopy_mask(nclmax,maxpft) |
|
|
|
|
integer,
|
public |
|
:: |
nrad(nclmax,maxpft) |
|
|
|
|
integer,
|
public |
|
:: |
ncan(nclmax,maxpft) |
|
|
|
|
logical,
|
public |
|
:: |
solar_zenith_flag |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
solar_zenith_angle |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
gnd_alb_dif(maxSWb) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
gnd_alb_dir(maxSWb) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fabd_sun_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fabd_sha_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fabi_sun_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fabi_sha_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ed_laisun_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ed_laisha_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ed_parsun_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ed_parsha_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
f_sun(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
nrmlzd_parprof_pft_dir_z(n_rad_stream_types,nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
nrmlzd_parprof_pft_dif_z(n_rad_stream_types,nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
nrmlzd_parprof_dir_z(n_rad_stream_types,nclmax,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
nrmlzd_parprof_dif_z(n_rad_stream_types,nclmax,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
parprof_pft_dir_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
parprof_pft_dif_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
parprof_dir_z(nclmax,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
parprof_dif_z(nclmax,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
tr_soil_dir(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
tr_soil_dif(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
tr_soil_dir_dif(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
fab(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
fabd(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
fabi(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
sabs_dir(:) |
|
|
|
|
real(kind=r8),
|
public, |
allocatable
|
:: |
sabs_dif(:) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
psn_z(nclmax,maxpft,nlevleaf) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
btran_ft(maxpft) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
bstress_sal_ft(maxpft) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
disturbance_rates(n_dist_types) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
disturbance_rate |
|
|
|
|
integer,
|
public |
|
:: |
disturbance_mode |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fract_ldist_not_harvested |
|
|
|
|
type(litter_type),
|
public, |
pointer
|
:: |
litter(:) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fragmentation_scaler |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
repro(maxpft) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
sum_fuel |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fuel_frac(nfsc) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
livegrass |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fuel_bulkd |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fuel_sav |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fuel_mef |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fuel_eff_moist |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
litter_moisture(nfsc) |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ros_front |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ros_back |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
effect_wspeed |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
tau_l |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fi |
|
|
|
|
integer,
|
public |
|
:: |
fire |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
fd |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
nf |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
sh |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
ab |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
frac_burnt |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
tfc_ros |
|
|
|
|
real(kind=r8),
|
public |
|
:: |
burnt_frac_litter(nfsc) |
|
|
|