Hare_Juvenile Class Reference

Class for juvenile hares (after 5 weeks old, fully mobile) More...

#include <Hare_all.h>

Public Member Functions
virtual void	BeginStep (void)
	BeginStep for Hare_Juvenile. More...
virtual void	EndStep (void)
	BeginStep for Hare_Juvenile. More...
	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...
virtual void	ON_Dead ()
void	ReInit (struct_Hare a_data)
	Juvenile object reinitiation. More...
virtual void	Step (void)
	Step for Hare_Juvenile. 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
bool	ShouldMature ()
	Test for maturation. More...
TTypeOfHareState	st_Developing ()
	The development code for Hare_Juvenile. More...
TTypeOfHareState	st_Dispersal ()
	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...
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...
virtual void	GeneralEndocrineDisruptor (double)
	Handles internal effects of endocrine distrupter pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
virtual void	GeneralOrganoPhosphate (double)
	Handles internal effects of organophosphate pesticide exposure. If any effects are needed this method must be re-implemented by descendent classes. More...
int	GetPegDirection ()
	Get direction of peg. More...
int	GetPegDistance ()
	Get peg distance. More...
int	GetPegPull ()
	Get attractive force of peg. 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	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...

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

Detailed Description

Class for juvenile hares (after 5 weeks old, fully mobile)

Definition at line 924 of file Hare_all.h.

Constructor & Destructor Documentation

Hare_Juvenile()

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.

Definition at line 2219 of file Hare_all.cpp.

                                          : THare(p_x,p_y,p_L,p_PPM)
{
    Init(p_weight);
}

References Init().

~Hare_Juvenile()

Hare_Juvenile::~Hare_Juvenile ( )

virtual

Destructor for the juvenile hare object.

Definition at line 2247 of file Hare_all.cpp.

{
    //Nothing to do
}

Member Function Documentation

BeginStep()

void Hare_Juvenile::BeginStep ( void  )

virtual

BeginStep for Hare_Juvenile.

Resets the day's activity counter and checks for default mortalities and potentially extra mortalities. Calculates energy usage for movement based on todays weight

Reimplemented from THare.

Reimplemented in Hare_Female, and Hare_Male.

Definition at line 2261 of file Hare_all.cpp.

{
  if (m_CurrentStateNo == -1) return;
  m_ActivityTime=1440; // Start the day
  m_old_weight=m_weight-1; // we are not interested in tiny fluctuations
  m_KJWalking=m_OurPopulationManager->GetKJperM((int)m_weight);
  m_KJRunning=m_KJWalking*2;
  m_KJForaging=m_KJWalking;
 
#ifdef __DDEPMORT
    int dens=m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y);
#ifdef __THRESHOLD_DD
  if (dens<m_OurPopulationManager->m_HareThresholdDD) dens=0;
  else dens-=m_OurPopulationManager->m_HareThresholdDD;
#endif
    double inter=m_OurPopulationManager->GetInterference(dens);
    if (g_rand_uni() > inter) {
            ON_Dead();
            m_StepDone=true; // We need to skip the step code, we are dead
            return;
    }
#endif
 
    if (g_rand_uni()<m_OurPopulationManager->m_JuvMortRate) {
    ON_Dead();
    m_StepDone=true; // We need to skip the step code, we are dead
    return;
  }
 
  if (g_rand_uni()<cfg_hare_proximity_alert.value()) {
    Running(cfg_hare_escape_dist.value());
  }
#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_proximity_alert(), cfg_MaxEnergyIntakeScaler(), TAnimal::CheckManagement(), g_rand_uni, THare_Population_Manager::GetInterference(), THare_Population_Manager::GetKJperM(), THare::GetRMR(), THare_Population_Manager::GetTotalDensity(), THare::m_ActivityTime, TALMaSSObject::m_CurrentStateNo, THare::m_ddindex, THare::m_DensitySum, THare::m_EnergyMax, THare::m_expDensity, THare_Population_Manager::m_HareThresholdDD, THare_Population_Manager::m_JuvMortRate, THare::m_KJForaging, THare::m_KJRunning, THare::m_KJWalking, THare::m_lastYearsDensity, TAnimal::m_Location_x, TAnimal::m_Location_y, THare::m_old_weight, THare::m_OurPopulationManager, TALMaSSObject::m_StepDone, THare::m_weight, ON_Dead(), and THare::Running().

EndStep()

void Hare_Juvenile::EndStep ( void  )

virtual

BeginStep for Hare_Juvenile.

Just moves the homerange centre peg closer to where the hare has been active today

Reimplemented from THare.

Reimplemented in Hare_Female, and Hare_Male.

Definition at line 2379 of file Hare_all.cpp.

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

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

Init()

void Hare_Juvenile::Init

(

double

p_weight

)

Object initiation.

Definition at line 2236 of file Hare_all.cpp.

{
    m_Type = hob_Juvenile;
    m_weight = p_weight;
    m_Age = 35; // By definition we are 35 days old today
}

References hob_Juvenile, THare::m_Age, THare::m_Type, and THare::m_weight.

Referenced by Hare_Juvenile(), and ReInit().

ON_Dead()

void Hare_Juvenile::ON_Dead ( void  )

virtual

Do the housekeeping necessary for removal of the object - in this case minimal.

Reimplemented from THare.

Reimplemented in Hare_Female, and Hare_Male.

Definition at line 2654 of file Hare_all.cpp.

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

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

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

ReInit()

void Hare_Juvenile::ReInit

(

struct_Hare

a_data

)

Juvenile object reinitiation.

Definition at line 2225 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);
}

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

Referenced by THare_Population_Manager::CreateObjects().

ShouldMature()

bool Hare_Juvenile::ShouldMature ( )

protected

Test for maturation.

This method will be used to determine whether the hare becomes sexually active - and therefore needs to become an adult hare.

Definition at line 2630 of file Hare_all.cpp.

{
   if (++m_Age<180) return false;
   // Do not do it below six months
   // If 6mths old and it is before October, then can mature
   if (m_OurLandscape->SupplyDayInYear() < 270) return true;
   if (m_Age>364) return true;
   return true;
}

References THare::m_Age, TAnimal::m_OurLandscape, and Landscape::SupplyDayInYear().

Referenced by st_Developing().

st_Developing()

TTypeOfHareState Hare_Juvenile::st_Developing ( )

protected

The development code for Hare_Juvenile.

Tests for the onset of maturation. Also tests for minimum growth attainment if this is switched on - too low growth results in death.

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.

Definition at line 2522 of file Hare_all.cpp.

{
    // Test for the onset of reproductive activity
    // This should be done now because otherwise it is possible to skip this test and get too old
    if (ShouldMature()) {
        return tohs_NextStage;
    }
#ifdef __MINGROWTHATTAIN
        // Take a check on our growth - if we are below X% of the min repro weight, assume we died
        //if (m_weight < (cfg_hare_minimum_breeding_weight.value()*cfg_min_growth_attain.value())) return tohs_Dying;
        if (m_weight< m_OurPopulationManager->m_DMWeight[m_Age]) {
            return tohs_Dying;
        }
#endif
 
    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;
 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;
    }
    else {
            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;
            // What should the criteria for a starvation day be? Here chosen to be any negative energy balance.
            // Have also considered and rejected a proportion of rmr:
            //double rmr=m_OurPopulationManager->GetRMR(m_Age, GetTotalWeight());
//          if (m_TodaysEnergy<(0.0-(rmr*0.25)))
            if (m_TodaysEnergy<0.0)
            {
#ifndef __NOJUVSTARVE
                // Oh oh, we are starving need to lose body weight and maybe we will die?
#ifdef __ADULT_WT_STARVE_CHANCE
                if (++m_StarvationDays > cfg_juvenile_starvation_threshold.value()) {
                    if ((g_rand_uni() * 10000) > (cfg_juv_starve.value()))
                    {
                        return tohs_Dying;
                    }
                }
#else
                if (++m_StarvationDays > cfg_juvenile_starvation_threshold.value()) {
                    return tohs_Dying;
                }
#endif
#endif
            }
            else {
                m_StarvationDays--; // Not starving
                if (m_StarvationDays<0) m_StarvationDays=0;
                m_TodaysEnergy=0;
            }
    }
    return tohs_Foraging;
 
}

References cfg_AdultMaxFat(), cfg_juv_starve(), cfg_juvenile_starvation_threshold(), g_rand_uni, 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, ShouldMature(), tohs_Dying, tohs_Foraging, and tohs_NextStage.

Referenced by Step().

st_Dispersal()

TTypeOfHareState Hare_Juvenile::st_Dispersal ( )

protectedvirtual

Juvenile Dispersal.

Makes a test of habitat quality (basically food) in 8 directions, then moves to the best one. This is basically a teleport move, so testing for barriers is not done. This will need to be added if it becomes a problem (e.g. hares appearing on islands they could not otherwise get too), however, this will also confer an extreme performance penalty!

Reimplemented from THare.

Reimplemented in Hare_Female.

Definition at line 2449 of file Hare_all.cpp.

{
#ifdef __DISPMORTALITY
  if (WasPredated()) return tohs_Dying;
#endif
  // Now to make this a little more clever we need to test all 8 directions
  int ttx, tty;
  int tx=m_Location_x;
  int ty=m_Location_y;
  ttx=tx;
  tty=ty;
  double fv=0.0;
  double oldfv = -99999999.0;
  int dstart=random(8);
  int d2=0;
  for (int j=0; j<100; j++) {
      int dist=100+random(cfg_hare_max_dispersal.value()); 
      for (int d=dstart; d<8+dstart; d++) {
        // We need to avoid a bias movement now too
        int d1=d & 7; // 0-7
        Walking(dist, d1); // This modifies m_Location_x, m_Location_y
        // How much food here?
        int polyref=m_OurLandscape->SupplyPolyRef(m_Location_x,m_Location_y);
        fv = m_OurLandscape->GetHareFoodQuality(polyref) * m_vegPalatability[m_OurLandscape->SupplyVegType(polyref)] * m_OurPopulationManager->GetInterference((m_OurPopulationManager->GetAdultDensity(m_Location_x, m_Location_y)));
        if (oldfv<=fv) {
            oldfv=fv;
            ttx=m_Location_x;
            tty=m_Location_y;
            d2=dist;
            // The best we can ever get is 0.8 so we can speed things up by dropping out if we are close to this.
            if (fv>=0.75) {
                j=101;
                break;
            }
        }
        // Set the xy back before trying the next direction
        m_Location_x=tx;
        m_Location_y=ty;
      }
  }
  // Now do it for real
  // We need to update the density maps temporarily to stop all the animals responding to old data until the beginning of the next timestep
  m_OurPopulationManager->SubtractHareDensity(m_Location_x, m_Location_y, m_Type);
  m_Location_x = ttx;
  m_Location_y = tty;
  m_OurPopulationManager->AddHareDensity(m_Location_x, m_Location_y, m_Type);
  d2 *= 5; // Lets assume it is not a beeline, and 5x distance is needed to find the place.
  EnergyBalance(activity_Dispersal, d2);
  TimeBudget(activity_Dispersal,d2 );
  // Move the peg with us.
  //m_peg_x = m_Location_x; /** Testing whether the peg will be dragged anyway if we don't set this 31/7/2014 */
  //m_peg_y = m_Location_y;
  return tohs_Foraging;
}

References activity_Dispersal, THare_Population_Manager::AddHareDensity(), cfg_hare_max_dispersal(), THare::EnergyBalance(), THare_Population_Manager::GetAdultDensity(), Landscape::GetHareFoodQuality(), THare_Population_Manager::GetInterference(), TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, THare::m_OurPopulationManager, THare::m_Type, THare::m_vegPalatability, THare_Population_Manager::SubtractHareDensity(), Landscape::SupplyPolyRef(), Landscape::SupplyVegType(), THare::TimeBudget(), tohs_Dying, tohs_Foraging, THare::Walking(), and WasPredated().

Referenced by Hare_Female::st_Dispersal(), Step(), and Hare_Male::Step().

st_Foraging()

TTypeOfHareState Hare_Juvenile::st_Foraging ( )

protected

Juvenile foraging.

Given the time we have then we need to feed, which will return an energy value obtained.

Definition at line 2385 of file Hare_all.cpp.

{
  double atime= m_ActivityTime*cfg_ForageRestingRatio.value();
  // We need to rest if there is no more time
  if (atime < 30) return tohs_Resting;
  // This version uses adult density for interference, other densities seem not to work so well
  //int hares=(m_OurPopulationManager->GetAdultDensity(m_Location_x, m_Location_y));
  //int hares=(m_OurPopulationManager->GetTotalDensity(m_Location_x, m_Location_y));
  int hares = 1;
#ifdef __THRESHOLD_AD_DD
  if (hares<m_OurPopulationManager->m_HareThresholdDD) {
      hares=0;
  } else {
      hares-=m_OurPopulationManager->m_HareThresholdDD;
  }
#endif
#ifdef __THRESHOLD_DDJ
// this section has been altered so many times it was not worth making it general - if it is used in release versions this can be implemented when we know how it should look - right now remember to change in code before compile-
  if (hares<6) hares=0;
    else hares*=hares;
#endif
 
#ifdef __SCALINGYOUNGDDM
  hares = (int) floor (0.5+(double)hares*cfg_JuvDDScale.value());
#endif
 
  //interfer is between 1.0 and 0
  //double slope = 1.0+(cfg_AgeRelatedInterferenceScaling.value() *  (1.0-(double(m_Age/365.0))));
  //double hs=hares*slope;
#ifndef __DDEPMORT
  double inter = m_OurPopulationManager->GetInterference((int)(hares));
#else
  double inter=1.0;
#endif
  if ((inter<0.5) && (atime > 300)){
      if (g_rand_uni() > inter) // added to reduce rate of dispersal
      {
          //m_ActivityTime = (int)(atime / cfg_ForageRestingRatio.value());
          return tohs_Dispersal; // Added Sat 15th Dec 2007
      }
  }
  atime*= inter;
  int a_time = (int) atime;
  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
  //
  TimeBudget(activity_Foraging, (int)atime-a_time);
  return tohs_Resting;
}

References activity_Foraging, cfg_ForageRestingRatio(), cfg_hare_pesticideresponse_on(), cfg_JuvDDScale(), THare::Forage(), THare::ForageP(), g_rand_uni, THare_Population_Manager::GetInterference(), THare::m_ActivityTime, THare_Population_Manager::m_HareThresholdDD, THare::m_OurPopulationManager, THare::m_TodaysEnergy, THare::TimeBudget(), tohs_Dispersal, and tohs_Resting.

Referenced by Step().

st_NextStage()

void Hare_Juvenile::st_NextStage ( )

protected

Maturation to Hare_Male or Hare_Female.

This creates a Hare_Juvenile object via a call to create objects, then sets the flag for destruction of this object.

Definition at line 2607 of file Hare_all.cpp.

{
  struct_Hare* sp;
  sp = new struct_Hare;
  sp->HM = m_OurPopulationManager;
  sp->L = m_OurLandscape;
  sp->x = m_Location_x;
  sp->y = m_Location_y;
  sp->weight = m_weight;
  sp->Mum = NULL;
  sp->age = m_Age;
  sp->RefNum = m_RefNum;
  // Sex ratio is set to be 50:50 at birth
  if ((m_RefNum & 0x01) == 0)  // Male
                       m_OurPopulationManager->CreateObjects(3,this,NULL,sp,1);
  else m_OurPopulationManager->CreateObjects(4,this,NULL,sp,1);
  // Clean-up
  m_CurrentStateNo=-1;  // Destroys the object at the next opportunity
  m_CurrentHState=tohs_DestroyObject;
  delete sp;
}

References struct_Hare::age, THare_Population_Manager::CreateObjects(), struct_Hare::HM, struct_Hare::L, THare::m_Age, THare::m_CurrentHState, TALMaSSObject::m_CurrentStateNo, TAnimal::m_Location_x, TAnimal::m_Location_y, TAnimal::m_OurLandscape, THare::m_OurPopulationManager, THare::m_RefNum, THare::m_weight, struct_Hare::Mum, struct_Hare::RefNum, tohs_DestroyObject, struct_Hare::weight, struct_Hare::x, and struct_Hare::y.

Referenced by Step().

st_Resting()

TTypeOfHareState Hare_Juvenile::st_Resting ( )

protected

Juvenile Resting.

The hare spends some time resting (using time and a little energy)

Definition at line 2507 of file Hare_all.cpp.

{
  EnergyBalance(activity_Resting, 0); // Just removes a days BMR
  TimeBudget(activity_Resting, m_ActivityTime);
  return tohs_Developing;
}

References activity_Resting, THare::EnergyBalance(), THare::m_ActivityTime, THare::TimeBudget(), and tohs_Developing.

Referenced by Step().

Step()

void Hare_Juvenile::Step ( void  )

virtual

Step for Hare_Juvenile.

As with all other ALMaSS animal objects, Step is where the primary state/transtion work is done

Reimplemented from THare.

Reimplemented in Hare_Female, and Hare_Male.

Definition at line 2316 of file Hare_all.cpp.

{
  if (m_StepDone || m_CurrentStateNo == -1) return;
  switch (m_CurrentHState)
  {
   case tohs_InitialState: // Initial state
    m_CurrentHState=tohs_Dispersal;
    break;
    case tohs_Dispersal:
   // Dispersal is risky therefore take a test again
     // Legal returns are:
     // tohs_Foraging
#ifdef __DISPERSALDDM
    if (g_rand_uni()<(cfg_hare_juvenile_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_JResting
     m_CurrentHState=st_Foraging();
     break;
    case tohs_Resting:
     // Legal returns are:
     // tohs_Developing
     m_CurrentHState=st_Resting();
     break;
    case tohs_Developing:
     // Legal returns are:
     // tohs_Dispersal
     // tohs_NextStage
     // tohs_Resting
     m_CurrentHState=st_Developing();
     if (m_CurrentHState==tohs_Foraging) m_StepDone=true;
     break;
    case tohs_NextStage:
     // Legal returns are:
     // NONE
     st_NextStage();
     m_StepDone=true;
     break;
   case tohs_Dying:
     ON_Dead();
     m_StepDone=true;
     break;
   default:
    m_OurLandscape->Warn("Hare_Juvenile::Step - unknown state",NULL);
    exit(1);
   }
}

References cfg_hare_juvenile_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_NextStage(), st_Resting(), tohs_Developing, tohs_Dispersal, tohs_Dying, tohs_Foraging, tohs_InitialState, tohs_NextStage, tohs_Resting, and Landscape::Warn().

WasPredated()

bool Hare_Juvenile::WasPredated ( )

protectedvirtual

Test for mortality.

Reimplemented from THare.

Definition at line 2645 of file Hare_all.cpp.

                                {
        if (g_rand_uni()<m_OurPopulationManager->m_JuvMortRate) return true;
        return false;
}

References g_rand_uni, THare_Population_Manager::m_JuvMortRate, and THare::m_OurPopulationManager.

Referenced by Hare_Male::BeginStep(), Hare_Female::BeginStep(), and st_Dispersal().

---

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