Bembidion_Pupae Class Reference

The class describing the beetle pupae objects. More...

#include <bembidion_all.h>

Inheritance diagram for Bembidion_Pupae:

Public Member Functions
	Bembidion_Pupae (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	Pupae class constructor. More...
void	ReInit (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	ReInit for object pool. More...
virtual void	BeginStep ()
	Pupae BeginStep code. More...
virtual void	Step ()
	Pupae Step code. More...
virtual void	KillThis ()
	Kill this pupa. More...
Public Member Functions inherited from Bembidion_Base
	Bembidion_Base (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	Constructor. More...
void	ReInit (int x, int y, Landscape *L, Bembidion_Population_Manager *BPM)
	ReInit for object pool. More...
virtual void	EndStep ()
	EndStep - empty. More...
virtual void	st_Die ()
	Common state Die. More...
void	CopyMyself (int a_beetle)
	For experimental purposes. More...
void	CopyMyselfB (int a_beetle)
	For experimental purposes. More...
Public Member Functions inherited from TAnimal
unsigned	SupplyFarmOwnerRef ()
AnimalPosition	SupplyPosition ()
APoint	SupplyPoint ()
int	SupplyPolygonRef ()
int	Supply_m_Location_x ()
int	Supply_m_Location_y ()
virtual void	CopyMyself ()
void	SetX (int a_x)
void	SetY (int a_y)
	TAnimal (int x, int y, Landscape *L)
virtual void	ReinitialiseObject (int x, int y, Landscape *L)
	Used to re-use an object - must be implemented in descendent classes. More...
virtual int	WhatState ()
virtual void	Dying ()
void	CheckManagement (void)
void	CheckManagementXY (int x, int y)
Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo ()
	Returns the current state number. More...
void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...
bool	GetStepDone ()
	Returns the step done indicator flag. More...
void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...
virtual void	ReinitialiseObject ()
	Used to re-use an object - must be implemented in descendent classes. More...
	TALMaSSObject ()
	The constructor for TALMaSSObject. More...
virtual	~TALMaSSObject ()
	The destructor for TALMaSSObject. More...
void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...

Protected Member Functions
int	st_Develop ()
	Pupal state development. More...
void	st_Emerge ()
	Pupal state emergence. More...
virtual bool	DailyMortality ()
	Pupae non-temperature or density related mortality. More...
virtual bool	OnFarmEvent (FarmToDo event)
	Pupal reactions to management events. More...
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Protected Attributes
double	m_AgeDegrees
	Record pupal day degrees. More...
int	m_DayMade
Protected Attributes inherited from TAnimal
int	m_Location_x
int	m_Location_y
Landscape *	m_OurLandscape
Protected Attributes inherited from TALMaSSObject
int	m_CurrentStateNo
	The basic state number for all objects - '-1' indicates death. More...
bool	m_StepDone
	Indicates whether the iterative step code is done for this timestep. More...

Additional Inherited Members
Public Attributes inherited from Bembidion_Base
TTypesOfBeetleState	CurrentBState
	Current behavioural state. More...
Bembidion_Population_Manager *	m_OurPopulation
	Pointer to the population manager. More...

Detailed Description

The class describing the beetle pupae objects.

Definition at line 255 of file bembidion_all.h.

Constructor & Destructor Documentation

Bembidion_Pupae()

Bembidion_Pupae::Bembidion_Pupae	(	int	x,
		int	y,
		Landscape *	L,
		Bembidion_Population_Manager *	BPM
	)

Pupae class constructor.

Definition at line 1020 of file Bembidion_all.cpp.

                                                                                             : Bembidion_Base(x,y,L,BPM)
{
    m_AgeDegrees=0;
    m_DayMade=L->SupplyDayInYear();
}

References m_AgeDegrees, m_DayMade, and Landscape::SupplyDayInYear().

Member Function Documentation

BeginStep()

void Bembidion_Pupae::BeginStep ( void  )

virtual

Pupae BeginStep code.

Reimplemented from Bembidion_Base.

Definition at line 1304 of file Bembidion_all.cpp.

{
  CheckManagement();
  if (DailyMortality())CurrentBState=tobs_PDying;
}

References TAnimal::CheckManagement(), Bembidion_Base::CurrentBState, DailyMortality(), and tobs_PDying.

DailyMortality()

bool Bembidion_Pupae::DailyMortality ( )

protectedvirtual

Pupae non-temperature or density related mortality.

Definition at line 1352 of file Bembidion_all.cpp.

{
  if (g_rand_uni()<DailyPupaeMort)
  {
    return true;
  }
  return false;
}

References DailyPupaeMort, and g_rand_uni.

Referenced by BeginStep().

KillThis()

void Bembidion_Pupae::KillThis ( )

virtual

Kill this pupa.

Reimplemented from TAnimal.

Definition at line 1297 of file Bembidion_all.cpp.

{
 CurrentBState=tobs_PDying;
}

References Bembidion_Base::CurrentBState, and tobs_PDying.

OnFarmEvent()

bool Bembidion_Pupae::OnFarmEvent ( FarmToDo  event )

protectedvirtual

Pupal reactions to management events.

Reimplemented from TAnimal.

Definition at line 1035 of file Bembidion_all.cpp.

{
 switch(event)
 {
 case  sleep_all_day:
  break;
 case  autumn_plough:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  stubble_plough: // assumed to be the same as for autumn plough
     if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
     break;
 case  stubble_cultivator_heavy: // assumed to be the same as for autumn plough
     if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
     break;
 case  heavy_cultivator_aggregate: // assumed to be the same as for autumn plough
     if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
     break;
 case  autumn_harrow:
     if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
     break;
 case  preseeding_cultivator: // assumed to be the same as for harrow
     if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
     break;
 case  preseeding_cultivator_sow: // assumed to be the same as for harrow
     if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
     break;
 case  autumn_roll:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  autumn_sow:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  winter_plough:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  deep_ploughing:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  spring_plough:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  spring_harrow:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
 case  shallow_harrow:
    if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
    break;
 case  spring_roll:
  break;
 case  spring_sow:
  break;
 case  spring_sow_with_ferti:
     break;
 case  fp_npks:
     break;
 case  fp_npk:
     break;
 case  fp_pk:
     break;
 case  fp_liquidNH3:
     break;
 case  fp_slurry:
     break;
 case  fp_manganesesulphate:
     break;
 case  fp_ammoniumsulphate:
     break;
 case  fp_manure:
     break;
 case  fp_greenmanure:
     break;
 case  fp_sludge:
     break;
 case  fp_rsm:
     break;
 case  fp_calcium:
     break;
 case  fa_npks:
     break;
 case  fa_npk:
     break;
 case  fa_pk:
     break;
 case  fa_slurry:
     break;
 case  fa_ammoniumsulphate:
     break;
 case  fa_manganesesulphate:
     break;
 case  fa_manure:
     break;
 case  fa_greenmanure:
     break;
 case  fa_sludge:
     break;
 case  fa_rsm:
     break;
 case  fa_calcium:
     break;
case  herbicide_treat:
  break;
case  growth_regulator:
  break;
case  fungicide_treat:
  break;
case  insecticide_treat:
  if (g_rand_uni()<cfg_Pupa_InsecticideApplication.value()) CurrentBState=tobs_PDying;
  break;
case  molluscicide:
  break;
case  row_cultivation:
  break;
case  strigling:
//if (g_rand_uni()<cfg_BeetleStriglingMort.value())  CurrentBState=tobs_PDying;
  break;
case  hilling_up:
  break;
case  water:
  break;
case  swathing:
  break;
case  harvest:
  break;
case  cattle_out:
  break;
case  cattle_out_low:
  break;
case  cut_to_hay:
  break;
case  cut_to_silage:
  break;
case  straw_chopping:
  break;
case  hay_turning:
  break;
case  hay_bailing:
  break;
case  flammebehandling:
  break;
case  stubble_harrowing:
  break;
case  autumn_or_spring_plough:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
case  burn_straw_stubble:
  break;
case mow:
  break;
case cut_weeds:
  break;
case pigs_out:
  break;
case strigling_sow:
  if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState=tobs_PDying;
  break;
case strigling_hill:
    if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
    break;
case trial_insecticidetreat:
  if (random(1000)<cfg_PesticideTrialPupaeTreatmentMort.value()) CurrentBState=tobs_PDying;
  break;
case trial_toxiccontrol:
  if (random(1000)<PesticideTrialPupaeToxicMort) CurrentBState=tobs_PDying;
  break;
case trial_control:
case product_treat:
case glyphosate:
 break;
case syninsecticide_treat:
  if (random(1000)<cfg_PesticideTrialPupaeTreatmentMort.value()) CurrentBState=tobs_PDying;
  break;
case biocide:
    break;
case  bed_forming:
    if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
    break;
case flower_cutting:
    break;
case  bulb_harvest:
    if (g_rand_uni()<cfg_Pupa_SoilCultivationMortality.value()) CurrentBState = tobs_PDying;
    break;
case straw_covering:
    break;
case straw_removal:
    break;
 default:
   m_OurLandscape->Warn("Bembidion Pupae - Unknown Treatment in Daily Mortality",NULL);
   g_msg->Warn(WARN_BUG, "State attempted was: ", int(CurrentBState));
   exit(1);
 }
 // Must incorporate a test here in case the animal is dead - killing it twice
 // can be a bad idea
 if (CurrentBState==tobs_PDying) return true;
  else
 return false;
}

References autumn_harrow, autumn_or_spring_plough, autumn_plough, autumn_roll, autumn_sow, bed_forming, biocide, bulb_harvest, burn_straw_stubble, cattle_out, cattle_out_low, cfg_PesticideTrialPupaeTreatmentMort, cfg_Pupa_InsecticideApplication, cfg_Pupa_SoilCultivationMortality, Bembidion_Base::CurrentBState, cut_to_hay, cut_to_silage, cut_weeds, deep_ploughing, fa_ammoniumsulphate, fa_calcium, fa_greenmanure, fa_manganesesulphate, fa_manure, fa_npk, fa_npks, fa_pk, fa_rsm, fa_sludge, fa_slurry, flammebehandling, flower_cutting, fp_ammoniumsulphate, fp_calcium, fp_greenmanure, fp_liquidNH3, fp_manganesesulphate, fp_manure, fp_npk, fp_npks, fp_pk, fp_rsm, fp_sludge, fp_slurry, fungicide_treat, g_msg, g_rand_uni, glyphosate, growth_regulator, harvest, hay_bailing, hay_turning, heavy_cultivator_aggregate, herbicide_treat, hilling_up, insecticide_treat, TAnimal::m_OurLandscape, molluscicide, mow, PesticideTrialPupaeToxicMort, pigs_out, preseeding_cultivator, preseeding_cultivator_sow, product_treat, row_cultivation, shallow_harrow, sleep_all_day, spring_harrow, spring_plough, spring_roll, spring_sow, spring_sow_with_ferti, straw_chopping, straw_covering, straw_removal, strigling, strigling_hill, strigling_sow, stubble_cultivator_heavy, stubble_harrowing, stubble_plough, swathing, syninsecticide_treat, tobs_PDying, trial_control, trial_insecticidetreat, trial_toxiccontrol, CfgInt::value(), CfgFloat::value(), MapErrorMsg::Warn(), Landscape::Warn(), WARN_BUG, water, and winter_plough.

ReInit()

void Bembidion_Pupae::ReInit	(	int	x,
		int	y,
		Landscape *	L,
		Bembidion_Population_Manager *	BPM
	)

ReInit for object pool.

Definition at line 1028 of file Bembidion_all.cpp.

                                                                                             {
    Bembidion_Base::ReInit( x, y, L, BPM );
    m_AgeDegrees = 0;
    m_DayMade = L->SupplyDayInYear();
}

References m_AgeDegrees, m_DayMade, Bembidion_Base::ReInit(), and Landscape::SupplyDayInYear().

st_Develop()

int Bembidion_Pupae::st_Develop ( )

protected

Pupal state development.

Definition at line 1235 of file Bembidion_all.cpp.

{
   double DailyMortChance;
   int temp2=(int) floor(m_OurLandscape->SupplyTemp()+0.5);
   int LengthOfStageAtTemp;
   // watch out for -ve & zero
   if (temp2 <1) temp2=1;
   if (temp2<13)
   {
     // How long to develop at this temp
     LengthOfStageAtTemp = (int)(PupaDevelConst2*g_SpeedyDivides[temp2]);
     // Get the mortality per day
     // Equation modified from Boye Jensen 1990
     DailyMortChance = (100-(-7.1429+1.42857*temp2))*
                                             g_SpeedyDivides[LengthOfStageAtTemp];
   }
    else if (temp2<23)
    {
      // How long to develop at this temp
     LengthOfStageAtTemp = (int)(PupaDevelConst2*g_SpeedyDivides[temp2]);
     // Get the mortality per day
     // Equation modified from Boye Jensen 1990
     DailyMortChance = (100-(-74.623+7.26415*temp2))
                                          *g_SpeedyDivides[LengthOfStageAtTemp];
    }
     else // temp>=23
     {
     // How long to develop at this temp
     LengthOfStageAtTemp = (int)(PupaDevelConst2*g_SpeedyDivides[temp2]);
     // Get the mortality per day
     // Equation modified from Boye Jensen 1990
     DailyMortChance = (20.0)*g_SpeedyDivides[LengthOfStageAtTemp];
     }
    // take a mortality test
    if (random(1000) < (DailyMortChance*10)) return 2;   // die
    // Still alive so now do the development bit
    if (temp2>0) m_AgeDegrees+=temp2;
    if (m_OurPopulation->SupplyPDayDeg(m_DayMade )>PupaDevelConst2)
    {
      return 1; // go to emerge
    }
    else return 0; // carry on developing
}

References g_SpeedyDivides, m_AgeDegrees, m_DayMade, TAnimal::m_OurLandscape, Bembidion_Base::m_OurPopulation, PupaDevelConst2, Bembidion_Population_Manager::SupplyPDayDeg(), and Landscape::SupplyTemp().

Referenced by Step().

st_Emerge()

void Bembidion_Pupae::st_Emerge ( )

protected

Pupal state emergence.

Definition at line 1281 of file Bembidion_all.cpp.

{
   struct_Bembidion * BS;
   BS = new struct_Bembidion;
   int NoToMake=1;
   BS->x   = m_Location_x;
   BS->y   = m_Location_y;
   BS->L   = m_OurLandscape;
   BS->BPM = m_OurPopulation;
   // object destroyed by OwnerRTS
   m_OurPopulation->CreateObjects(3,this,NULL,BS,NoToMake);
   delete BS;
}

References struct_Bembidion::BPM, Bembidion_Population_Manager::CreateObjects(), struct_Bembidion::L, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, Bembidion_Base::m_OurPopulation, struct_Bembidion::x, and struct_Bembidion::y.

Referenced by Step().

Step()

void Bembidion_Pupae::Step ( void  )

virtual

Pupae Step code.

Reimplemented from Bembidion_Base.

Definition at line 1312 of file Bembidion_all.cpp.

{
 if (m_StepDone || m_CurrentStateNo == -1) return;
 switch (CurrentBState)
 {
  case 0:    // Initial
   CurrentBState=tobs_PDeveloping;
   break;
  case tobs_PDeveloping: // Developing
   switch(st_Develop())
   {
   case 0:  // nothing
    m_StepDone = true;
    break;
   case 1:  // emerging
    CurrentBState=tobs_Emerging;
    break;
   case 2:  // die
    CurrentBState=tobs_PDying;
    break;
   }
   break;
  case tobs_Emerging:
   st_Emerge();
   m_StepDone=true;
   CurrentBState=tobs_Destroy;
   m_CurrentStateNo=-1; //Destroys object
   break;
  case tobs_PDying:
   st_Die();
   m_StepDone=true;
   break;
  default:
    m_OurLandscape->Warn("Bembidion Pupae - Unknown State",NULL);
    exit(1);
  }
}

References Bembidion_Base::CurrentBState, TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, TALMaSSObject::m_StepDone, st_Develop(), Bembidion_Base::st_Die(), st_Emerge(), tobs_Destroy, tobs_Emerging, tobs_PDeveloping, tobs_PDying, and Landscape::Warn().

Member Data Documentation

m_AgeDegrees

double Bembidion_Pupae::m_AgeDegrees

protected

Record pupal day degrees.

Definition at line 281 of file bembidion_all.h.

Referenced by Bembidion_Pupae(), ReInit(), and st_Develop().

m_DayMade

int Bembidion_Pupae::m_DayMade

protected

Records the day hatched for development calculations

Definition at line 283 of file bembidion_all.h.

Referenced by Bembidion_Pupae(), ReInit(), and st_Develop().

---

The documentation for this class was generated from the following files:

• C:/Repo/ALMaSS_All/Bembidion/bembidion_all.h
• C:/Repo/ALMaSS_All/Bembidion/Bembidion_all.cpp