//---------------------------------------------------------------------
// This method does not trigger reproduction
public void CohortPartialMortality(object sender, Landis.Library.BiomassCohorts.PartialDeathEventArgs eventArgs)
{
//PlugIn.ModelCore.UI.WriteLine("Cohort Partial Mortality: {0}", eventArgs.Site);
ExtensionType disturbanceType = eventArgs.DisturbanceType;
ActiveSite site = eventArgs.Site;
ICohort cohort = (Landis.Library.LeafBiomassCohorts.ICohort)eventArgs.Cohort;
float fractionPartialMortality = (float)eventArgs.Reduction;
float foliarInput = cohort.LeafBiomass * fractionPartialMortality;
float woodInput = cohort.WoodBiomass * fractionPartialMortality;
if (disturbanceType.IsMemberOf("disturbance:harvest"))
{
SiteVars.HarvestPrescriptionName = PlugIn.ModelCore.GetSiteVar <string>("Harvest.PrescriptionName");
if (!Disturbed[site]) // this is the first cohort killed/damaged
{
HarvestEffects.ReduceLayers(SiteVars.HarvestPrescriptionName[site], site);
}
woodInput -= woodInput * (float)HarvestEffects.GetCohortWoodRemoval(site);
foliarInput -= foliarInput * (float)HarvestEffects.GetCohortLeafRemoval(site);
}
if (disturbanceType.IsMemberOf("disturbance:fire"))
{
SiteVars.FireSeverity = PlugIn.ModelCore.GetSiteVar <byte>("Fire.Severity");
if (!Disturbed[site]) // this is the first cohort killed/damaged
{
SiteVars.SmolderConsumption[site] = 0.0;
SiteVars.FlamingConsumption[site] = 0.0;
if (SiteVars.FireSeverity != null && SiteVars.FireSeverity[site] > 0)
{
FireEffects.ReduceLayers(SiteVars.FireSeverity[site], site);
}
}
double woodFireConsumption = woodInput * (float)FireEffects.ReductionsTable[(int)SiteVars.FireSeverity[site]].CoarseLitterReduction;
double foliarFireConsumption = foliarInput * (float)FireEffects.ReductionsTable[(int)SiteVars.FireSeverity[site]].FineLitterReduction;
SiteVars.SmolderConsumption[site] += woodFireConsumption;
SiteVars.FlamingConsumption[site] += foliarFireConsumption;
woodInput -= (float)woodFireConsumption;
foliarInput -= (float)foliarFireConsumption;
}
ForestFloor.AddWoodLitter(woodInput, cohort.Species, site);
ForestFloor.AddFoliageLitter(foliarInput, cohort.Species, site);
Roots.AddCoarseRootLitter(Roots.CalculateCoarseRoot(cohort, cohort.WoodBiomass * fractionPartialMortality), cohort, cohort.Species, site);
Roots.AddFineRootLitter(Roots.CalculateFineRoot(cohort, cohort.LeafBiomass * fractionPartialMortality), cohort, cohort.Species, site);
//PlugIn.ModelCore.UI.WriteLine("EVENT: Cohort Partial Mortality: species={0}, age={1}, disturbance={2}.", cohort.Species.Name, cohort.Age, disturbanceType);
//PlugIn.ModelCore.UI.WriteLine(" Cohort Reductions: Foliar={0:0.00}. Wood={1:0.00}.", HarvestEffects.GetCohortLeafRemoval(site), HarvestEffects.GetCohortLeafRemoval(site));
//PlugIn.ModelCore.UI.WriteLine(" InputB/TotalB: Foliar={0:0.00}/{1:0.00}, Wood={2:0.0}/{3:0.0}.", foliarInput, cohort.LeafBiomass, woodInput, cohort.WoodBiomass);
Disturbed[site] = true;
return;
}
//---------------------------------------------------------------------
private void UpdateDeadBiomass(ICohort cohort, ActiveSite site, double[] totalMortality)
{
double mortality_wood = (double)totalMortality[0];
double mortality_nonwood = (double)totalMortality[1];
// Add mortality to dead biomass pools.
// Coarse root mortality is assumed proportional to aboveground woody mortality
// mass is assumed 25% of aboveground wood (White et al. 2000, Niklas & Enquist 2002)
if (mortality_wood > 0.0)
{
ForestFloor.AddWoodLitter(mortality_wood, cohort.Species, site);
Roots.AddCoarseRootLitter(mortality_wood, cohort, cohort.Species, site);
}
if (mortality_nonwood > 0.0)
{
AvailableN.AddResorbedN(cohort, totalMortality[1], site); //ignoring input from scorching, which is rare, but not resorbed.
ForestFloor.AddResorbedFoliageLitter(mortality_nonwood, cohort.Species, site);
Roots.AddFineRootLitter(mortality_nonwood, cohort, cohort.Species, site);
}
return;
}
//---------------------------------------------------------------------
// Total mortality, including from disturbance or senescence.
public void CohortTotalMortality(object sender, Landis.Library.BiomassCohorts.DeathEventArgs eventArgs)
{
//PlugIn.ModelCore.UI.WriteLine("Cohort Total Mortality: {0}", eventArgs.Site);
ExtensionType disturbanceType = eventArgs.DisturbanceType;
ActiveSite site = eventArgs.Site;
ICohort cohort = (Landis.Library.LeafBiomassCohorts.ICohort)eventArgs.Cohort;
double foliarInput = (double)cohort.LeafBiomass;
double woodInput = (double)cohort.WoodBiomass;
if (disturbanceType != null)
{
//PlugIn.ModelCore.UI.WriteLine("DISTURBANCE EVENT: Cohort Died: species={0}, age={1}, disturbance={2}.", cohort.Species.Name, cohort.Age, eventArgs.DisturbanceType);
if (disturbanceType.IsMemberOf("disturbance:fire"))
{
SiteVars.FireSeverity = PlugIn.ModelCore.GetSiteVar <byte>("Fire.Severity");
Landis.Library.Succession.Reproduction.CheckForPostFireRegen(eventArgs.Cohort, site);
if (!Disturbed[site]) // the first cohort killed/damaged
{
SiteVars.SmolderConsumption[site] = 0.0;
SiteVars.FlamingConsumption[site] = 0.0;
if (SiteVars.FireSeverity != null && SiteVars.FireSeverity[site] > 0)
{
FireEffects.ReduceLayers(SiteVars.FireSeverity[site], site);
}
}
double woodFireConsumption = woodInput * (float)FireEffects.ReductionsTable[(int)SiteVars.FireSeverity[site]].CoarseLitterReduction;
double foliarFireConsumption = foliarInput * (float)FireEffects.ReductionsTable[(int)SiteVars.FireSeverity[site]].FineLitterReduction;
SiteVars.SmolderConsumption[site] += woodFireConsumption;
SiteVars.FlamingConsumption[site] += foliarFireConsumption;
woodInput -= (float)woodFireConsumption;
foliarInput -= (float)foliarFireConsumption;
}
else
{
if (disturbanceType.IsMemberOf("disturbance:harvest"))
{
SiteVars.HarvestPrescriptionName = PlugIn.ModelCore.GetSiteVar <string>("Harvest.PrescriptionName");
if (!Disturbed[site]) // the first cohort killed/damaged
{
HarvestEffects.ReduceLayers(SiteVars.HarvestPrescriptionName[site], site);
}
woodInput -= woodInput * (float)HarvestEffects.GetCohortWoodRemoval(site);
foliarInput -= foliarInput * (float)HarvestEffects.GetCohortLeafRemoval(site);
}
// If not fire, check for resprouting:
Landis.Library.Succession.Reproduction.CheckForResprouting(eventArgs.Cohort, site);
}
}
//PlugIn.ModelCore.UI.WriteLine("Cohort Died: species={0}, age={1}, wood={2:0.00}, foliage={3:0.00}.", cohort.Species.Name, cohort.Age, wood, foliar);
ForestFloor.AddWoodLitter(woodInput, cohort.Species, eventArgs.Site);
ForestFloor.AddFoliageLitter(foliarInput, cohort.Species, eventArgs.Site);
// Assume that ALL dead root biomass stays on site.
Roots.AddCoarseRootLitter(Roots.CalculateCoarseRoot(cohort, cohort.WoodBiomass), cohort, cohort.Species, eventArgs.Site);
Roots.AddFineRootLitter(Roots.CalculateFineRoot(cohort, cohort.LeafBiomass), cohort, cohort.Species, eventArgs.Site);
if (disturbanceType != null)
{
Disturbed[site] = true;
}
return;
}