Vole_Male Class Reference

The class for male voles. More...

#include <vole_all.h>

Inheritance diagram for Vole_Male:

Public Member Functions
	Vole_Male (struct_Vole_Adult *p_aVoleStruct)
	Vole_Male constructor. More...
void	ReInit (struct_Vole_Adult *p_aVoleStruct) override
	~Vole_Male () override
void	Step () override
	Male vole Step. More...
void	EndStep () override
	Male vole EndStep. More...
Public Member Functions inherited from Vole_JuvenileMale
	Vole_JuvenileMale (struct_Vole_Adult *p_aVoleStruct)
	Vole_JuvenileMale constructor. More...
	~Vole_JuvenileMale () override
bool	OnFarmEvent (FarmToDo event) override
	JuvenileMale vole exernal event handler. More...
void	BeginStep () override
	Juvenile Male vole BeginStep. More...
void	OnKilled () override
	JuvenileMale vole death by external entity. More...
Public Member Functions inherited from Vole_Base
	Vole_Base (struct_Vole_Adult *a_AVoleStruct_ptr)
	Constructor for Vole_Base. More...
	~Vole_Base () override
virtual void	Init (struct_Vole_Adult *a_AVoleStruct_ptr)
void	st_Dying ()
	All voles end here on death. More...
void	SetBreedingSeason (bool a_flag)
	Set Breeding Season flag. More...
void	SetWeight (double W)
void	Setm_Mature ()
void	Set_BirthYear (int BirthYear)
void	Set_MotherId (unsigned MotherIdNo)
void	Set_FatherId (unsigned FatherIdNo)
void	Set_NoYoungTot (int a_NoOfYoung)
void	Set_XBorn (int a_Location_x)
void	Set_YBorn (int a_Location_y)
void	Set_ElemBorn (int a_Location_x, int a_Location_y)
void	Set_VegBorn (int a_Location_x, int a_Location_y)
void	Set_PolyRefBorn (int a_Location_x, int a_Location_y)
void	Set_Age (int Age)
int	WhatState () override
bool	SupplyBornLastYear ()
	Were we born this year? More...
bool	SupplyTerritorial ()
int	SupplyFatherId ()
int	SupplyMotherId ()
bool	SupplySex ()
int	SupplyBirthYear ()
int	SupplyTotNoYoung ()
int	SupplyXBorn ()
int	SupplyYBorn ()
int	SupplyPolyRefBorn ()
int	SupplyElemBorn ()
TTypesOfLandscapeElement	SupplyElemType ()
int	SupplyVegBorn ()
int	SupplyTerrRange ()
double	SupplyWeight ()
int	SupplyIDNo ()
bool	SupplyMature ()
int	SupplyDeathCause ()
unsigned	SupplyAge ()
unsigned	SupplyX ()
unsigned	SupplyY ()
bool	SupplyInTrap ()
InTrapPosition	SupplyTrapPosition ()
void	SetFree ()
int	SupplyHomoZyg ()
int	SupplyHeteroZyg ()
int	SupplyAllele (int locus, int allele)
uint32	SupplyMyAllele (int i, int j)
int	GetGeneticFlag ()
int	GetDirectFlag ()
void	SetGeneticFlag ()
void	SetDirectFlag ()
void	UnsetGeneticFlag ()
void	UnsetDirectFlag ()
GeneticMaterial	SupplyGenes ()
void	CopyMyself (VoleObject a_vole)
	Duplicates a vole. More...
void	SetFertile (bool f)
	Set the male vole fertility. More...
bool	GetFertile ()
	Get the male vole fertility. 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 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
VoleDispersalReturns	Dispersal (double p_OldQual, int p_Distance)
	Male vole dispersal behaviour. More...
void	DetermineTerritorySize ()
	Calculates the territory size needed for a vole of his weight. More...
bool	CanFeed () const
	Currently not used. More...
int	st_Maturation (void) const
	Male vole maturation control. More...
void	st_Infanticide (void) const
	Male vole infanticide behaviour. More...
bool	MortalityTest () override
	Do a mortality test. More...
TTypeOfVoleState	st_Eval_n_Explore (void)
	Male vole main territory assessment behaviour. More...
Protected Member Functions inherited from Vole_JuvenileMale
void	SetLocation () override
	Map location function. More...
void	FreeLocation () override
	Map location function. More...
bool	GetLocation (int px, int py) override
	Map location function. More...
TTypeOfVoleState	Dispersal (double p_OldQual, int p_Distance)
	JuvenileMale vole dispersal behaviour. More...
void	DetermineTerritorySize ()
bool	CanFeed ()
void	st_JuvenileExplore (void)
	Extra movement on weaning. More...
void	st_BecomeSubAdult (void)
TTypeOfVoleState	st_Eval_n_Explore (void)
	JuvenileMale vole main territory assessment behaviour. More...
Protected Member Functions inherited from Vole_Base
virtual void	RodenticideIngestion (void)
double	CalculateCarryingCapacity (int x, int y, int a_ddep) const
int	MoveQuality (int p_x, int p_y) const
	Test a location for quality while moving. More...
void	MoveTo (int p_Vector, int p_Distance, int iterations)
	Movement. More...
void	DoWalking (int p_Distance, int &p_Vector, int &vx, int &vy) const
	Walking. More...
void	DoWalkingCorrect (int p_Distance, int &p_Vector, int &vx, int &vy) const
	Walking where there is a danger of stepping off the world. More...
void	Escape (int p_Vector, int p_Distance)
	Dispersal - directed movement. More...
void	CheckTraps ()
Protected Member Functions inherited from TAnimal
void	CorrectWrapRound ()
	Corrects wrap around co-ordinate problems. More...

Additional Inherited Members
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...
Public Attributes inherited from Vole_Base
TTypeOfVoleState	CurrentVState
Vole_Population_Manager *	m_OurPopulation
Protected Attributes inherited from Vole_Base
int	m_BirthYear
bool	m_BornLastYear
	A flag set if the female was born the year before. More...
unsigned int	m_MinTerrRange
unsigned	m_MotherId
unsigned	m_FatherId
int	m_Death
int	m_TerrRange
bool	m_Sex
bool	m_Mature
int	m_Age
int	m_XBorn
int	m_YBorn
int	m_PolyRefBorn
int	m_ElemBorn
int	m_VegBorn
int	m_LifeSpan
double	m_Weight
bool	m_fertile
	Flag indicating the fertility state (true means fertile) More...
int	m_NoOfYoungTotal
int	m_DispVector
bool	m_Have_Territory
int	m_Reserves
unsigned	IDNo
int	m_SimH
int	m_SimW
GeneticMaterial	m_MyGenes
InTrapPosition	m_intrappos
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 Vole_Base
static unsigned int	m_MaxMaleTerritorySize = 0
static unsigned int	m_MaxFemaleTerritorySize = 0
static unsigned int	m_MinMaleTerritorySize = 0
static unsigned int	m_MinFemaleTerritorySize = 0
static double	m_MinFVoleHabQual = 0
static double	m_MinJMVoleHabQual = 0
static double	m_MinMVoleHabQual = 0
static double	m_MaleTerritoryRangeSlope = 0
static double	m_FemaleTerritoryRangeSlope = 0
static double	m_FHabQualThreshold3
static double	m_FHabQualThreshold2
static double	m_FHabQualThreshold1
static double	m_MHabQualThreshold3
static double	m_MHabQualThreshold2
static double	m_MHabQualThreshold1
static bool	m_BreedingSeason = false
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

The class for male voles.

Contains all the behaviour specific to the male vole. Only st_Infanticide and st_JuvenileExplore are specific to the male, other behaviours differ only in details from the female.

Constructor & Destructor Documentation

Vole_Male()

Vole_Male::Vole_Male

(

struct_Vole_Adult *

p_aVoleStruct

)

Vole_Male constructor.

• just calls Init()

                                                     : Vole_JuvenileMale(p_aVoleStruct) {
    m_Age = p_aVoleStruct->age;
    m_Weight = p_aVoleStruct->weight;
    m_BirthYear = p_aVoleStruct->BirthYear;
    m_Sex = true;
    m_TerrRange = m_MinMaleTerritorySize;
    m_MinTerrRange = m_MinMaleTerritorySize;
}

References struct_Vole_Adult::age, struct_Vole_Adult::BirthYear, Vole_Base::m_Age, Vole_Base::m_BirthYear, Vole_Base::m_MinMaleTerritorySize, Vole_Base::m_MinTerrRange, Vole_Base::m_Sex, Vole_Base::m_TerrRange, Vole_Base::m_Weight, and struct_Vole_Adult::weight.

~Vole_Male()

Vole_Male::~Vole_Male ( )

override

                      {
    // Nothing to do
}

Member Function Documentation

CanFeed()

bool Vole_Male::CanFeed ( ) const

inlineprotected

Currently not used.

Check whether our location is of sufficient quality to allow use to feed, ie. is it over or under min suitable quality (m_MinMVoleHabQual).

                                     {
    if (CalculateCarryingCapacity(m_Location_x, m_Location_y, cfg_VoleDDepConst.value()) >= m_MinMVoleHabQual) return true;
    return false;
}

References Vole_Base::CalculateCarryingCapacity(), cfg_VoleDDepConst, TAnimal::m_Location_x, TAnimal::m_Location_y, Vole_Base::m_MinMVoleHabQual, and CfgInt::value().

DetermineTerritorySize()

void Vole_Male::DetermineTerritorySize ( )

inlineprotected

Calculates the territory size needed for a vole of his weight.

                                              {
    if (m_Weight < MinReproWeightM) return;
    m_TerrRange = static_cast<int>(m_MinMaleTerritorySize + m_MaleTerritoryRangeSlope * (m_Weight - MinReproWeightM));
}

References Vole_Base::m_MaleTerritoryRangeSlope, Vole_Base::m_MinMaleTerritorySize, Vole_Base::m_TerrRange, Vole_Base::m_Weight, and MinReproWeightM.

Referenced by EndStep().

Dispersal()

VoleDispersalReturns Vole_Male::Dispersal ( double  p_OldQual, int  p_Distance  )

protected

Male vole dispersal behaviour.

Works like female dispersal - but a return code of 3 will trigger infanticide
Checks p_Distance away to see if it can find a territory in the next MHabQualThreshold category or with
an improved quality of 1.1* p_OldQual if already in optimal habitat
This entails some risk though, so there is a fixed increase in the mortality chance when it does this.

                                                                          {
    // int retval = 0;
    // p_OldQuatells whether dispersal is conditional on quality or not
    // p_OldQual is set to old habitat quality or -1
    // p_Distance is the p_Distance used by the move function
    // aim is to move in a directed way traversing the landscape using the best
    // habitats
    // remember the old co-ordinates in case infanticide needs to be triggered
    const int oldx = m_Location_x;
    const int oldy = m_Location_y;
#ifdef __VOLE_SMALL_LANDSCAPE
    m_DispVector = g_random_fnc(8); // Choose direction 0-7
#else
    if (m_DispVector == -1) m_DispVector = random(8); // Choose direction 0-7
#endif
    // Go that far in that direction (assuming it is possible to do that)
    MoveTo(m_DispVector, p_Distance, 10);
    //  Now we are there so what is the new quality
    // 1. Get the carrying capacity
    int OldMales = 1;
    int NoFemales = 1;
    if (m_BreedingSeason)
    {
        OldMales = m_OurPopulation->SupplyInOlderTerr(m_Location_x, m_Location_y, m_Age, m_TerrRange);
        NoFemales = OldMales; // If can be 0 or >0 if OldMales does not return 1
    }
    const double CC = CalculateCarryingCapacity(m_Location_x, m_Location_y, cfg_VoleDDepConst.value());
    if (p_OldQual == -1)
    {
        // Do an extra mortality test if we are forced to disperse
        if (g_rand_uni_fnc() < g_extradispmort)
        {
            if (cfg_RecordVoleMort.value()) m_OurPopulation->m_VoleRecordMort->ChangeData(tovmort_MDisp, 1);
            return vdisp_Die;
        }
    }
 
    if (CC < p_OldQual || OldMales < 1 || NoFemales < 1)
    {
        // Don't want to move
        FreeLocation();
        m_Location_x = oldx;
        m_Location_y = oldy;
        m_OurPopulation->UpdateGuardMap(m_Location_x, m_Location_y, m_guard_cell_x, m_guard_cell_y);
        SetLocation();
        return vdisp_CarryOn;
    }
    if (CC > m_MinMVoleHabQual)
    {
        m_Have_Territory = true;
        if (m_BreedingSeason)
        {
            if (!m_Mature)
            {
                return vdisp_Mature; // Will also trigger infanticde
            }
            if (abs(oldx - m_Location_x) > 2 * m_TerrRange || abs(oldy - m_Location_y) > 2 * m_TerrRange)
            {
                // Have we moved more than _TerrRange from old home
                return vdisp_Infanticide; // This will result in an infanticide attempt if females in the new territory have young and the male has moved outside his old terr range.
            }
        }
    }
    return vdisp_CarryOn;
}

References Vole_Base::CalculateCarryingCapacity(), cfg_RecordVoleMort, cfg_VoleDDepConst, VoleSummaryOutput::ChangeData(), Vole_JuvenileMale::FreeLocation(), g_extradispmort, g_rand_uni_fnc(), g_random_fnc(), Vole_Base::m_Age, Vole_Base::m_BreedingSeason, Vole_Base::m_DispVector, TAnimal::m_guard_cell_x, TAnimal::m_guard_cell_y, Vole_Base::m_Have_Territory, TAnimal::m_Location_x, TAnimal::m_Location_y, Vole_Base::m_Mature, Vole_Base::m_MinMVoleHabQual, Vole_Base::m_OurPopulation, Vole_Base::m_TerrRange, Vole_Population_Manager::m_VoleRecordMort, Vole_Base::MoveTo(), Vole_JuvenileMale::SetLocation(), Vole_Population_Manager::SupplyInOlderTerr(), tovmort_MDisp, Population_Manager::UpdateGuardMap(), CfgInt::value(), CfgBool::value(), vdisp_CarryOn, vdisp_Die, vdisp_Infanticide, and vdisp_Mature.

Referenced by st_Eval_n_Explore().

EndStep()

void Vole_Male::EndStep ( void  )

overridevirtual

Male vole EndStep.

The EndStep is one of the three timestep divisions. This is called once for each vole after BeginStep and Step.
The main function here is to remove voles that have died during step and otherwise to grow if not at max weight. It also checks if the vole was killed due to human management and determines the potential territory size.

Reimplemented from Vole_JuvenileMale.

                        {
#ifdef __VoleStarvationDays
  if (m_Have_Territory) m_StarvationDays = 0;
  if ( m_StarvationDays > m_MaxStarvationDays)
  {
      st_Dying();
      if (cfg_RecordVoleMort.value() ) m_OurPopulation->m_VoleRecordMort->ChangeData(tovmort_MStarve,1);
  }
  else
#endif
    {
        CheckManagement();
        if (CurrentVState == tovs_MDying) { st_Dying(); }
        else
        {
            m_Age++;
            /*              MALE GROWTH NOTES
 
             Male vole grows until 20g. After that he will only grow if he has matured
             Growth continues up to 60g.
 
             Reproduction cannot occur below 40g or 40 days
 
             Growth only occurs between 1 March and 1st August
             taken from Hanson L, 1977, Oikos 29.
            */
            const int today = m_OurLandscape->SupplyDayInYear();
            if (today < GrowStopDate && today > m_OurPopulation->SupplyGrowthStartDate())
            {
                if (m_Weight < 20) { m_Weight += growthperdayM; }
                else if (m_Mature == true && m_Weight < MaxWeightM) { m_Weight += growthperdayM; }
            }
            else if (today == 1)
            {
                m_BornLastYear = true;
                m_Mature = true;
            } // must be true if alive on 1st Jan.
            DetermineTerritorySize();
        }
    }
}

References cfg_RecordVoleMort, VoleSummaryOutput::ChangeData(), TAnimal::CheckManagement(), Vole_Base::CurrentVState, DetermineTerritorySize(), growthperdayM, Vole_Base::m_Age, Vole_Base::m_BornLastYear, Vole_Base::m_Have_Territory, Vole_Base::m_Mature, TAnimal::m_OurLandscape, Vole_Base::m_OurPopulation, Vole_Population_Manager::m_VoleRecordMort, Vole_Base::m_Weight, MaxWeightM, Vole_Base::st_Dying(), Landscape::SupplyDayInYear(), Vole_Population_Manager::SupplyGrowthStartDate(), tovmort_MStarve, tovs_MDying, and CfgBool::value().

MortalityTest()

bool Vole_Male::MortalityTest ( )

overrideprotectedvirtual

Do a mortality test.

Takes both physiological lifespan and background mortality into account to determine whether the vole should die - repeated calls increase the risk of dying

Reimplemented from Vole_Base.

                              {
    // returns true if the vole should die
    if (m_Have_Territory) { if (g_rand_uni_fnc() < g_DailyMortChanceMaleTerr) return true; }
    else if (g_rand_uni_fnc() < g_DailyMortChance) return true;
    return false;
}

References g_DailyMortChance, g_DailyMortChanceMaleTerr, g_rand_uni_fnc(), and Vole_Base::m_Have_Territory.

ReInit()

void Vole_Male::ReInit ( struct_Vole_Adult *  p_aVoleStruct )

overridevirtual

Reimplemented from Vole_JuvenileMale.

                                                       {
    Init(p_aVoleStruct);
    m_Age = p_aVoleStruct->age;
    m_Weight = p_aVoleStruct->weight;
    m_BirthYear = p_aVoleStruct->BirthYear;
    m_Sex = true;
    m_TerrRange = m_MinMaleTerritorySize;
    m_MinTerrRange = m_MinMaleTerritorySize;
}

References struct_Vole_Adult::age, struct_Vole_Adult::BirthYear, Vole_Base::Init(), Vole_Base::m_Age, Vole_Base::m_BirthYear, Vole_Base::m_MinMaleTerritorySize, Vole_Base::m_MinTerrRange, Vole_Base::m_Sex, Vole_Base::m_TerrRange, Vole_Base::m_Weight, and struct_Vole_Adult::weight.

st_Eval_n_Explore()

TTypeOfVoleState Vole_Male::st_Eval_n_Explore ( void  )

protected

Male vole main territory assessment behaviour.

Evaluates the quality of his habitat and does some limited exploration in the surrounding area to see if she can improve it by moving.

                                                  {
    VoleDispersalReturns retval = vdisp_CarryOn;
 
    unsigned MovementIndex;
    if (m_Age > 90) MovementIndex = 3;
    else if (m_Age > 60) MovementIndex = 2;
    else if (m_Age > 30) MovementIndex = 1;
    else MovementIndex = 0;
    const int OldMales = m_OurPopulation->SupplyInOlderTerr(m_Location_x, m_Location_y, m_Age, m_TerrRange); // returns -1 if a male has p_x,p_y in his territory and is older than p_Age else returns the number of females present
    const int NoFemales = OldMales;
    const double Qual = CalculateCarryingCapacity(m_Location_x, m_Location_y, 10000);
    //if (OldMales>1) Qual/=OldMales; // Share resources with the females, but no-one else
    if (m_BreedingSeason)
    {
        if (m_Have_Territory) // Must be mature
        {
#ifdef __USINGTRAPLINES
            CheckTraps();
#endif
            if (!m_Mature)
            {
                return tovs_MMaturation; // Special case, immature male in breeding season with territory will mature
            }
            // If he his mature then he must move if in an older males territory
            bool NoMates = false;
            if (NoFemales < 1)
            {
                if (g_rand_uni_fnc() < g_NoFemalesMove)
                {
                    const Vole_Female* af = m_OurPopulation->FindClosestFemale(m_Location_x, m_Location_y, MaleMovement[MovementIndex]);
                    if (af != nullptr)
                    {
                        const AnimalPosition ap = af->SupplyPosition();
                        int tx = (m_SimW + ap.m_x + (g_random_fnc(2) - 1)) % m_SimW;
                        int ty = (m_SimH + ap.m_y + (g_random_fnc(2) - 1)) % m_SimH;
                        while (GetLocation(tx, ty) && MoveQuality(tx, ty) < 1)
                        {
                            tx = (m_SimW + tx + (g_random_fnc(2) - 1)) % m_SimW;
                            ty = (m_SimH + ty + (g_random_fnc(2) - 1)) % m_SimH;
                        }
                        FreeLocation();
                        m_Location_x = tx;
                        m_Location_y = ty;
                        m_OurPopulation->UpdateGuardMap(m_Location_x, m_Location_y, m_guard_cell_x, m_guard_cell_y);
                        SetLocation();
                    }
                    else NoMates = true;
                }
            }
            else if ((OldMales < 1 || Qual < m_MinFVoleHabQual || NoMates) && !m_BornLastYear) // In larger males territory, must move or are no females
            {
                m_Have_Territory = false;
                m_DispVector = g_random_fnc(8);
                retval = Dispersal(Qual, MaleMovement[MovementIndex]);
            }
        }
        else
        {
            // No territory & Breeding season
#ifdef __USINGTRAPLINES
            CheckTraps();
#endif
            // Not quality dependent dispersal, very directed
            retval = Dispersal(-1, MaleMovement[MovementIndex]);
        }
    }
    else // Not breeding season
    {
#ifdef __USINGTRAPLINES
        CheckTraps();
#endif
        if (OldMales < 1 || Qual < m_MinFVoleHabQual)
        {
#ifdef __VoleStarvationDays
                m_StarvationDays++;
#endif
            retval = Dispersal(-1, 1 + g_random_fnc(MaleMovement[MovementIndex]));
        }
    }
    // retval now holds the answer to the returning state
    switch (retval)
    {
    case vdisp_Mature:
        Setm_Mature();
        return tovs_Infanticide;
    case vdisp_Infanticide:
        return tovs_Infanticide;
    case vdisp_Die:
        return tovs_MDying;
    case vdisp_CarryOn:
    default:
        return CurrentVState;
    }
}

References Vole_Base::CalculateCarryingCapacity(), Vole_Base::CheckTraps(), Vole_Base::CurrentVState, Dispersal(), Vole_Population_Manager::FindClosestFemale(), Vole_JuvenileMale::FreeLocation(), g_NoFemalesMove, g_rand_uni_fnc(), g_random_fnc(), Vole_JuvenileMale::GetLocation(), Vole_Base::m_Age, Vole_Base::m_BornLastYear, Vole_Base::m_BreedingSeason, Vole_Base::m_DispVector, TAnimal::m_guard_cell_x, TAnimal::m_guard_cell_y, Vole_Base::m_Have_Territory, TAnimal::m_Location_x, TAnimal::m_Location_y, Vole_Base::m_Mature, Vole_Base::m_MinFVoleHabQual, Vole_Base::m_OurPopulation, Vole_Base::m_SimH, Vole_Base::m_SimW, Vole_Base::m_TerrRange, AnimalPosition::m_x, AnimalPosition::m_y, MaleMovement, Vole_Base::MoveQuality(), Vole_JuvenileMale::SetLocation(), Vole_Base::Setm_Mature(), Vole_Population_Manager::SupplyInOlderTerr(), TAnimal::SupplyPosition(), tovs_Infanticide, tovs_MDying, tovs_MMaturation, Population_Manager::UpdateGuardMap(), vdisp_CarryOn, vdisp_Die, vdisp_Infanticide, and vdisp_Mature.

Referenced by Step().

st_Infanticide()

void Vole_Male::st_Infanticide ( void  ) const

protected

Male vole infanticide behaviour.

Will only enter here if have taken over a new area a reasonable distance from the old one and will only commit infanticide in 10% of his attempts in his minimum territory range.
Tells the population manager to send an infanticide message to all females in the territory.

                                         {
    if (g_rand_uni_fnc() < cfg_InfanticideProbability.value())
    {
        // int SearchInf =(int) m_TerrRange*cfg_InfanticideRangeRelToTerRange.value();
        m_OurPopulation->SendMessage(tovm_Infanticide, m_Location_x, m_Location_y, m_MinTerrRange, false, m_Weight);
    }
}

References cfg_InfanticideProbability, g_rand_uni_fnc(), TAnimal::m_Location_x, TAnimal::m_Location_y, Vole_Base::m_MinTerrRange, Vole_Base::m_OurPopulation, Vole_Base::m_Weight, Vole_Population_Manager::SendMessage(), tovm_Infanticide, and CfgFloat::value().

Referenced by Step().

st_Maturation()

int Vole_Male::st_Maturation ( void  ) const

protected

Male vole maturation control.

Decide whether to become mature or not

                                       {
    if (m_OurLandscape->SupplyDayInYear() <
        m_OurPopulation->SupplyGrowthStartDate())
        return 0; // don't mature
    return 1;
    // matures
}

References TAnimal::m_OurLandscape, Vole_Base::m_OurPopulation, Landscape::SupplyDayInYear(), and Vole_Population_Manager::SupplyGrowthStartDate().

Referenced by Step().

Step()

void Vole_Male::Step ( void  )

overridevirtual

Male vole Step.

The Step is one of the three timestep divisions. This is called repeatedly after BeginStep and before EndStep, until all voles report that they are done with Step.

Most of the behaviours are controlled by moving voles between behavioural states in Step (for other models this is also done in BeginStep and EndStep).
When a vole is done for the day it will signal this by setting m_StepDone==true. NB that a call to one behaviour may trigger a call to another behaviour on the next call to step inside the same timestep. In this way a daily cycle of activity can be undertaken.

Reimplemented from Vole_JuvenileMale.

                     {
    if (m_StepDone || m_CurrentStateNo == -1) return;
    switch (CurrentVState)
    {
    case tovs_InitialState: //initial state
        CurrentVState = tovs_MEvaluateExplore;
        break;
    case tovs_MMaturation: // Maturation
        if (st_Maturation()) Setm_Mature();
        CurrentVState = tovs_MEvaluateExplore; // Eval and Explore
        break;
    case tovs_MEvaluateExplore: // Eval&Explore
        CurrentVState = st_Eval_n_Explore();
        m_StepDone = true;
        break;
    case tovs_Infanticide: // Infanticide
        st_Infanticide();
        CurrentVState = tovs_MEvaluateExplore;
        break;
    case tovs_MDying:
        FreeLocation();
        m_StepDone = true;
        break;
    default:
        m_OurLandscape->Warn("Vole_Male::Step - unknown return error", nullptr);
        exit(1);
    }
}

References Vole_Base::CurrentVState, Vole_JuvenileMale::FreeLocation(), TALMaSSObject::m_CurrentStateNo, TAnimal::m_OurLandscape, TALMaSSObject::m_StepDone, Vole_Base::Setm_Mature(), st_Eval_n_Explore(), st_Infanticide(), st_Maturation(), tovs_Infanticide, tovs_InitialState, tovs_MDying, tovs_MEvaluateExplore, tovs_MMaturation, and Landscape::Warn().

---

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

• /builds/ALMaSS/ALMaSS_MIDox/Vole/vole_all.h
• /builds/ALMaSS/ALMaSS_MIDox/Vole/Vole_all.cpp