Class for female hares. More...

#include <Hare_all.h>

Public Member Functions
void	AddYoung (THare *a_new)
	Add a leveret to the list of kids. More...

void	AllYoungKilled ()
	Last leveret predated. More...

void	AllYoungMatured ()
	No more young to look after. More...

virtual void	BeginStep (void)
	Female BeginStep. More...

void	dumpEnergy ()
	Used to record energetic status. More...

virtual void	EndStep (void)
	Female EndStep. More...

	Hare_Female (int p_x, int p_y, Landscape p_L, THare_Population_Manager p_PPM, double p_weight, int a_age, int a_Ref)
	Female Constructor. More...

void	Init (double p_weight, int a_age, int a_Ref)
	Object initiation. More...

bool	ON_AreYouMyMum (THare *a_young)
	Debug function. More...

virtual void	ON_Dead ()
	The female is dead. More...

void	ON_RemoveYoung (THare *a_young)
	A leveret has matured. More...

void	ON_YoungKilled (THare *a_young)
	A leveret has been killed. More...

void	ReInit (struct_Hare a_data)
	Female object reinitiation. More...

bool	SanityCheckYoungList ()
	Debug function. More...

void	SetSterile ()
	Female is sterile. More...

virtual void	Step (void)
	Female Step. More...

bool	UpdateYoung (THare a_old, THare a_new)
	Swap a young list pointer. More...

virtual	~Hare_Female ()
	Female Destructor. More...

Public Member Functions inherited from Hare_Juvenile
	Hare_Juvenile (int p_x, int p_y, Landscape p_L, THare_Population_Manager p_PPM, double p_weight)
	Constructor for the juvenile hare object. More...

void	Init (double p_weight)
	Object initiation. More...

void	ReInit (struct_Hare a_data)
	Juvenile object reinitiation. More...

virtual	~Hare_Juvenile ()
	Destructor for the juvenile hare object. More...

Public Member Functions inherited from THare
int	GetAge ()

Hare_Female *	GetMum ()
	Get the mother pointer. More...

int	GetRefNum ()
	Get the refnum for this hare. More...

double	GetRMR ()
	Get todays RMR. More...

double	GetTotalWeight ()
	Provide the wet weight of the hare. More...

double	GetWeight ()

void	loadVegPalatability (void)
	Loads static member m_vegPalatability with data. More...

void	ON_MumDead (Hare_Female *a_Mum)
	Inform Mum that we are dead. More...

void	SetMum (Hare_Female *)
	Set the mother pointer. Reimplemented in Hare_Infant. More...

	THare (int p_x, int p_y, Landscape p_L, THare_Population_Manager p_PPM)
	Constructor. More...

void	THareInit (int p_x, int p_y, THare_Population_Manager *p_PPM)
	Object Initiation. More...

virtual	~THare ()
	Destructor. More...

Public Member Functions inherited from TAnimal
void	CheckManagement (void)

void	CheckManagementXY (int x, int y)

virtual void	CopyMyself ()

virtual void	Dying ()

virtual void	KillThis ()

virtual void	ReinitialiseObject (int x, int y, Landscape *L)
	Used to re-use an object - must be implemented in descendent classes. More...

void	SetX (int a_x)

void	SetY (int a_y)

int	Supply_m_Location_x ()

int	Supply_m_Location_y ()

unsigned	SupplyFarmOwnerRef ()

APoint	SupplyPoint ()

int	SupplyPolygonRef ()

AnimalPosition	SupplyPosition ()

	TAnimal (int x, int y, Landscape *L)

virtual int	WhatState ()

Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo ()
	Returns the current state number. More...

bool	GetStepDone ()
	Returns the step done indicator flag. More...

void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...

virtual void	ReinitialiseObject ()
	Used to re-use an object - must be implemented in descendent classes. More...

void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...

void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...

	TALMaSSObject ()
	The constructor for TALMaSSObject. More...

virtual	~TALMaSSObject ()
	The destructor for TALMaSSObject. More...

Protected Member Functions
void	DoLactation ()
	Lactation. More...

virtual void	GeneralEndocrineDisruptor (double a_pesticide_dose)
	Handles internal effects of endocrine distrupter pesticide exposure for female. More...

virtual void	GeneralOrganoPhosphate (double a_pesticide_dose)
	Handles internal effects of organophosphate pesticide exposure for female. More...

void	GiveBirth ()
	Produce a litter. More...

virtual void	InternalPesticideHandlingAndResponse ()
	Handles internal effects of pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...

void	Mating ()
	Mate. More...

APoint	PlaceYoung ()
	Find somewhere nice for the babies to hide. More...

TTypeOfHareState	st_Developing ()
	Female Developing. More...

TTypeOfHareState	st_Dispersal ()
	Female Dispersal. More...

TTypeOfHareState	st_Foraging ()
	Female Foraging. More...

TTypeOfHareState	st_ReproBehaviour ()
	Reproductive behaviour control. More...

TTypeOfHareState	st_Resting ()
	Resting. More...

void	UpdateGestation ()
	Update gestation counter. More...

void	UpdateOestrous ()
	Update oestrous counter. More...

Protected Member Functions inherited from Hare_Juvenile
bool	ShouldMature ()
	Test for maturation. More...

TTypeOfHareState	st_Developing ()
	The development code for Hare_Juvenile. More...

TTypeOfHareState	st_Foraging ()
	Juvenile foraging. More...

void	st_NextStage ()
	Maturation to Hare_Male or Hare_Female. More...

TTypeOfHareState	st_Resting ()
	Juvenile Resting. More...

virtual bool	WasPredated ()
	Test for mortality. More...

Protected Member Functions inherited from THare
void	EnergyBalance (TTypeOfActivity a_activity, int dist)
	Adjust energy balance for an activity. More...

double	Forage (int &time)
	Foraging. More...

double	ForageP (int &time)
	Foraging but also incorporating pesticide exposure. More...

double	ForageSquare (int a_x, int a_y)
	Forage from an area. More...

double	ForageSquareP (int a_x, int a_y, double *a_pestexposure)
	Forage from an area and resturn pesticide exposure as well as food. More...

int	GetPegDirection ()
	Get direction of peg. More...

int	GetPegDistance ()
	Get peg distance. More...

int	GetPegPull ()
	Get attractive force of peg. More...

void	MovePeg ()
	Move the peg according to attraction forces. More...

bool	OnFarmEvent (FarmToDo event)
	Do we require a response to a farm event. More...

bool	Run (int a_dist, int a_direction)
	Run a distance in a direction. More...

virtual void	Running (int a_max_dist)
	Run. More...

void	st_Dying ()
	Tidy up before removing the object on death. More...

void	TimeBudget (TTypeOfActivity a_activity, int dist)
	Adjust time budger for an activity. More...

void	Walking (int a_dist, int a_direction)
	Walking. More...

Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Protected Attributes
int	m_GestationCounter
	State variable - Days in gestation. More...

double	m_LeveretMaterial
	State variable - Mass of foetal material. More...

int	m_litter_no
	State variable - current litter number. More...

TListOfHares	m_MyYoung
	Pointer to litter. More...

int	m_NoYoung
	State variable - current litter size. More...

int	m_OestrousCounter
	State variable - Days in oestrous. More...

TTypeOfActivity	m_reproActivity
	State variable - current reproductive state. More...

bool	m_sterile
	State variable - is/not sterile. More...

Protected Attributes inherited from THare
int	m_ActivityTime
	Minutes of potential activity time per day. More...

int	m_Age
	State variale - hare age. More...

TTypeOfHareState	m_CurrentHState
	Defines the current activity. More...

int	m_ddindex
	State variable used in alternative density-dependent configurations. More...

int	m_DensitySum
	State variable used in alternative density-dependent configurations. More...

double	m_EnergyMax
	State variable - the amount of energy it is possible to eat as a multiplyer or RMR. More...

int	m_expDensity [365]
	State variable used in alternative density-dependent configurations. More...

int	m_experiencedDensity
	State variable used in alternative density-dependent configurations. More...

double	m_fatReserve
	State variable - the energy reserve of the hare. More...

double	m_foragingenergy
	Energy obtained from foraging/feeding. More...

bool	m_IamSick
	flag for sickness - used in conjunction with disease configurations More...

double	m_KJForaging
	KJ/m cost of foraging per kg hare. More...

double	m_KJRunning
	KJ/m cost of running per kg hare. More...

double	m_KJWalking
	KJ/m cost of walking per kg hare. More...

int	m_lastYearsDensity
	State variable used in alternative density-dependent configurations. More...

int	m_Lifespan
	Physiolocal lifespan, assuming nothing else kills the hare (unlikely to reach this age) More...

Hare_Female *	m_MyMum
	Pointer to the hare's mum. More...

double	m_old_weight
	State variale - last hare weight. More...

THare_Population_Manager *	m_OurPopulationManager
	Pointer to the hare population manager. More...

int	m_peg_x
	peg x-coordinate More...

int	m_peg_y
	peg y-coordinate More...

double	m_pesticide_burden
	State variable used to hold the current body-burden of pesticide. More...

double	m_pesticidedegradationrate
	State variable used to hold the daily degredation rate of the pesticide in the body. More...

bool	m_pesticideInfluenced1
	Flag to indicate pesticide effects (e.g. can be used for endocrine distruptors with delayed effects until birth). More...

int	m_RefNum
	Unique hare reference number, also functions as sex flag. More...

double	m_SpeedRunning
	m/min speed of running per kg hare More...

double	m_SpeedWalking
	m/min speed of walking per kg hare More...

int	m_StarvationDays
	State variable - the number of consecutive days in negative energy balance. More...

double	m_TodaysEnergy
	State variable - the amount of energy available today, can be in deficit. More...

Hare_Object	m_Type
	State variale - the type of hare. More...

double	m_weight
	State variale - hare weight g. More...

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
Static Public Attributes inherited from THare
static double *	m_vegPalatability = NULL
	Will hold and array of palatability for hare for each tov type. Most are 1, but unpalatable vegetation can be specified here. More...

Detailed Description

Class for female hares.

Definition at line 1040 of file Hare_all.h.

Constructor & Destructor Documentation

◆ Hare_Female()

Hare_Female::Hare_Female	(	int	p_x,
		int	p_y,
		Landscape *	p_L,
		THare_Population_Manager *	p_PPM,
		double	p_weight,
		int	a_age,
		int	a_Ref
	)

Female Constructor.

Definition at line 3117 of file Hare_all.cpp.

                                                                                                                                   : Hare_Juvenile(p_x, p_y, p_L, p_PPM, p_weight)
 {
     Init(p_weight,a_age,a_Ref);
 }

References Init().

◆ ~Hare_Female()

Hare_Female::~Hare_Female ( )

virtual

Female Destructor.

Definition at line 3156 of file Hare_all.cpp.

 {
     //Nothing to do
 }

Member Function Documentation

◆ AddYoung()

void Hare_Female::AddYoung ( THare * a_new )

Add a leveret to the list of kids.

Adds a new young to the mothers list

Definition at line 3844 of file Hare_all.cpp.

 {
   m_MyYoung.push_back(a_new);
 }

References m_MyYoung.

Referenced by THare_Population_Manager::CreateObjects().

◆ AllYoungKilled()

void Hare_Female::AllYoungKilled ( )

Last leveret predated.

Behavioural switch to determine what to do on death of all young. Depends on what we were doing before.

Definition at line 3879 of file Hare_all.cpp.

 {
   switch (m_reproActivity) {
     case activity_oestrouscycle:
       break;
     case activity_inoestrous:
       break;
     case activity_gestation:
       break;
     case activity_givebirth:
     case activity_lactation:
       m_reproActivity=activity_oestrouscycle;
       m_OestrousCounter=cfg_DaysToOestrous.value();
       break;
     default:
       m_OurLandscape->Warn("Hare_Female::AllYoungKilled unknown activity"
                                                                         ,NULL);
       exit(1);
   }
 }

References activity_gestation, activity_givebirth, activity_inoestrous, activity_lactation, activity_oestrouscycle, cfg_DaysToOestrous(), m_OestrousCounter, TAnimal::m_OurLandscape, m_reproActivity, and Landscape::Warn().

Referenced by ON_YoungKilled().

◆ AllYoungMatured()

void Hare_Female::AllYoungMatured ( )

No more young to look after.

Definition at line 3931 of file Hare_all.cpp.

 {
     m_NoYoung=0;
   switch (m_reproActivity) {
     case activity_oestrouscycle:
       break;
     case activity_inoestrous:
       break;
     case activity_gestation:
       break;
     case activity_givebirth:
       break;
     case activity_lactation:
       m_reproActivity=activity_oestrouscycle;
       m_OestrousCounter=cfg_DaysToOestrous.value();
       break;
     default:
       m_OurLandscape->Warn("Hare_Female::AllYoungMatured unknown activity",NULL);
       exit(1);
   }
 }

References activity_gestation, activity_givebirth, activity_inoestrous, activity_lactation, activity_oestrouscycle, cfg_DaysToOestrous(), m_NoYoung, m_OestrousCounter, TAnimal::m_OurLandscape, m_reproActivity, and Landscape::Warn().

Referenced by ON_RemoveYoung().

◆ BeginStep()

void Hare_Female::BeginStep ( void )

virtual

Female BeginStep.

Reimplemented from Hare_Juvenile.

Definition at line 3162 of file Hare_all.cpp.

 {
     m_ActivityTime=1440; // Start the day
 #ifdef __SIZERELATEDDEATH
     if ((m_OurLandscape->SupplyDayInYear()>0) && ((m_OurLandscape->SupplyDayInYear()<90))) {
         if (m_Age>365) {
             if (m_weight<cfg_hare_minimum_breeding_weight.value()) {
                 ON_Dead();
                 m_StepDone=true; // We need to skip the step code, we are dead
                 return;
             }
         }
     }
 #endif
 #ifdef __DISEASEDDMORTALITY
     if (m_IamSick) {
         ON_Dead();
         m_StepDone=true; // We need to skip the step code, we are dead
         return;
     }
 #endif
     if (WasPredated()) {
         ON_Dead();
         m_StepDone=true; // We need to skip the step code, we are dead
         return;
     }
     // Age physiolocally
     if (++m_Age > m_Lifespan) {
         ON_Dead();
         m_StepDone=true; // We need to skip the step code, we are dead
     return;
     }
     m_KJWalking=m_OurPopulationManager->GetKJperM((int) floor(0.5+m_weight));
     m_KJRunning=m_KJWalking*2;
     m_KJForaging=m_KJWalking;
     if (g_rand_uni()<cfg_hare_proximity_alert.value()) {
         Running(cfg_hare_escape_dist.value());
     }
     // Checking code ***CJT***
     m_foragingenergy=0;
 #ifdef __DISEASEDDM
     m_experiencedDensity+=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
     if (m_OurLandscape->SupplyDayInYear()==0) {
         m_lastYearsDensity=m_experiencedDensity/365;
         m_experiencedDensity=0;
         if (random(cfg_HareFemaleSicknessDensityDepValue.value())<m_lastYearsDensity) {
             m_IamSick=true;
         }
         else m_IamSick=false;
     }
 #endif
 #ifdef __DISEASEDDM2
     m_experiencedDensity+=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
     if (m_OurLandscape->SupplyDayInYear()==0) {
         m_lastYearsDensity=m_experiencedDensity/365;
         m_experiencedDensity=0;
     }
 #endif
 #ifdef __DISEASEDDM3
     m_ddindex++;
     if (m_ddindex==365) {
         m_ddindex=0;
     }
     m_DensitySum-=m_expDensity[m_ddindex];
     m_expDensity[m_ddindex]=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
     m_DensitySum+=m_expDensity[m_ddindex];
     m_lastYearsDensity= int(m_DensitySum * (1.0/365.0));
 #endif
     // Set the maximum possible energy intake
     m_EnergyMax = GetRMR()*cfg_MaxEnergyIntakeScaler.value();
     CheckManagement();
 }

References cfg_hare_escape_dist(), cfg_hare_minimum_breeding_weight(), cfg_hare_proximity_alert(), cfg_HareFemaleSicknessDensityDepValue(), cfg_MaxEnergyIntakeScaler(), TAnimal::CheckManagement(), g_rand_uni, THare_Population_Manager::GetKJperM(), THare::GetRMR(), THare_Population_Manager::GetTotalDensity(), THare::m_ActivityTime, THare::m_Age, THare::m_ddindex, THare::m_DensitySum, THare::m_EnergyMax, THare::m_expDensity, THare::m_experiencedDensity, THare::m_foragingenergy, THare::m_IamSick, THare::m_KJForaging, THare::m_KJRunning, THare::m_KJWalking, THare::m_lastYearsDensity, THare::m_Lifespan, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, THare::m_OurPopulationManager, TALMaSSObject::m_StepDone, THare::m_weight, ON_Dead(), THare::Running(), Landscape::SupplyDayInYear(), and Hare_Juvenile::WasPredated().

◆ DoLactation()

void Hare_Female::DoLactation ( )

protected

Lactation.

Feed the young milk.

Here the female uses energy and converts it to milk, which is shared equally between her leverets Assumptions:
a) There is a maximum amount of milk possible to feed to a leveret
b) Equal distribution of inadequate resources

NB the currency is KJ energy not milk per se

Definition at line 3787 of file Hare_all.cpp.

     {
   double sz= (double) m_MyYoung.size();
   if (m_fatReserve>0) { // Zero is used here because it is possible to use all fat reserves on this
     double en=63.7*m_fatReserve;
     // en is the energy available for milk
     double rmr=m_MyYoung[0]->GetRMR();
     double maxMilk= (rmr+m_OurPopulationManager->GetMaxDailyGrowthEnergy(m_MyYoung[0]->GetAge())) * sz * (1-g_PropSolidFood[m_MyYoung[0]->GetAge()]);
     if (en>maxMilk){
       en=maxMilk;
     }
 #ifdef __NOSTARVE
     en=maxMilk;
 #endif
     // remove the energy used
     m_fatReserve-=en* (1.0/63.7); // 63.7 is the cost of 1g dw fat
     // KJ per young
     en/=(double) sz;
     vector<THare*>::iterator current = m_MyYoung.begin();
     while (current != m_MyYoung.end())
     {
       dynamic_cast<Hare_Infant*>(*current)->ON_BeingFed(en);
       current++;
     }
   }
 }

References g_PropSolidFood, THare::GetAge(), THare_Population_Manager::GetMaxDailyGrowthEnergy(), THare::m_fatReserve, m_MyYoung, and THare::m_OurPopulationManager.

Referenced by GiveBirth(), and st_ReproBehaviour().

◆ dumpEnergy()

void Hare_Female::dumpEnergy ( )

Used to record energetic status.

Definition at line 3472 of file Hare_all.cpp.

                              {
    FILE* fp=fopen("EnergyCheck.txt","a");
    int wt=int(floor(0.5+m_weight));
    int fe=int(floor(0.5+m_foragingenergy));
    int fr=int(floor(0.5+m_fatReserve));
    int te=int(floor(0.5+m_TodaysEnergy));
    fprintf (fp,"%d\t%d\t%d\t%d\t%d\n",(int) m_OurLandscape->SupplyDayInYear(), wt, fe, fr, te);
    fclose(fp);
 }

References THare::m_fatReserve, THare::m_foragingenergy, TAnimal::m_OurLandscape, THare::m_TodaysEnergy, THare::m_weight, and Landscape::SupplyDayInYear().

Referenced by st_Foraging().

◆ EndStep()

void Hare_Female::EndStep ( void )

virtual

Female EndStep.

Reimplemented from Hare_Juvenile.

Definition at line 3291 of file Hare_all.cpp.

                           {
     MovePeg();
     if (cfg_hare_pesticideresponse_on.value()) InternalPesticideHandlingAndResponse();
 }

References cfg_hare_pesticideresponse_on(), InternalPesticideHandlingAndResponse(), and THare::MovePeg().

◆ GeneralEndocrineDisruptor()

void Hare_Female::GeneralEndocrineDisruptor ( double a_pesticide_dose )

protectedvirtual

Handles internal effects of endocrine distrupter pesticide exposure for female.

Reimplemented from THare.

Definition at line 4380 of file Hare_all.cpp.

 {
     // May also wish to specify certain gestation days for the effects here
     if (m_GestationCounter > 0)
     {
         m_pesticideInfluenced1 = true;
     }
 }

References m_GestationCounter, and THare::m_pesticideInfluenced1.

Referenced by InternalPesticideHandlingAndResponse().

◆ GeneralOrganoPhosphate()

void Hare_Female::GeneralOrganoPhosphate ( double a_pesticide_dose )

protectedvirtual

Handles internal effects of organophosphate pesticide exposure for female.

Reimplemented from THare.

Definition at line 4393 of file Hare_all.cpp.

 {
     if (g_rand_uni() > l_pest_daily_mort.value()) return;
     m_CurrentHState = tohs_Dying;
     m_StepDone = true;
     return;
 }

References g_rand_uni, l_pest_daily_mort, THare::m_CurrentHState, TALMaSSObject::m_StepDone, and tohs_Dying.

Referenced by InternalPesticideHandlingAndResponse().

◆ GiveBirth()

void Hare_Female::GiveBirth ( )

protected

Produce a litter.

Give birth to Hare_Infants.

Lets assume we do this a deterministic way. So the number of leverets depends on the mass of leveret material collected.
The size is determined by the mass divided by the number possible such that size stays in the range 95-125g
Litter size limited to max 4

Once they are born they need to be placed somewhere. This should be somewhere where the vegetation is not too sparse

Definition at line 3656 of file Hare_all.cpp.

 {
   double leveret_size;
   int NoLeverets=0;
    if (m_pesticideInfluenced1)
    {
         // Could do lots now, e.g. take a test to determine if we reduce repro or abandon it.   
         // The option below reduces the energy for leveret development by 0-100%
         //m_LeveretMaterial *= g_rand_uni();
        // Here we take it all
        m_LeveretMaterial = 0;
         m_pesticideInfluenced1 = false;
    }
  
    // THIS CODE IS FOR DOING IT ON THE BASIS OF ENERGY
   double mi=cfg_minLeveretBirthWeight.value();
   if (m_LeveretMaterial/4.0 > mi) NoLeverets=4;
     else if (m_LeveretMaterial/3.0 > mi) NoLeverets=3;
       else if (m_LeveretMaterial/2.0 > mi) NoLeverets=2;
         else if (m_LeveretMaterial > mi) NoLeverets=1;
   if (NoLeverets==0) {
     // Can't produce a leveret - abort the pregnancy
     m_LeveretMaterial=0;
     m_reproActivity=activity_oestrouscycle;
     m_OestrousCounter=cfg_DaysToOestrous.value();
     return;
   }
   leveret_size=m_LeveretMaterial/(double)NoLeverets;
   if (leveret_size>cfg_maxLeveretBirthWeight.value())
   {
       leveret_size=cfg_maxLeveretBirthWeight.value();
   }
   // END ENERGETIC
   /*
   // THIS IS THE ALTERNATIVE 1 _ GET THE NUMBER BASED ON WHETHER IT IS FIRST, 2ND, 3RD etc..
   NoLeverets=m_OurPopulationManager->GetLitterSize(m_litter_no++);
   if (NoLeverets<1) {
     AllYoungKilled();
     return;
   }
   leveret_size=cfg_HareStartWeight.value(); // NB No variability in start weight
   */
   // END ALTERNATE 1
   /* ALTERNATE 2 - Here we adjust for the weight of the female
  
   if (m_weight > cfg_hare_minimum_breeding_weight.value() ) {
     NoLeverets=m_OurPopulationManager->GetLitterSize(m_litter_no++);
   }
   else {
   }
   if (NoLeverets<1) {
     AllYoungKilled();
     return;
   }
   leveret_size=cfg_HareStartWeight.value(); // NB No variability in start weight
   */
 // END ALTERNATE 2
  
  
   // Create the data required
   struct_Hare* sp;
   sp = new struct_Hare;
   sp->HM = m_OurPopulationManager;
   sp->L = m_OurLandscape;
   sp->Mum=this;
   sp->weight=leveret_size;
   APoint pt = PlaceYoung();
   sp->x = pt.m_x;
   sp->y = pt.m_y;
   // Make the leverets
   m_OurPopulationManager->CreateObjects(0,this,NULL,sp,NoLeverets);
   delete sp;
   m_litter_no++;
   m_reproActivity=activity_lactation;
 #ifdef __saveLitterInfo
     //Temporary Output Start
     FILE* fp=fopen("LitterProduction.txt","a");
     int month=m_OurLandscape->SupplyMonth();
     fprintf(fp,"%i\t%i\t%f\t%d\n",month, NoLeverets, leveret_size, m_litter_no);
     fclose(fp);
     // End
 #endif
     // Feed them today
     DoLactation();
 }

References activity_lactation, activity_oestrouscycle, cfg_DaysToOestrous(), cfg_maxLeveretBirthWeight(), cfg_minLeveretBirthWeight(), THare_Population_Manager::CreateObjects(), DoLactation(), struct_Hare::HM, struct_Hare::L, m_LeveretMaterial, m_litter_no, m_OestrousCounter, TAnimal::m_OurLandscape, THare::m_OurPopulationManager, THare::m_pesticideInfluenced1, m_reproActivity, struct_Hare::Mum, PlaceYoung(), Landscape::SupplyMonth(), struct_Hare::weight, struct_Hare::x, and struct_Hare::y.

Referenced by st_ReproBehaviour().

◆ Init()

void Hare_Female::Init	(	double	p_weight,
		int	a_age,
		int	a_Ref
	)

Object initiation.

Definition at line 3134 of file Hare_all.cpp.

 {
     
     m_Type = hob_Female;
     m_fatReserve = p_weight * 3.8*0.04; // To get 4% of WW+ingesta
     m_sterile = false;
     m_weight = p_weight;
     m_old_weight = p_weight;
     m_Age = a_age;
     m_OestrousCounter = 0;
     m_GestationCounter = 0;
     m_LeveretMaterial = 0;
     m_reproActivity = activity_oestrouscycle;
     m_litter_no = 0;
     m_KJWalking = m_OurPopulationManager->GetKJperM((int)floor(0.5 + m_weight));
     m_KJRunning = m_KJWalking * 2;
     m_KJForaging = m_KJWalking;
     m_IamSick = false;
     m_RefNum = a_Ref;
 }

References activity_oestrouscycle, THare_Population_Manager::GetKJperM(), hob_Female, THare::m_Age, THare::m_fatReserve, m_GestationCounter, THare::m_IamSick, THare::m_KJForaging, THare::m_KJRunning, THare::m_KJWalking, m_LeveretMaterial, m_litter_no, m_OestrousCounter, THare::m_old_weight, THare::m_OurPopulationManager, THare::m_RefNum, m_reproActivity, m_sterile, THare::m_Type, and THare::m_weight.

Referenced by Hare_Female(), and ReInit().

◆ InternalPesticideHandlingAndResponse()

void Hare_Female::InternalPesticideHandlingAndResponse ( )

protectedvirtual

Handles internal effects of pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes.

This method is re-implemented ffrom THare for any class which has pesticide response behaviour. If the body burden exceeds the trigger then call pesticide-specific actions by dose

Reimplemented from THare.

Definition at line 4008 of file Hare_all.cpp.

 {
     TTypesOfPesticide tp = m_OurLandscape->SupplyPesticideType();
     double pesticideInternalConc = m_pesticide_burden / m_weight;
  
     if (m_pesticide_burden > 0) m_OurPopulationManager->BodyBurdenOut(m_OurLandscape->SupplyYearNumber(), m_OurLandscape->SupplyDayInYear(), m_pesticide_burden, pesticideInternalConc);
  
     if (pesticideInternalConc > cfg_HarePesticideAccumulationThreshold.value())
     {
         switch (tp)
         {
         case ttop_NoPesticide:
             break;
         case ttop_ReproductiveEffects:
             GeneralEndocrineDisruptor(pesticideInternalConc); // Calls the EndocrineDisruptor action code
             break;
         case ttop_AcuteEffects:
             GeneralOrganoPhosphate(pesticideInternalConc); // Calls the GeneralOrganophosphate action code
             break;
         default:
             exit(47);
         }
     }
     m_pesticide_burden *= m_pesticidedegradationrate; // Does nothing by default except internal degredation of the pesticide
 }

References THare_Population_Manager::BodyBurdenOut(), cfg_HarePesticideAccumulationThreshold(), GeneralEndocrineDisruptor(), GeneralOrganoPhosphate(), TAnimal::m_OurLandscape, THare::m_OurPopulationManager, THare::m_pesticide_burden, THare::m_pesticidedegradationrate, THare::m_weight, Landscape::SupplyDayInYear(), Landscape::SupplyPesticideType(), Landscape::SupplyYearNumber(), ttop_AcuteEffects, ttop_NoPesticide, and ttop_ReproductiveEffects.

Referenced by EndStep().

◆ Mating()

void Hare_Female::Mating ( )

protected

Mate.

Definition at line 3610 of file Hare_all.cpp.

 {
     // Sigh, need to develop code to determine if a male is close - how does
     // she choose a mate?? TODO if we ever consider males limiting or need population genetics
     // This is complicated by multiple matings in real life too.
     //
     // Assuming she has a mate and is mated
     m_GestationCounter=cfg_hare_DaysToGestation.value();
     m_reproActivity=activity_gestation;
     m_LeveretMaterial=0;
 }

References activity_gestation, cfg_hare_DaysToGestation(), m_GestationCounter, m_LeveretMaterial, and m_reproActivity.

Referenced by st_ReproBehaviour().

◆ ON_AreYouMyMum()

bool Hare_Female::ON_AreYouMyMum ( THare * a_young )

Debug function.

Debug code for checking young lists.

Definition at line 3974 of file Hare_all.cpp.

 {
   m_NoYoung= (int) m_MyYoung.size();
   vector<THare*>::iterator current = m_MyYoung.begin();
   while (current != m_MyYoung.end())
   {
     if (*current == a_young)
     {
       return true;
     }
     current++;
   }
   return false;
 }

References m_MyYoung, and m_NoYoung.

◆ ON_Dead()

void Hare_Female::ON_Dead ( void )

virtual

The female is dead.

Do the housekeeping needed for object destruction

Reimplemented from Hare_Juvenile.

Definition at line 3956 of file Hare_all.cpp.

 {
    // if she has young she must tell them she is dead
    vector<THare*>::iterator current = m_MyYoung.begin();
    while (current != m_MyYoung.end())
    {
      (*current)->ON_MumDead(this);
      current++;
    }
    m_MyYoung.clear(); // Needed because of the potential for object re-use
    m_CurrentHState=tohs_Dying;
    m_CurrentStateNo=-1;
    m_StepDone=true;
 }

References THare::m_CurrentHState, TALMaSSObject::m_CurrentStateNo, m_MyYoung, TALMaSSObject::m_StepDone, and tohs_Dying.

Referenced by BeginStep(), THare_Population_Manager::Hunting(), THare_Population_Manager::HuntingGrid(), and Step().

◆ ON_RemoveYoung()

void Hare_Female::ON_RemoveYoung ( THare * a_young )

A leveret has matured.

This functions simply sorts through the m_Young vector and removes the matured young.
This is identical to ON_YoungKilled, but differs in the result of removing the last one.

Definition at line 3901 of file Hare_all.cpp.

   {
   m_NoYoung= (int) m_MyYoung.size();
   vector<THare*>::iterator current = m_MyYoung.begin();
   while (current != m_MyYoung.end())
   {
     if (*current == a_young)
     {
       m_MyYoung.erase(current);
       if (m_MyYoung.size()==0) {
         // All young grown up do something appropriate
         AllYoungMatured();
       }
       m_NoYoung= (int) m_MyYoung.size();
       return;
     }
     current++;
   }
   // Should never get here...raise an error and duck out of the program.
   //
   m_OurLandscape->Warn("Hare_Female::ON_RemoveYoung - unknown young",NULL);
   exit(1);
 }

References AllYoungMatured(), m_MyYoung, m_NoYoung, TAnimal::m_OurLandscape, and Landscape::Warn().

Referenced by Hare_Young::st_NextStage().

◆ ON_YoungKilled()

void Hare_Female::ON_YoungKilled ( THare * a_young )

A leveret has been killed.

This functions sorts through the m_Young vector and removes the dead young

Definition at line 3850 of file Hare_all.cpp.

 {
   m_NoYoung= (int) m_MyYoung.size();
   vector<THare*>::iterator current = m_MyYoung.begin();
   while (current != m_MyYoung.end())
   {
     if (*current == a_young)
     {
       m_MyYoung.erase(current);
       if (m_MyYoung.size()==0) {
         // All young eaten do something appropriate
         AllYoungKilled();
       }
       return;
     }
     current++;
   }
   // Should never get here...raise an error and duck out of the program.
   //
   m_OurLandscape->Warn("Hare_Female::ON_YoungKilled - unknown young",NULL);
   exit(1);
 }

References AllYoungKilled(), m_MyYoung, m_NoYoung, TAnimal::m_OurLandscape, and Landscape::Warn().

Referenced by THare::st_Dying().

◆ PlaceYoung()

APoint Hare_Female::PlaceYoung ( )

protected

Find somewhere nice for the babies to hide.

Find a place to put the young.

Definition at line 3755 of file Hare_all.cpp.

 {
     APoint pt;
     int loop = 0;
     while (loop++ < 500)
     {
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x - loop, m_Location_y - loop);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x, m_Location_y - loop);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x + loop, m_Location_y - loop);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x - loop, m_Location_y);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x + loop, m_Location_y);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x - loop, m_Location_y + loop);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x, m_Location_y + loop);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
         pt = m_OurLandscape->CorrectCoordsPt(m_Location_x + loop, m_Location_y + loop);
         if (m_OurLandscape->SupplyVegHeight(pt.m_x, pt.m_y) >= 30) return pt;
     }
     pt.m_x = m_Location_x;
     pt.m_y = m_Location_y;
     return pt;
 }

References Landscape::CorrectCoordsPt(), TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, and Landscape::SupplyVegHeight().

Referenced by GiveBirth().

◆ ReInit()

void Hare_Female::ReInit ( struct_Hare a_data )

Female object reinitiation.

Definition at line 3123 of file Hare_all.cpp.

 {
     m_Location_x = a_data.x;
     m_Location_y = a_data.y;
     m_OurLandscape = a_data.L;
     m_CurrentStateNo = 0;
     THareInit(a_data.x, a_data.y, a_data.HM);
     Init(a_data.weight, a_data.age, a_data.RefNum);
 }

References struct_Hare::age, struct_Hare::HM, Init(), struct_Hare::L, TALMaSSObject::m_CurrentStateNo, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, struct_Hare::RefNum, THare::THareInit(), struct_Hare::weight, struct_Hare::x, and struct_Hare::y.

Referenced by THare_Population_Manager::CreateObjects().

◆ SanityCheckYoungList()

bool Hare_Female::SanityCheckYoungList ( )

Debug function.

Debug code for checking young lists.

Definition at line 3992 of file Hare_all.cpp.

 {
   m_NoYoung= (int) m_MyYoung.size();
   unsigned int current=0;
   while (current < m_MyYoung.size())
   {
     if (m_MyYoung[current]->GetMum()!=this)
     {
       return false;
     }
     current++;
   }
   return true;
 }

References THare::GetMum(), m_MyYoung, and m_NoYoung.

◆ SetSterile()

void Hare_Female::SetSterile ( )

inline

Female is sterile.

Definition at line 1093 of file Hare_all.h.

1093 { m_sterile = true; }

References m_sterile.

Referenced by THare_Population_Manager::DoFirst().

◆ st_Developing()

TTypeOfHareState Hare_Female::st_Developing ( )

protected

Female Developing.

Definition at line 3297 of file Hare_all.cpp.

 {
   //Assumes that the fatReserve has been added to by st_Foraging from yesterday
   //
     // This is the last behaviour state called each day, so we can use this to sort out
     // the energetics
   //Assumes that the fatReserve has been added to by st_Foraging from yesterday
   //
  
     EnergyBalance(activity_Resting, 1440); // calculates the energy use by BMR
     if (m_TodaysEnergy<0) {
         m_fatReserve+=(m_TodaysEnergy * (1.0/42.7));
         m_TodaysEnergy=0;
     }
     // Grow
     // Solid food absorption is already taken into account by this time
     if (m_Age<365) 
     {
         double Target=m_OurPopulationManager->GetMaxDailyGrowthEnergyP(m_Age);
         if (m_TodaysEnergy<Target) Target=m_TodaysEnergy;
         double addedtoday=Target*m_OurPopulationManager->GetGrowthEfficiencyP(m_Age);
         m_weight+=addedtoday;
         m_TodaysEnergy-=Target;
         Target=m_OurPopulationManager->GetMaxDailyGrowthEnergyF(m_Age);
         if (m_TodaysEnergy<Target) Target=m_TodaysEnergy;
         addedtoday=Target*m_OurPopulationManager->GetGrowthEfficiencyF(m_Age);
         m_weight+=addedtoday;
         m_TodaysEnergy-=Target;
     } 
     else 
     {
         double Target=m_OurPopulationManager->GetMaxDailyGrowthEnergyF(m_Age);
         if (m_TodaysEnergy<Target) Target=m_TodaysEnergy;
         double gf=m_OurPopulationManager->GetGrowthEfficiencyF(m_Age);
         double addedtoday=Target*gf;
         m_weight+=addedtoday;
         m_TodaysEnergy-=Target;
     }
     if (m_TodaysEnergy>0) 
     {
         // Put what remains back into fat reserve
         m_fatReserve+=m_TodaysEnergy*m_OurPopulationManager->GetGrowthEfficiencyF(366); // 366 is the adult fat conversion efficiency
         m_TodaysEnergy=0;
         // Cap the fat reserve and store surplus energy for today
         if (m_fatReserve>(cfg_AdultMaxFat.value() * m_weight)) {
             m_fatReserve=cfg_AdultMaxFat.value() * m_weight;
         }
         m_StarvationDays=0; // Not starving
         return tohs_Foraging;
     }
     else {
             m_fatReserve+=m_TodaysEnergy*m_OurPopulationManager->GetGrowthEfficiencyF(366); // 366 is the adult fat conversion efficiency
             if (m_fatReserve<0) 
             {
                 m_TodaysEnergy=m_fatReserve/m_OurPopulationManager->GetGrowthEfficiencyF(366);
                 m_fatReserve=0.0;
             }
             else m_TodaysEnergy=0;
             // What should the criteria for a starvation day be?
             //double rmr=m_OurPopulationManager->GetRMR(m_Age, GetTotalWeight());
             //if (m_TodaysEnergy<(0.0-(rmr*0.25)))
             if (m_TodaysEnergy<0.0)
             {
                 // Oh oh, we are starving need to lose body weight and maybe we will die?
 #ifdef __ADULT_WT_STARVE_CHANCE
                 int testval=0;
                 if (m_Age<cfg_fixadult_starve.value()) {
                     // Somewhere between juvenile and adult so use in between values
                     int diff = cfg_adult_starve.value() - cfg_juv_starve.value();
                     testval=cfg_adult_starve.value()- (int)((1.0-((double)m_Age/cfg_fixadult_starve.value()))*diff);
  
                 } else testval=cfg_adult_starve.value();
                 if (++m_StarvationDays > cfg_adult_starvation_threshold.value()) {
                     if (random(10000)> testval) {
                         return tohs_Dying;
                     }
                 }
     #ifdef __NOKNOCKONENERGYEFFECT
                 else m_TodaysEnergy=0.0;
     #endif
 #else
                 if (++m_StarvationDays > cfg_adult_starvation_threshold.value()) {
                     return tohs_Dying;
                 }
 #endif
             }
             else {
                 m_StarvationDays--; // Not starving
                 if (m_StarvationDays<0) m_StarvationDays=0;
                 m_TodaysEnergy=0;
             }
             // If we have kids then we expect this for a while, so only dispere if fat reserves are less than 0
             if (m_reproActivity!=activity_lactation || m_fatReserve<0) {
                             if (random(3)==0) return tohs_Dispersal; // We are hungry, we need to disperse
             }
     } // end if energy<0
     return tohs_Foraging;
 }

References activity_lactation, activity_Resting, cfg_adult_starvation_threshold(), cfg_adult_starve(), cfg_AdultMaxFat(), cfg_fixadult_starve(), cfg_juv_starve(), THare::EnergyBalance(), THare_Population_Manager::GetGrowthEfficiencyF(), THare_Population_Manager::GetGrowthEfficiencyP(), THare_Population_Manager::GetMaxDailyGrowthEnergyF(), THare_Population_Manager::GetMaxDailyGrowthEnergyP(), THare::m_Age, THare::m_fatReserve, THare::m_OurPopulationManager, m_reproActivity, THare::m_StarvationDays, THare::m_TodaysEnergy, THare::m_weight, tohs_Dispersal, tohs_Dying, and tohs_Foraging.

Referenced by Step().

◆ st_Dispersal()

TTypeOfHareState Hare_Female::st_Dispersal ( )

protectedvirtual

Female Dispersal.

Uses the base class st_dispersal but then adds some special female functionality.

Reimplemented from Hare_Juvenile.

Definition at line 3485 of file Hare_all.cpp.

 {
     TTypeOfHareState tohs=Hare_Juvenile::st_Dispersal();
     if (tohs==tohs_Dying) return tohs_Dying;
     // If dispersal is called, then she must be deserting any young she has
     // The easiest way to do this is to lie, and tell them she is dead
     vector<THare*>::iterator current = m_MyYoung.begin();
     while (current != m_MyYoung.end()) {
         (*current)->ON_MumDead(this);
         current++;
     }
     // Now must clear the list.
     if (m_MyYoung.size()>=1) {
         m_MyYoung.erase(m_MyYoung.begin(),m_MyYoung.end()); // Remove all elements
         m_reproActivity=activity_oestrouscycle;
     }
     m_peg_x = m_Location_x;
     m_peg_y = m_Location_y;
     return tohs_Foraging;
 }

References activity_oestrouscycle, TAnimal::m_Location_x, TAnimal::m_Location_y, m_MyYoung, THare::m_peg_x, THare::m_peg_y, m_reproActivity, Hare_Juvenile::st_Dispersal(), tohs_Dying, and tohs_Foraging.

Referenced by Step().

◆ st_Foraging()

TTypeOfHareState Hare_Female::st_Foraging ( )

protected

Female Foraging.

Effectively the day is started here, unless we have been dispersing.
At this point we have a whole day to use and need to figure out how to use it.
There are some constraints on the time we can use for foraging such that we need a certain amount of time for resting e.g. coprophagy. For now I am going to assume that the resting time required is proportional to forage time used and the ratio of the two is in cfg_ForageRestingRatio

Four different ways of implementing density dependence are selectable here.

Definition at line 3397 of file Hare_all.cpp.

 {
    double time= (double) m_ActivityTime * cfg_ForageRestingRatio.value();
    // We need to rest if there is no more time
    if (time < 30 ) return tohs_Resting;
    // If there are more hares here then interference reduces the activity time
 #ifdef __DELAYEDDD
    int hares=(m_OurPopulationManager->GetDelayedAdultDensity(m_Location_x, m_Location_y));
 #else
    int hares=(m_OurPopulationManager->GetAdultDensity(m_Location_x, m_Location_y));
 #endif
 #ifdef __THRESHOLD_AD_DD
   if (hares<m_OurPopulationManager->m_HareThresholdDD) hares=0;
   else hares-=m_OurPopulationManager->m_HareThresholdDD;
 #endif
 #ifdef __DISEASEDDM2
     double inter=m_OurPopulationManager->GetInterference(m_lastYearsDensity);
 #else
 #ifdef __DISEASEDDM3
     double inter=m_OurPopulationManager->GetInterference(m_lastYearsDensity);
 #else
 #ifndef __DDEPMORT
   double inter=m_OurPopulationManager->GetInterference(hares);
 #else
     #ifndef __DISEASEDDM
       double inter=m_OurPopulationManager->GetInterference(hares);
     #else
       double inter=1.0;
     #endif
 #endif
 #endif
 #endif
     if ((inter<0.5) && (time > 300))
     {
         if (m_reproActivity!=activity_lactation) {  // Don't abandon kids just because others want to be here too
             if (g_rand_uni() > inter) // added to reduce rate of dispersal
             {
                 //m_ActivityTime = (int)(time / cfg_ForageRestingRatio.value());
                 return tohs_Dispersal; // Added Sat 15th Dec 2007
             }
         }
     }
    time*=inter;
    // Given the time we have then we need to feed, which will return an energy value obtained.
    int a_time = (int) time;
    if (cfg_hare_pesticideresponse_on.value())
    {
        m_TodaysEnergy = ForageP(a_time);
    }
    else
    {
        m_TodaysEnergy = Forage(a_time);
    }
    // We need to spend energy on foraging and associated movement - done in ForageSquare()
    //
    TimeBudget(activity_Foraging, (int)time-a_time);
    // Print the energy checking output
 #ifdef __saveEnergyInfo
    dumpEnergy();
 #endif
    return tohs_ReproBehaviour;
 }

References activity_Foraging, activity_lactation, cfg_ForageRestingRatio(), cfg_hare_pesticideresponse_on(), dumpEnergy(), THare::Forage(), THare::ForageP(), g_rand_uni, THare_Population_Manager::GetAdultDensity(), THare_Population_Manager::GetDelayedAdultDensity(), THare_Population_Manager::GetInterference(), THare::m_ActivityTime, THare_Population_Manager::m_HareThresholdDD, THare::m_lastYearsDensity, TAnimal::m_Location_x, TAnimal::m_Location_y, THare::m_OurPopulationManager, m_reproActivity, THare::m_TodaysEnergy, THare::TimeBudget(), tohs_Dispersal, tohs_ReproBehaviour, and tohs_Resting.

Referenced by Step().

◆ st_ReproBehaviour()

TTypeOfHareState Hare_Female::st_ReproBehaviour ( )

protected

Reproductive behaviour control.

A switch determining what repro behaviour to carry out.

Repro behaviour to consider:
1) Mating - either a function of her or the male - but lets keep it here so the male is a simple as possible.
2) Update Gestation.
3) Give Birth.
4) Lactation.
5) Getting resources for leveret production.
6) Determining leveret size and litter size?

Also optional mortality based upon reproductive mortality

Definition at line 3520 of file Hare_all.cpp.

 {
    // First find out what kind of behaviour we are in:
 #ifdef __REPROMORTCHANCE
          // Repromortchance is a function of size, the bigger you are the less chance of mortality
          int mc=0;
 #endif
    switch(m_reproActivity)
    {
      case activity_oestrouscycle:
        UpdateOestrous();
        break;
      case activity_inoestrous:
        Mating();
        break;
      case activity_gestation:
        UpdateGestation();
        break;
      case activity_givebirth:
 #ifdef __REPROMORTCHANCE
          // Repromortchance is a function of size, the bigger you are the less chance of mortality
          mc=random(100+(int)m_weight-cfg_hare_minimum_breeding_weight.value());
          if (mc<cfg_HareFemaleReproMortValue.value()) {
              return tohs_Dying;
          }
 #endif
        GiveBirth();
        break;
      case activity_lactation:
        DoLactation();
        break;
      default:
        m_OurLandscape->Warn("Hare_Female::st_ReproBehaviour unknown activity"
                                                                          ,NULL);
        exit(1);
    }
    return tohs_Resting;
 }

References activity_gestation, activity_givebirth, activity_inoestrous, activity_lactation, activity_oestrouscycle, cfg_hare_minimum_breeding_weight(), cfg_HareFemaleReproMortValue(), DoLactation(), GiveBirth(), TAnimal::m_OurLandscape, m_reproActivity, THare::m_weight, Mating(), tohs_Dying, tohs_Resting, UpdateGestation(), UpdateOestrous(), and Landscape::Warn().

Referenced by Step().

◆ st_Resting()

TTypeOfHareState Hare_Female::st_Resting ( )

protected

Resting.

This method uses up the rest of the day in resting

Definition at line 3507 of file Hare_all.cpp.

 {
    return tohs_Developing;
 }

References tohs_Developing.

Referenced by Step().

◆ Step()

void Hare_Female::Step ( void )

virtual

Female Step.

Reimplemented from Hare_Juvenile.

Definition at line 3236 of file Hare_all.cpp.

 {
   if (m_StepDone || m_CurrentStateNo == -1) return;
   switch (m_CurrentHState)
   {
    case tohs_InitialState: // Initial state
     m_CurrentHState=tohs_Foraging;
     break;
    case tohs_Dispersal:
     // Legal returns are:
     // tohs_Foraging
    // Dispersal is risky therefore take a test again
 #ifdef __DISPERSALDDM
        if (g_rand_uni()<(cfg_hare_adult_predation.value())) {
         ON_Dead();
         m_StepDone=true; // We need to skip the step code, we are dead
         return;
     }
 #endif
     m_CurrentHState=st_Dispersal();
     break;
    case tohs_Foraging:
    // Legal returns are:
    // tohs_ReproBehaviour
     m_CurrentHState=st_Foraging();
     break;
    case tohs_Resting:
     // Legal returns are:
     // tohs_Developing
     m_CurrentHState=st_Resting();
     break;
    case tohs_ReproBehaviour:
     // Legal returns are:
     // tohs_Resting (& possibly dying)
     m_CurrentHState=st_ReproBehaviour();
     break;
    case tohs_Developing:
     // Legal returns are:
     // tohs_Dying
     // tohs_Foraging
     // tohs_Dispersal
     m_CurrentHState=st_Developing();
     m_StepDone=true;
     break;
    case tohs_Dying:
     ON_Dead();
     m_StepDone=true;
     break;
    default:
    m_OurLandscape->Warn("Hare_Female::Step - unknown state",NULL);
     exit(1);
    }
 }

References cfg_hare_adult_predation(), g_rand_uni, THare::m_CurrentHState, TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, TALMaSSObject::m_StepDone, ON_Dead(), st_Developing(), st_Dispersal(), st_Foraging(), st_ReproBehaviour(), st_Resting(), tohs_Developing, tohs_Dispersal, tohs_Dying, tohs_Foraging, tohs_InitialState, tohs_ReproBehaviour, tohs_Resting, and Landscape::Warn().

◆ UpdateGestation()

void Hare_Female::UpdateGestation ( )

protected

Update gestation counter.

Counts down gestation and grows foetal mass.

Figures out how much energy to use on growing the kids and add this to the m_LeveretMaterial
Some assumptions:
1) Foetal growth is linear, with a max per day
2) If the female's fat reserves fall below the hunger threshold value
she does not use energy on the foetus
3) maximum X% of the free energy is used on foetus production - this is an input variable.

Definition at line 3626 of file Hare_all.cpp.

 {
     // Now are they ready to be born?
     if (--m_GestationCounter<1) {
         m_reproActivity=activity_givebirth;
     }
     // ALL the calcuations below are in g fat, this is just to save on unnecessary conversions
     // and divides later
     if (m_fatReserve>cfg_hare_adult_dispersal_threshold.value()) {
         double en=(m_fatReserve-cfg_hare_adult_dispersal_threshold.value())*cfg_hare_foetusenergyproportion.value();
         double fe=4*g_hare_maxFoetalKJ[m_GestationCounter];
         if (en>fe) en=fe;
         m_fatReserve-=en;
         m_LeveretMaterial+=en;
     }
 }

References activity_givebirth, cfg_hare_adult_dispersal_threshold(), cfg_hare_foetusenergyproportion(), g_hare_maxFoetalKJ, THare::m_fatReserve, m_GestationCounter, m_LeveretMaterial, and m_reproActivity.

Referenced by st_ReproBehaviour().

◆ UpdateOestrous()

void Hare_Female::UpdateOestrous ( )

protected

Update oestrous counter.

Updates Oestrous if it is the breeding season.

Optional disease and minimum reproductive weight code for POM.

Definition at line 3580 of file Hare_all.cpp.

 {
 #ifdef __DISEASEDDM
     if (m_IamSick) {
         return; // will loop each day until not sick
     }
 #endif
 #ifdef  __MINREPWEIGHT
     if (m_weight<cfg_hare_minimum_breeding_weight.value()) return; // No breeding below this weight
 #endif
  
     // No breeding outside the breeding season
     int today=m_OurLandscape->SupplyDayInYear();
     if ((today<cfg_ReproStartDay.value()) || (today>cfg_ReproEndDay.value()) )
     {
         m_OestrousCounter=0;
         m_litter_no=0;
         return;
     }
     if (++m_OestrousCounter>cfg_DaysToOestrous.value()) {
         // No breeding if in -ve energy balance
         if (cfg_hare_adult_breed_threshold.value()<=m_fatReserve) {
             m_reproActivity=activity_inoestrous;
             m_OestrousCounter=0;
       }
     }
 }

References activity_inoestrous, cfg_DaysToOestrous(), cfg_hare_adult_breed_threshold(), cfg_hare_minimum_breeding_weight(), cfg_ReproEndDay(), cfg_ReproStartDay(), THare::m_fatReserve, THare::m_IamSick, m_litter_no, m_OestrousCounter, TAnimal::m_OurLandscape, m_reproActivity, THare::m_weight, and Landscape::SupplyDayInYear().

Referenced by st_ReproBehaviour().

◆ UpdateYoung()

bool Hare_Female::UpdateYoung	(	THare *	a_old,
		THare *	a_new
	)

Swap a young list pointer.

This functions simply sorts through the m_Young vector and replaces the occurence of a_old with a_new. It is used to replace Hare_Infant pointers with Hare_Young pointers

Definition at line 3823 of file Hare_all.cpp.

 {
 vector<THare*>::iterator current = m_MyYoung.begin();
 while (current != m_MyYoung.end())
 {
   if (*current == a_old)
   {
     *current=a_new;
     return true;
   }
   current++;
 }
 return false;
 }

References m_MyYoung.

Referenced by THare_Population_Manager::CreateObjects().

Member Data Documentation

◆ m_GestationCounter

int Hare_Female::m_GestationCounter

protected

State variable - Days in gestation.

Definition at line 1054 of file Hare_all.h.

Referenced by GeneralEndocrineDisruptor(), Init(), Mating(), and UpdateGestation().

◆ m_LeveretMaterial

double Hare_Female::m_LeveretMaterial

protected

State variable - Mass of foetal material.

Definition at line 1056 of file Hare_all.h.

Referenced by GiveBirth(), Init(), Mating(), and UpdateGestation().

◆ m_litter_no

int Hare_Female::m_litter_no

protected

State variable - current litter number.

Definition at line 1047 of file Hare_all.h.

Referenced by GiveBirth(), Init(), and UpdateOestrous().

◆ m_MyYoung

TListOfHares Hare_Female::m_MyYoung

protected

Pointer to litter.

Definition at line 1060 of file Hare_all.h.

Referenced by AddYoung(), DoLactation(), ON_AreYouMyMum(), ON_Dead(), ON_RemoveYoung(), ON_YoungKilled(), SanityCheckYoungList(), st_Dispersal(), and UpdateYoung().

◆ m_NoYoung

int Hare_Female::m_NoYoung

protected

State variable - current litter size.

Definition at line 1045 of file Hare_all.h.

Referenced by AllYoungMatured(), ON_AreYouMyMum(), ON_RemoveYoung(), ON_YoungKilled(), and SanityCheckYoungList().

◆ m_OestrousCounter

int Hare_Female::m_OestrousCounter

protected

State variable - Days in oestrous.

Definition at line 1052 of file Hare_all.h.

Referenced by AllYoungKilled(), AllYoungMatured(), GiveBirth(), Init(), and UpdateOestrous().

◆ m_reproActivity

TTypeOfActivity Hare_Female::m_reproActivity

protected

State variable - current reproductive state.

Definition at line 1058 of file Hare_all.h.

Referenced by AllYoungKilled(), AllYoungMatured(), GiveBirth(), Init(), Mating(), st_Developing(), st_Dispersal(), st_Foraging(), st_ReproBehaviour(), UpdateGestation(), and UpdateOestrous().

◆ m_sterile

bool Hare_Female::m_sterile

protected

State variable - is/not sterile.

Definition at line 1049 of file Hare_all.h.

Referenced by Init(), and SetSterile().

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

C:/Repo/ALMaSS_all/Hare/Hare_all.h
C:/Repo/ALMaSS_all/Hare/Hare_all.cpp

Public Member Functions

Protected Member Functions

Protected Attributes

Additional Inherited Members

Detailed Description

Constructor & Destructor Documentation

◆ Hare_Female()

◆ ~Hare_Female()

Member Function Documentation

◆ AddYoung()

◆ AllYoungKilled()

◆ AllYoungMatured()

◆ BeginStep()

◆ DoLactation()

◆ dumpEnergy()

◆ EndStep()

◆ GeneralEndocrineDisruptor()

◆ GeneralOrganoPhosphate()

◆ GiveBirth()

◆ Init()

◆ InternalPesticideHandlingAndResponse()

◆ Mating()

◆ ON_AreYouMyMum()

◆ ON_Dead()

◆ ON_RemoveYoung()

◆ ON_YoungKilled()

◆ PlaceYoung()

◆ ReInit()

◆ SanityCheckYoungList()

◆ SetSterile()

◆ st_Developing()

◆ st_Dispersal()

◆ st_Foraging()

◆ st_ReproBehaviour()

◆ st_Resting()

◆ Step()

◆ UpdateGestation()

◆ UpdateOestrous()

◆ UpdateYoung()

Member Data Documentation

◆ m_GestationCounter

◆ m_LeveretMaterial

◆ m_litter_no

◆ m_MyYoung

◆ m_NoYoung

◆ m_OestrousCounter

◆ m_reproActivity

◆ m_sterile