CLASSIC
Canadian Land Surface Scheme including Biogeochemical Cycles
phenolgy.f90 File Reference

Calculates the leaf status for CTEM's pfts and leaf litter generated by normal turnover of leaves and cold and drought stress; crop harvest; and for grasses green leaves are converted into brown. More...

Functions/Subroutines

subroutine phenolgy (il1, il2, ilg, leapnow, tbar, thice, thliq, THLW, THFC, ta, anveg, iday, radl, roottemp, rmatctem, stemmass, rootmass, sort, fcancmx, isand, useTracer, lfstatus, pandays, colddays, gleafmas, bleafmas, tracerGLeafMass, tracerBLeafMass, flhrloss, leaflitr, tracerLeafLitr)
 

Detailed Description

Calculates the leaf status for CTEM's pfts and leaf litter generated by normal turnover of leaves and cold and drought stress; crop harvest; and for grasses green leaves are converted into brown.

The leaf phenology parametrization used in CTEM v. 1.0 is described in detail by [6] . Changes between version 1.0 and 2.0 are limited to parameter values and the parametrization is briefly described here. There are four different leaf phenological states in which vegetation can be at a given instant: (i) no leaves or dormant, (ii) maximum growth, (iii) normal growth and (iv) leaf fall or harvest. PFTs may go through only some, or all, of these phenological states depending on their deciduousness. A broadleaf cold deciduous tree, for example, transitions through all these four states in a year. In winter, the broadleaf cold deciduous trees are in the no leaves/dormant state; favourable climatic conditions in spring trigger leaf growth and the tree enters the maximum leaf growth state when all the NPP is allocated to leaves to accelerate leaf out; when the LAI reaches a threshold (described below) the tree enters the normal leaf growth state and NPP is also allocated to stem and root components; finally the arrival of autumn triggers leaf fall and the trees go into the leaf fall mode where no carbon is allocated to leaves (but it continues for roots and stems). When all the leaves have been shed, the trees go into the no leaves or dormant state again and the cycle is repeated the next year. The evergreen tree PFTs and the grass PFTs do not enter the leaf fall state and maintain a leaf canopy as long as environmental conditions are favourable. Although drought and cold stress cause accelerated leaf loss compared to the normal leaf turnover from these PFTs, they do not explicitly go into the leaf fall mode where the intent is to lose all leaves in a specified amount of time.

Author
V. Arora, J. Melton

The leaf phenological state transitions are dependent upon environmental conditions. In particular, the transition from no leaves/dormant state to the maximum growth state is based on the carbon-gain approach. CTEM uses \(\textit{virtual}\) leaves to assess favourable meteorological conditions for leaf out. The virtual leaves photosynthesize and respire in a manner similar to normal leaves except the carbon gain or loss is not taken into account in vegetation's carbon balance. A positive net leaf photosynthesis rate ( \( G_{canopy, net} \), Eq. \(\ref{Gnet}\)) for the virtual leaves over seven consecutive days indicates the arrival of favourable growth conditions and triggers leaf onset and the associated transition from the no leaves/dormant state to the maximum leaf growth state, when the entire positive NPP is allocated to leaves ( \(a_{fL} = 1\), \(a_{fS} = a_{fR} = 0\)). When LAI reaches \({LAI}_{thrs}\) then the vegetation switches to the normal growth mode and positive NPP is allocated to all three vegetation components – leaves, stem and roots ( \(a_{fL}\), \(a_{fS}\), \(a_{fR}\) > 0). \({LAI}_{thrs}\) is calculated as

\[ {LAI}_{thrs} = L_f [ {SLA} (\frac{C_S + C_R}{\eta} ) ^ {1/\kappa} ]. \]

The PFT-specific \(L_f\) term (see also classicParams.f90) calculates \({LAI}_{thrs}\) to be typically between 40 and 50 % of the maximum LAI that a given amount of stem and root biomass can support (based on the terms in the square brackets and Eq. ( \(\ref{propwoody}\)). \(SLA\) is the specific leaf area (Eq. \( \ref{sla}\)). This rule for transition from a maximum to a normal growth state is also used for evergreen tree PFTs and grass PFTs. Similar to \({LAI}_{thrs}\), the LAI of virtual leaves is \(7.5\, {\%}\) of the maximum LAI a given amount of root and stem biomass can support for tree and crop PFTsand \(2.5\, {\%}\) for grass PFTs. In addition, the LAI of virtual leaves is constrained to be, at least, \(0.3\, m^2\, m^{-2}\) for tree PFTs and \(0.2\, m^2\, m^{-2}\) for crop and grass PFTs.

The transition from the normal growth state to the leaf fall state is triggered by unfavourable environmental conditions and shorter day length. Broadleaf deciduous trees transition to the leaf fall state when either: (i) day length is less than \(11\, h\) and the rooting zone temperature drops below \(11.15\, C\) or (ii) when the rooting zone temperature drops below \(8\, C\) regardless of the day length. Needleleaf deciduous tress begin leaf fall after seven consecutive days with daily mean air temperature below \(-5\, C\). Leaf fall occurs over a period of 15 days. In the leaf fall state, the vegetation continues carbon allocation to its root and stem components, but not to leaves ( \(a_{fL} = 0\), \(a_{fS} + a_{fR} = 1\)). Evergreen trees and grasses do not enter the leaf fall state and neither do the broadleaf drought deciduous trees. The implication for the latter PFT is that if the climate changes and the dry season becomes shorter, then the trees will keep their leaves on for a longer period of time since broadleaf drought deciduous trees lose leaves due to soil moisture stress (described below).

The model vegetation is able to transition between the different leaf phenological states in response to changing conditions. For example, a leaf out in spring for broadleaf cold deciduous trees can be interrupted by a cold event when the vegetation goes into a leaf fall state until the return of more favourable conditions.

Leaf litter generation is caused by normal turnover of leaves ( \(\Omega_N\), \(day^{-1}\)) and also due to cold ( \( \Omega_C \), \(day^{-1}\)) and drought ( \(\Omega_D\), \(day^{-1}\)) stress, both of which contribute to seasonality of LAI. For example, the leaf loss associated with drought and reduced photosynthesis during the dry season are the principal causes of the seasonality of LAI for the broadleaf drought deciduous tree PFT.

The conversion of leaf carbon to leaf litter ( \(D_L\), \(kg\, C\, m^{-2}\, day^{-1}\)) is expressed as

\[ D_L = C_L[1 - \exp(-\Omega_N - \Omega_C - \Omega_{D})], \]

where ( \(\Omega_{N, C, D}\), \(day^{-1}\)) are the leaf loss rates associated with normal turnover of leaves and the cold and drought stress. The rate of normal turnover of leaves is governed by PFT-specific leaf lifespan ( \(\tau_L\), \(yr\)) as \(\Omega_N= 1/365 \tau_L\) (see also classicParams.f90} for PFT specific values of \(\tau_L\)). The leaf loss rate associated with cold stress ( \(\Omega_C\)) is calculated as

\[ \label{gamma_cold} \Omega_C = \Omega_{C, max}L_{cold}^3, \]

where \(\Omega_{C, max}\) ( \(day^{-1}\), see also classicParams.f90) is the maximum cold stress loss rate. \(L_{cold}\) is a scalar that varies between 0 and 1 as

\[ \label{cldls} L_{cold} = \begin{cases} 1, \quad T_a < \left(T_{cold}^{leaf} - 5\right) \\ 1 - \frac{T_a - \left(T_{cold}^{leaf} - 5\right)}{5}, \\ \quad T_{cold}^{leaf} > T_a > (T_{cold}^{leaf} - 5) \\ 0, \quad T_a > T_{cold}^{leaf} , \\ \end{cases} \]

where \(T_{cold}^{leaf}\) is a PFT-specific temperature threshold below which a PFT experiences damage to its leaves promoting leaf loss (see also classicParams.f90) and \(T_a\) is the daily mean air temperature ( \(C\)). The leaf loss rate due to drought stress is calculated in a similar manner

\[ \label{gamma_dry} \Omega_{D} = \Omega_{D, max}\, (1-\phi_{root})^3, \]

where \(\Omega_{D, max}\) ( \(day^{-1}\), see also classicParams.f90) is the maximum drought stress loss rate and \(\phi_{root}\) (Eq. degsoilsat}) is the degree of soil saturation in the rooting zone.

Function/Subroutine Documentation

◆ phenolgy()

subroutine phenolgy ( integer, intent(in)  il1,
integer, intent(in)  il2,
integer, intent(in)  ilg,
logical, intent(in)  leapnow,
real, dimension(ilg,ignd), intent(in)  tbar,
real, dimension(ilg,ignd), intent(in)  thice,
real, dimension(ilg,ignd), intent(in)  thliq,
real, dimension(ilg,ignd), intent(in)  THLW,
real, dimension(ilg,ignd), intent(in)  THFC,
real, dimension(ilg), intent(in)  ta,
real, dimension(ilg,icc), intent(in)  anveg,
integer, intent(in)  iday,
real, dimension(ilg), intent(in)  radl,
real, dimension(ilg,icc), intent(in)  roottemp,
real, dimension(ilg,icc,ignd), intent(in)  rmatctem,
real, dimension(ilg,icc), intent(in)  stemmass,
real, dimension(ilg,icc), intent(in)  rootmass,
integer, dimension(icc), intent(in)  sort,
real, dimension(ilg,icc), intent(in)  fcancmx,
integer, dimension(ilg,ignd), intent(in)  isand,
integer, intent(in)  useTracer,
integer, dimension(ilg,icc), intent(inout)  lfstatus,
integer, dimension(ilg,icc), intent(inout)  pandays,
integer, dimension(ilg,2), intent(inout)  colddays,
real, dimension(ilg,icc), intent(inout)  gleafmas,
real, dimension(ilg,icc), intent(inout)  bleafmas,
real, dimension(ilg,icc), intent(inout)  tracerGLeafMass,
real, dimension(ilg,icc), intent(inout)  tracerBLeafMass,
real, dimension(ilg,icc), intent(out)  flhrloss,
real, dimension(ilg,icc), intent(out)  leaflitr,
real, dimension(ilg,icc), intent(out)  tracerLeafLitr 
)
Parameters
[in]ilgno. of grid cells in latitude circle
[in]il1il1=1
[in]il2il2=ilg
[in]idayday of year
[in]leapnowtrue if this year is a leap year. Only used if the switch 'leap' is true.
[in]usetracerSwitch for use of a model tracer. If useTracer is 0 then the tracer code is not used. useTracer = 1 turns on a simple tracer that tracks pools and fluxes. The simple tracer then requires that the tracer values in the init_file and the tracerCO2file are set to meaningful values for the experiment being run. useTracer = 2 means the tracer is 14C and will then call a 14C decay scheme. useTracer = 3 means the tracer is 13C and will then call a 13C fractionation scheme.
[in]sortindex for correspondence between 9 pfts and the 12 values in parameters vectors
[in]taair temperature, k
[in]tbarsoil temperature, k
[in]thliqliquid soil moisture content in soil layers
[in]thicefrozen soil moisture content in soil layers
[in]anvegnet photosynthesis rate of ctem's pfts, umol co2/m2.s
[in]roottemproot temperature, which is a function of soil temperature of course, k.
[in]rmatctemfraction of roots in each soil layer for each pft
[in]stemmassstem mass for each of the 9 ctem pfts, \(kg c/m^2\)
[in]rootmassroot mass for each of the 9 ctem pfts, \(kg c/m^2\)
[in]fcancmxmax. fractional coverage of ctem's 9 pfts, but this can be modified by land-use change, and competition between pfts
[in]thfcfield capacity soil moisture content both calculated in allocate subroutine
[in]thlwwilting point soil moisture content
[in]radllatitude in radians
[in,out]gleafmasgreen or live leaf mass in \(kg c/m\)
[in,out]bleafmasbrown or dead leaf mass in \(kg c/m\)
[in,out]tracergleafmassTracer mass in the green leaf pool for each of the CTEM pfts, \(kg c/m^2\)
[in,out]tracerbleafmassTracer mass in the brown leaf pool for each of the CTEM pfts, \(kg c/m^2\)
[in,out]pandayscounter for positive net photosynthesis (an) days for initiating leaf onset
[in,out]lfstatusinteger :: indicating leaf status or mode 1 - max. growth or onset, when all npp is allocated to leaves 2 - normal growth, when npp is allocated to leaves, stem, and root 3 - fall for dcd trees/harvest for crops, when allocation to leaves is zero. 4 - no leaves
[in,out]colddayscold days counter for tracking days below a certain temperature threshold for ndl dcd and crop pfts.
[out]flhrlossfall & harvest loss for bdl dcd plants and crops, respectively, \(kg c/m^2\).
[out]leaflitrleaf litter generated by normal turnover, cold and drought stress, and leaf fall/harvest, \(kg c/m^2\)
[out]tracerleaflitrleaf litter generated by normal turnover, cold and drought stress, and leaf fall/harvest, \(tracer C units/m^2\)

Convert green leaf mass into leaf area index using specific leaf area \((sla, m^2 /kg c)\) estimated using leaf life span. see bio2str subroutine for more details.

also find threshold lai as a function of stem+root biomass which is used to determine leaf status

using green leaf area index (ailcg) determine the leaf status for each pft. loops 190 and 200 thus initialize lfstatus, if this this information is not passed specifically as an initialization quantity.

Knowing lfstatus (after initialization above or using value from from previous time step) we decide if we stay in a given leaf mode or we move to some other mode.

we start with the "no leaves" mode

add one to pandays(i,j) if daily an is positive, otherwise set it to zero.

if in "no leaves" mode check if an has been positive over last dayschk(j) days to move into "max. growth" mode. if not we stay in "no leaves" mode. also set the chkmode(i,j) switch to 1.

find day length using day of year and latitude. this is to be used for initiating leaf offset for broad leaf dcd trees.

Even if pandays criteria has been satisfied do not go into max. growth mode if environmental conditions are such that they will force leaf fall or harvest mode.

if in "max growth" mode

if mode hasn't been checked and we are in "max. growth" mode, then check if we are above pft-dependent lai threshold. if lai is more then this threshold we move into "normal growth" mode, otherwise we stay in "max growth" mode so that leaves can grow at their max. climate-dependent rate

for dcd trees we also need to go into "leaf fall" mode directly from "max. growth" mode.

if in "normal growth" mode then go through every pft individually and follow set of rules to determine if we go into "fall/harvest" mode

If in "fall/harvest" mode

grasses and evg trees do not come into this mode, because they want to stay green if possible. this mode is activated for dcd plants and crops. once in this mode dcd trees loose their leaves and crops are harvested. ndl dcd trees keep loosing their leaves at rate determined by cold stress, bdl dcd trees loose their leaves at a specified rate, and crops are harvested over a period of 15 days. dcd trees and crops stay in "leaf fall/harvest" model until all green leaves are gone at which time they switch into "no leaves" mode, and then wait for the climate to become favourable to go into "max. growth" mode

Check that leaf status of all vegetation types in all grid cells has been updated

Having decided leaf status for every pft, we now calculate normal leaf turnover, cold and drought stress mortality, and for bdl dcd plants we also calculate specified loss rate if they are in "leaf fall" mode, and for crops we calculate harvest loss, if they are in "harvest" mode.

all these loss calculations will yield leaf litter in \(kg c/m^2\) for the given day for all pfts

For drought stress related mortality we need field capacity and wilting point soil moisture contents, which we calculated in allocate subroutine

Estimate drought stress term averaged over the rooting depth for each pft

Using this drought stress term and our two vegetation-dependent parameters we find leaf loss rate associated with drought

Estimate leaf loss in \(kg c/m^2\) due to drought stress

Similar to drgtstrs we find coldstrs for each pft. we assume that max. cold stress related leaf loss occurs when temperature is 5 c or more below pft's threshold

Using this cold stress term and our two vegetation-dependent parameters we find leaf loss rate associated with cold cold related leaf loss rate

estimate leaf loss in \(kg c/m^2\) due to cold stress

Now that we have all types of leaf losses (due to normal turnover, cold and drought stress, and fall/harvest) we take the losses for grasses and use those to turn live green grass into dead brown grass. we then find the leaf litter from the brown grass which will then go into the litter pool.

we assume life span of brown grass is 10% that of green grass but this is an adjustable parameter.

combine nrmlloss, drgtloss, and coldloss together to get total leaf litter generated, which is what we use to update gleafmass, except for grasses, for which we have already updated gleafmass.