Hare_Male Class Reference

Class for male hares. More...

#include <Hare_All.h>

Inheritance diagram for Hare_Male:

Public Member Functions
void	BeginStep (void) override
	BeginStep for Hare_Male. More...
void	Step (void) override
	Step for Hare_Male. More...
void	EndStep (void) override
	EndStep code for Hare_Male. More...
	Hare_Male (int p_x, int p_y, Landscape *p_L, THare_Population_Manager *p_PPM, double p_weight, int a_age, int a_Ref)
	Constructor. More...
void	ReInit (struct_Hare a_data)
	Male object reinitiation. More...
void	Init (double p_weight, int a_age, int a_Ref)
	Object initiation. More...
	~Hare_Male () override
	Destructor. More...
void	ON_Dead () override
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	ReInit (struct_Hare a_data)
	Juvenile object reinitiation. More...
void	Init (double p_weight)
	Object initiation. More...
	~Hare_Juvenile () override
	Destructor for the juvenile hare object. More...
Public Member Functions inherited from THare
	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...
	~THare () override
	Destructor. More...
double	GetWeight ()
double	GetTotalWeight ()
	Provide the wet weight of the hare. More...
int	GetAge ()
	Provide the age of the hare. More...
void	ON_MumDead (Hare_Female *a_Mum)
	Inform Mum that we are dead. More...
Hare_Female *	GetMum ()
	Get the mother pointer. More...
double	GetRMR ()
	Get todays RMR. More...
int	GetRefNum ()
	Get the refnum for this hare. More...
void	loadVegPalatability (void)
	Loads static member m_vegPalatability with data. More...
Public Member Functions inherited from TAnimal
	TAnimal (int x, int y, Landscape *L)
	The TAnimal constructor saving the x,y, location and the landscape pointer. More...
	TAnimal (int x, int y)
	The TAnimal constructor saving the x,y used if landscape is already set. More...
void	SetGuardMapIndex (int a_index_x, int a_index_y)
	Set the guard map index, this is used to avoid two animals operating in the same location when using multithread. More...
unsigned	SupplyFarmOwnerRef () const
	Get the current location farm ref if any. More...
AnimalPosition	SupplyPosition () const
	Returns the objects location and habitat type and veg type. More...
APoint	SupplyPoint () const
	Returns the objects location in ALMaSS coordinates. More...
int	SupplyPolygonRef () const
	Returns the polygon reference where the object is located. More...
TTypesOfLandscapeElement	SupplyPolygonType () const
	Returns the polygon type where the object is located. More...
int	Supply_m_Location_x () const
	Returns the ALMaSS x-coordinate. More...
int	Supply_m_Location_y () const
	Returns the ALMaSS y-coordinate. More...
int	SupplyGuardCellX () const
	Returns the x-index to the guard cell. More...
int	SupplyGuardCellY () const
	Returns the y-index to the guard cell. More...
int	SupplyAge () const
	Returns the animals age in days. More...
void	SetAge (int a_age)
	Sets the animals age in days. More...
virtual void	KillThis ()
	Sets all parameters ready for object destruction. More...
virtual void	CopyMyself ()
	Used to copy the object details to another in descendent classes. More...
void	SetX (const int a_x)
	Sets the x-coordinate. More...
void	SetY (const int a_y)
	Sets the y-coordinate. More...
virtual void	ReinitialiseObject (int a_x, int a_y, Landscape *a_l_ptr)
virtual void	ReinitialiseObject (int a_x, int a_y)
	Used to re-use an object - must be implemented in descendent classes. More...
virtual int	WhatState ()
	Returns the objects current state number. More...
virtual void	Dying ()
	A wrapped for KillThis - ideally should not be used. More...
void	CheckManagement ()
	Used to start a check for any management related effects at the objects current location. More...
void	CheckManagementXY (int a_x, int a_y)
	Used to start a check for any management related effects at x,y. More...
Public Member Functions inherited from TALMaSSObject
int	GetCurrentStateNo () const
	Returns the current state number. More...
void	SetCurrentStateNo (int a_num)
	Sets the current state number. More...
bool	GetStepDone () const
	Returns the step done indicator flag. More...
void	SetStepDone (bool a_bool)
	Sets the step done indicator flag. More...
void	ReinitialiseObjectBase ()
	Used to initialise an object. More...
	TALMaSSObject ()
	The constructor for TALMaSSObject. More...
virtual	~TALMaSSObject ()=default
	The destructor for TALMaSSObject. More...

Protected Member Functions
TTypeOfHareState	st_Developing () override
	Male Development. More...
TTypeOfHareState	st_Foraging ()
	Male Foraging. More...
void	InternalPesticideHandlingAndResponse () override
	Handles internal effects of pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
void	GeneralEndocrineDisruptor (double) override
	Handles internal effects of endocrine distrupter pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
void	GeneralOrganoPhosphate (double) override
	Handles internal effects of organophosphate pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
Protected Member Functions inherited from Hare_Juvenile
TTypeOfHareState	st_Dispersal () override
	Juvenile Dispersal. More...
TTypeOfHareState	st_Foraging ()
	Juvenile foraging. More...
void	st_NextStage ()
	Maturation to Hare_Male or Hare_Female. More...
TTypeOfHareState	st_Resting ()
	Juvenile Resting. More...
bool	ShouldMature ()
	Test for maturation. More...
bool	WasPredated () override
	Test for mortality. More...
Protected Member Functions inherited from THare
bool	Run (int a_dist, int a_direction)
	Run a distance in a direction. More...
void	EnergyBalance (TTypeOfActivity a_activity, int dist)
	Adjust energy balance for an activity. More...
void	TimeBudget (TTypeOfActivity a_activity, int dist)
	Adjust time budger for an activity. More...
void	st_Dying ()
	Tidy up before removing the object on death. More...
virtual void	Running (int a_max_dist)
	Run. More...
void	Walking (int a_dist, int a_direction)
	Walking. 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	GetPegDistance ()
	Get peg distance. More...
int	GetPegPull ()
	Get attractive force of peg. More...
int	GetPegDirection ()
	Get direction of peg. More...
void	MovePeg ()
	Move the peg according to attraction forces. More...
bool	OnFarmEvent (FarmToDo event) override
	Do we require a response to a farm event. More...
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Static Protected Member Functions
static TTypeOfHareState	st_Resting ()
	Male Resting. More...
static TTypeOfHareState	st_ReproBehaviour ()
	Currently Unused. More...

Additional Inherited Members
Static Public Member Functions inherited from THare
static void	SetMum (Hare_Female *)
	Set the mother pointer. Reimplemented in Hare_Infant. More...
Static Public Member Functions inherited from TAnimal
static void	SetSimulationWidth (int a_value)
	Sets the simulation width. More...
static void	SetSimulationHeight (int a_value)
	Sets the simulation height. More...
static void	SetDayInYear (int a_value)
	Sets the day in year attribute. More...
static void	SetOurLandscape (Landscape *a_value)
	Sets the landscape pointer. More...
static void	SetTempToday (double a_value)
	Sets the temperature today attribute. More...
Static Public Member Functions inherited from TALMaSSObject
static void	OnArrayBoundsError ()
	Used for debugging only, tests basic object properties. More...
Static Public Attributes inherited from THare
static double *	m_vegPalatability = nullptr
	Will hold and array of palatability for hare for each tov type. Most are 1, but unpalatable vegetation can be specified here. More...
Protected Attributes inherited from THare
TTypeOfHareState	m_CurrentHState
	Defines the current activity. More...
int	m_Age = 0
	State variale - hare age. More...
Hare_Object	m_Type
	State variale - the type of hare. More...
double	m_weight = 0.0
	State variale - hare weight g. More...
double	m_old_weight = 0.0
	State variale - last hare weight. More...
Hare_Female *	m_MyMum = nullptr
	Pointer to the hare's mum. More...
THare_Population_Manager *	m_OurPopulationManager
	Pointer to the hare population manager. More...
int	m_Lifespan = 0
	Physiolocal lifespan, assuming nothing else kills the hare (unlikely to reach this age) More...
int	m_ActivityTime = 0
	Minutes of potential activity time per day. More...
int	m_StarvationDays = 0
	State variable - the number of consecutive days in negative energy balance. More...
double	m_fatReserve = 0.0
	State variable - the energy reserve of the hare. More...
double	m_TodaysEnergy = 0.0
	State variable - the amount of energy available today, can be in deficit. More...
double	m_EnergyMax = 0.0
	State variable - the amount of energy it is possible to eat as a multiplyer or RMR. More...
double	m_KJRunning = 0.0
	KJ/m cost of running per kg hare. More...
double	m_KJWalking = 0.0
	KJ/m cost of walking per kg hare. More...
double	m_KJForaging = 0.0
	KJ/m cost of foraging per kg hare. More...
double	m_SpeedRunning = 0.0
	m/min speed of running per kg hare More...
double	m_SpeedWalking = 0.0
	m/min speed of walking per kg hare More...
double	m_foragingenergy = 0.0
	Energy obtained from foraging/feeding. More...
int	m_peg_x = 0
	peg x-coordinate More...
int	m_peg_y = 0
	peg y-coordinate More...
int	m_RefNum = 0
	Unique hare reference number, also functions as sex flag. More...
int	m_experiencedDensity = 0
	State variable used in alternative density-dependent configurations. More...
int	m_lastYearsDensity = 0
	State variable used in alternative density-dependent configurations. More...
int	m_ddindex = 0
	State variable used in alternative density-dependent configurations. More...
int	m_expDensity [365] = {}
	State variable used in alternative density-dependent configurations. More...
int	m_DensitySum = 0
	State variable used in alternative density-dependent configurations. More...
bool	m_IamSick = false
	flag for sickness - used in conjunction with disease configurations More...
double	m_pesticide_burden = 0.0
	State variable used to hold the current body-burden of pesticide. More...
double	m_pesticidedegradationrate = 0.0
	State variable used to hold the daily degredation rate of the pesticide in the body. More...
bool	m_pesticideInfluenced1 = false
	Flag to indicate pesticide effects (e.g. can be used for endocrine distruptors with delayed effects until birth). More...
Protected Attributes inherited from TAnimal
int	m_Location_x
	The objects ALMaSS x coordinate. More...
int	m_Location_y
	The objects ALMaSS y coordinate. More...
int	m_guard_cell_x
	The index x to the guard cell. More...
int	m_guard_cell_y
	The index y to the guard cell. More...
int	m_AgeDays {0}
	To hold the age in days. More...
PesticideToxicity	m_my_pesticide
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...
Static Protected Attributes inherited from TAnimal
static Landscape *	m_OurLandscape = nullptr
	A pointer to the landscape object shared with all TAnimal objects. More...
static int	m_SimulationWidth = 0
	A static member for the simulation width because it is often used by descendent classes. More...
static int	m_SimulationHeight = 0
	A static member for the simulation height because it is often used by descendent classes. More...
static double	m_TemperatureToday = 0.0
	A holder for the temperature today shared with all TAnimal objects. More...
static int	m_DayInYear = 0
	A holder for the day in year shared with all TAnimal objects. More...

Detailed Description

Class for male hares.

Constructor & Destructor Documentation

Hare_Male()

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

Constructor.

Hare_Male constructor.

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

References Init().

~Hare_Male()

Hare_Male::~Hare_Male ( )

override

Destructor.

Hare_Male destructor.

                      {
    // Nothing to do
}

Member Function Documentation

BeginStep()

void Hare_Male::BeginStep ( void  )

overridevirtual

BeginStep for Hare_Male.

Resets the day's activity counter and checks for default mortalities and potentially extra mortalities. Calculates energy usage for movement based on todays weight.
Also contains optional code designed to test for disease and size related death probabilities - part of the POM exercise
Unlike younger classes this method also tests for reaching the end of physiological lifespan

Reimplemented from Hare_Juvenile.

                          {
    m_ActivityTime = 1440; // Start the day
    m_KJWalking = m_OurPopulationManager->GetKJperM(static_cast<int>(m_weight));
    m_KJRunning = m_KJWalking * 2;
    m_KJForaging = m_KJWalking;
    m_foragingenergy = 0;
#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;
    }
#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;
        // Now assume that if there are 100 hares on average that there is 100% chance of getting sick
        if (random(cfg_HareFemaleSicknessDensityDepValue.value())<m_lastYearsDensity) {
            m_IamSick=true;
        }
        else m_IamSick=false;
    }
#endif
    if (g_rand_uni_fnc() < cfg_hare_proximity_alert.value()) { Running(cfg_hare_escape_dist.value()); }
 
#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_fnc(), 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(), CfgInt::value(), CfgFloat::value(), and Hare_Juvenile::WasPredated().

EndStep()

void Hare_Male::EndStep ( void  )

overridevirtual

EndStep code for Hare_Male.

In EndStep, the home-range centre peg gravitates a little way towards the daily activity area for today.

Reimplemented from Hare_Juvenile.

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

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

GeneralEndocrineDisruptor()

void Hare_Male::GeneralEndocrineDisruptor ( double  )

overrideprotectedvirtual

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

Reimplemented from THare.

                                                  {
}

Referenced by InternalPesticideHandlingAndResponse().

GeneralOrganoPhosphate()

void Hare_Male::GeneralOrganoPhosphate ( double  )

overrideprotectedvirtual

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

Reimplemented from THare.

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

References g_rand_uni_fnc(), l_pest_daily_mort, THare::m_CurrentHState, TALMaSSObject::m_StepDone, tohs_Dying, and CfgFloat::value().

Referenced by InternalPesticideHandlingAndResponse().

Init()

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

Object initiation.

                                                          {
    m_Type = hob_Male;
    m_fatReserve = p_weight * 0.04;
    m_weight = p_weight;
    m_Age = a_age;
    m_RefNum = a_Ref;
}

References hob_Male, THare::m_Age, THare::m_fatReserve, THare::m_RefNum, THare::m_Type, and THare::m_weight.

Referenced by Hare_Male(), and ReInit().

InternalPesticideHandlingAndResponse()

void Hare_Male::InternalPesticideHandlingAndResponse ( )

overrideprotectedvirtual

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.

                                                     {
    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, ttop_ReproductiveEffects, and CfgFloat::value().

Referenced by EndStep().

ON_Dead()

void Hare_Male::ON_Dead ( void  )

overridevirtual

Minimal housekeeping for dying for the male

Reimplemented from Hare_Juvenile.

                        {
    m_CurrentHState = tohs_Dying;
    m_CurrentStateNo = -1;
    m_StepDone = true;
}

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

Referenced by BeginStep(), and Step().

ReInit()

void Hare_Male::ReInit

(

struct_Hare

a_data

)

Male object reinitiation.

                                         {
    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.

st_Developing()

TTypeOfHareState Hare_Male::st_Developing ( )

overrideprotectedvirtual

Male Development.

Reimplemented from Hare_Juvenile.

                                          {
    //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 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;
    }
    m_fatReserve += m_TodaysEnergy * m_OurPopulationManager->GetGrowthEfficiencyF(366);
    // 366 is the fat conversion efficiency
    if (m_fatReserve < 0)
    {
        m_TodaysEnergy = m_fatReserve / m_OurPopulationManager->GetGrowthEfficiencyF(366);
        m_fatReserve = 0.0;
    }
    else m_TodaysEnergy = 0;
    //          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() - static_cast<int>((1.0 - cfg_fixadult_starve.value() / static_cast<
                double>(m_Age)) * diff);
        }
        else testval = cfg_adult_starve.value();
        if (++m_StarvationDays > cfg_adult_starvation_threshold.value())
        {
            if (g_random_fnc(10000) > testval) { return tohs_Dying; }
        }
#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 (g_random_fnc(3) == 0) return tohs_Dispersal; // We are hungry, we need to disperse
    return tohs_Foraging;
}

References activity_Resting, cfg_adult_starvation_threshold, cfg_adult_starve, cfg_AdultMaxFat, cfg_fixadult_starve, cfg_juv_starve, THare::EnergyBalance(), g_random_fnc(), 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, THare::m_StarvationDays, THare::m_TodaysEnergy, THare::m_weight, tohs_Dispersal, tohs_Dying, tohs_Foraging, CfgInt::value(), and CfgFloat::value().

Referenced by Step().

st_Foraging()

TTypeOfHareState Hare_Male::st_Foraging ( )

protected

Male Foraging.

Foraging code for the Hare_Male.

Foraging time is reduced dependent upon the density of hares in the local area. There are a number of options for calculting this effect used in the POM

                                        {
    double time = static_cast<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
    //double interference=(1-(hares*hares)*cfg_HareMaleDensityDepValue.value());
    //if (interference<0) interference=0;
#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 (g_rand_uni_fnc() > inter * 2) // added to reduce rate of dispersal
        {
            // m_ActivityTime = (int)(time / cfg_ForageRestingRatio.value()); removed because it is superfluous
            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 = static_cast<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 - but this is done in ForageSquare()
    TimeBudget(activity_Foraging, static_cast<int>(time) - a_time);
    // We need to rest
    return tohs_Resting;
}

References activity_Foraging, cfg_ForageRestingRatio, cfg_hare_pesticideresponse_on, THare::Forage(), THare::ForageP(), g_rand_uni_fnc(), 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, THare::m_TodaysEnergy, THare::TimeBudget(), tohs_Dispersal, tohs_Resting, CfgFloat::value(), and CfgBool::value().

Referenced by Step().

st_ReproBehaviour()

TTypeOfHareState Hare_Male::st_ReproBehaviour ( )

staticprotected

Currently Unused.

                                              {
    // TODO - this will need implementing if we have to simulate male reproduction (e.g. for genetic effects) or if we find we need this to alter survival in some way.
    return tohs_Resting;
}

References tohs_Resting.

Referenced by Step().

st_Resting()

TTypeOfHareState Hare_Male::st_Resting ( )

staticprotected

Male Resting.

This method uses up the rest of the day in resting

                                       {
    return tohs_Developing;
}

References tohs_Developing.

Referenced by Step().

Step()

void Hare_Male::Step ( void  )

overridevirtual

Step for Hare_Male.

Step controls all the state/transition behaviour for the male hare.
Has some optional code for dispersal related mortality for use in POM testing.

Reimplemented from Hare_Juvenile.

                     {
    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_MResting
        // tohs_MReproBehaviour
        // 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_MDispersal
        // tohs_MResting
        // tohs_MReproBehaviour
        m_CurrentHState = st_Foraging();
        break;
    case tohs_Resting:
        // Legal returns are:
        // tohs_MDeveloping
        m_CurrentHState = st_Resting();
        break;
    case tohs_ReproBehaviour:
        // Legal returns are:
        // tohs_MResting
        // tohs_MDeveloping
        m_CurrentHState = st_ReproBehaviour();
        break;
    case tohs_Developing:
        // Legal returns are:
        // tohs_Dying
        // tohs_MForaging
        m_CurrentHState = st_Developing();
        m_StepDone = true;
        break;
    case tohs_Dying:
        ON_Dead();
        m_StepDone = true;
        break;
    default:
        m_OurLandscape->Warn("Hare_Male::Step - unknown state", nullptr);
        exit(1);
    }
}

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

---

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

• /builds/ALMaSS/ALMaSS_MIDox/Hare/Hare_All.h
• /builds/ALMaSS/ALMaSS_MIDox/Hare/Hare_All.cpp