//---------------------------------------------------------------------
/// <summary>
/// Grows an individual cohort for a year, incrementing its age by 1
/// and updating its biomass for annual growth and mortality.
/// </summary>
/// <param name="index">
/// The index of the cohort to grow; it must be between 0 and Count - 1.
/// </param>
/// <param name="site">
/// The site where the species' cohorts are located.
/// </param>
/// <returns>
/// The index of the next younger cohort. Note this may be the same
/// as the index passed in if that cohort dies due to senescence.
/// </returns>
public int GrowCohort(int index,
ActiveSite site,
bool annualTimestep)
{
Debug.Assert(0 <= index && index <= cohortData.Count);
Debug.Assert(site != null);
Cohort cohort = new Cohort(species, cohortData[index]);
Debug.Assert(cohort.WoodBiomass <= cohort.WoodBiomass + cohort.LeafBiomass);
Debug.Assert(cohort.LeafBiomass <= cohort.WoodBiomass + cohort.LeafBiomass);
// Check for senescence
if (cohort.Age >= species.Longevity)
{
RemoveCohort(index, cohort, site, null);
return(index);
}
if (annualTimestep)
{
cohort.IncrementAge();
}
float[] biomassChange = Cohorts.BiomassCalculator.ComputeChange(cohort, site);
Debug.Assert(-(cohort.WoodBiomass + cohort.LeafBiomass) <= biomassChange[0] + biomassChange[1]); // Cohort can't loss more biomass than it has
cohort.ChangeWoodBiomass(biomassChange[0]);
cohort.ChangeLeafBiomass(biomassChange[1]);
if (cohort.WoodBiomass + cohort.LeafBiomass > 0)
{
cohortData[index] = cohort.Data;
return(index + 1);
}
else
{
RemoveCohort(index, cohort, site, null);
return(index);
}
}
//---------------------------------------------------------------------
private void RemoveCohort(int index,
ICohort cohort,
ActiveSite site,
ExtensionType disturbanceType)
{
/*if (isDebugEnabled)
* log.DebugFormat(" cohort removed: {0}, {1} yrs, {2} Mg/ha ({3})",
* cohort.Species.Name, cohort.Age, cohort.Biomass,
* disturbanceType != null
* ? disturbanceType.Name
* : cohort.Age >= species.Longevity
* ? "senescence"
* : cohort.Biomass == 0
* ? "attrition"
* : "UNKNOWN");
*
*/
cohortData.RemoveAt(index);
Cohort.Died(this, cohort, site, disturbanceType);
}
//---------------------------------------------------------------------
/// <summary>
/// Computes how much a disturbance damages the cohorts by reducing
/// their biomass.
/// </summary>
/// <returns>
/// The total of all the cohorts' biomass reductions.
/// </returns>
public int DamageBySpecies(IDisturbance disturbance)
{
// Go backwards through list of cohort data, so the removal of an
// item doesn't mess up the loop.
isMaturePresent = false;
int totalReduction = 0;
for (int i = cohortData.Count - 1; i >= 0; i--)
{
Cohort cohort = new Cohort(species, cohortData[i]);
float[] reduction = disturbance.ReduceOrKillMarkedCohort(cohort);
if (reduction[0] + reduction[1] > 0)
{
totalReduction += (int)(reduction[0] + reduction[1]);
if (reduction[1] < cohort.LeafBiomass)
{
cohort.ChangeLeafBiomass(-reduction[1]);
cohortData[i] = cohort.Data;
}
if (reduction[0] < cohort.WoodBiomass)
{
cohort.ChangeWoodBiomass(-reduction[0]);
cohortData[i] = cohort.Data;
}
else // Assume that if all wood biomass lost, the cohort is dead
{
RemoveCohort(i, cohort, disturbance.CurrentSite,
disturbance.Type);
cohort = null;
}
}
if (cohort != null && cohort.Age >= species.Maturity)
{
isMaturePresent = true;
}
}
return(totalReduction);
}
