DK_ChristmasTrees_Perm Class Reference

DK_ChristmasTrees_Perm class
. More...

#include <DK_ChristmasTrees_Perm.h>

Inheritance diagram for DK_ChristmasTrees_Perm:

Public Member Functions
virtual bool	Do (Farm *a_farm, LE *a_field, FarmEvent *a_ev)
	The one and only method for a crop management plan. All farm actions go through here. More...
	DK_ChristmasTrees_Perm (TTypesOfVegetation a_tov, TTypesOfCrops a_toc, Landscape *a_L)
void	SetUpFarmCategoryInformation ()
Public Member Functions inherited from Crop
virtual	~Crop ()
	Crop (TTypesOfVegetation a_tov, TTypesOfCrops a_toc, Landscape *a_L)
int	GetFirstDate (void)
void	ChooseNextCrop (int a_no_dates)
	Chooses the next crop to grow in a field. More...
int	GetCropClassification ()
void	SetCropClassification (int a_classification)
void	GetCropType (TTypesOfCrops a_toc)
TTypesOfCrops	GetCropType ()
FarmManagementCategory	LookUpManagementCategory (int a_todo)
bool	GetForceSpringOK ()

Additional Inherited Members
Public Attributes inherited from Crop
TTypesOfVegetation	m_tov
Protected Member Functions inherited from Crop
void	SimpleEvent (long a_date, int a_todo, bool a_lock)
	Adds an event to this crop management. More...
void	SimpleEvent_ (long a_date, int a_todo, bool a_lock, Farm *a_farm, LE *a_field)
	Adds an event to this crop management without relying on member variables. More...
bool	StartUpCrop (int a_spring, std::vector< std::vector< int >> a_flexdates, int a_todo)
	Holds the translation between the farm operation enum for each cropand the farm management category associated with it More...
bool	AphidDamage (LE *a_field)
	Compares aphid numbers per m2 with a threshold to return true if threshold is exceeded. More...
Protected Attributes inherited from Crop
Farm *	m_farm
LE *	m_field
FarmEvent *	m_ev
int	m_first_date
int	m_count
int	m_last_date
int	m_ddegstoharvest
int	m_base_elements_no
Landscape *	m_OurLandscape
bool	m_forcespringpossible = false
	Used to signal that the crop can be forced to start in spring. More...
TTypesOfCrops	m_toc
	The Crop type in terms of the TTypesOfCrops list (smaller list than tov, no country designation) More...
int	m_CropClassification
	Contains information on whether this is a winter crop, spring crop, or catch crop that straddles the year boundary (0,1,2) More...
vector< FarmManagementCategory >	m_ManagementCategories
	Holds the translation between the farm operation enum for each crop and the farm management category associated with it. More...
Static Protected Attributes inherited from Crop
static int	m_date_modifier = 0
	Holds a value that shifts test pesticide use by this many days in crops modified to use it. More...

Detailed Description

DK_ChristmasTrees_Perm class
.

See DK_ChristmasTrees_Perm.h::DK_ChristmasTrees_PermToDo for a complete list of all possible events triggered codes by the DK_ChristmasTrees_Perm management plan. When triggered these events are handled by Farm and are available as information for other objects such as animal and bird models.

Constructor & Destructor Documentation

DK_ChristmasTrees_Perm()

DK_ChristmasTrees_Perm::DK_ChristmasTrees_Perm ( TTypesOfVegetation  a_tov, TTypesOfCrops  a_toc, Landscape *  a_L  )

inline

                                                                                          : Crop(a_tov, a_toc, a_L)
    {
        // When we start it off, the first possible date for a farm operation 
        // This information is used by other crops when they decide how much post processing of 
        // the management is allowed after harvest before the next crop starts.
        m_first_date = g_date->DayInYear(10, 3);
        SetUpFarmCategoryInformation();
    }

References Calendar::DayInYear(), g_date, Crop::m_first_date, and SetUpFarmCategoryInformation().

Member Function Documentation

Do()

bool DK_ChristmasTrees_Perm::Do ( Farm *  a_farm, LE *  a_field, FarmEvent *  a_ev  )

virtual

The one and only method for a crop management plan. All farm actions go through here.

Called every time something is done to the crop by the farmer in the first instance it is always called with a_ev->todo set to start, but susequently will be called whenever the farmer wants to carry out a new operation.
This method details all the management and relationships between operations necessary to grow and ALMaSS crop.

Reimplemented from Crop.

{
    m_field = a_field; // this is needed because of possible calls to other methods and currently we do not pass parameters.
    m_farm = a_farm; // this is needed because of possible calls to other methods and currently we do not pass parameters.
    m_ev = a_ev;
    bool done = false; // The boolean value done indicates when we are totally finished with this plan (i.e. it is set to true).
    bool flag = false;
    int d1 = 0;
    TTypesOfVegetation l_tov = tov_DKChristmasTrees_Perm;
    // Depending what event has occured jump to the correct bit of code e.g. for ww_start jump to line 67 below
    switch (a_ev->m_todo)
    {
    case dk_ctp_start:
    {
        DK_CTP_YEAR = 0;
        a_field->ClearManagementActionSum();
        m_last_date = g_date->DayInYear(6, 10); // Should match the last flexdate below
            //Create a 2d array of 1 plus the number of operations you use. Change only 4+1 to what you need in the line below
        std::vector<std::vector<int>> flexdates(1 + 1, std::vector<int>(2, 0));
        // Set up the date management stuff
                // Start and stop dates for all events after harvest
        flexdates[0][1] = g_date->DayInYear(5, 10); // last possible day of in this case row cultivation autumn (no harvest in this code) 
        // Now these are done in pairs, start & end for each operation. If its not used then -1
        flexdates[1][0] = -1; // This date will be moved back as far as necessary and potentially to flexdates 1 (start op 1)
        flexdates[1][1] = g_date->DayInYear(6, 10); // This date will be moved back as far as necessary and potentially to flexdates 1 (end op 1) harrow autumn
 
        // Below if this is a spring crop use 365, otherwise first parameter is always 0, second parameter is fixed, and the third is the start up operation in the first year
        if (StartUpCrop(365, flexdates, int(dk_ctp_sleep_all_day))) break;
 
        // End single block date checking code. Please see next line comment as well.
        // Reinit d1 to first possible starting date.
        // OK, let's go. - EST1 followed by 10 years of growing threes -> EST2 followed by 10 years of growing trees
        if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 0) // establishment year 1
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_sleep_all_day, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 1)// first year after est
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_ferti_sand_s2, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 2 || (DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 3) // 2nd + 3rd after 
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_ferti_sand_s3_4, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 4) //4th after 
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk_s5, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 5) // 5th after
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk1_s6, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 6 || (DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 7) // 6th + 7th after
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk1_s7_8, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 8 || (DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 9) // 8th + 9th after
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk1_s9_10, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 10)
        {
            d1 = g_date->OldDays() + g_date->DayInYear(10, 3) + 365;  // harvest year
            SimpleEvent(d1, dk_ctp_npk1_s11, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 11) // second establishment 
        {
            d1 = g_date->OldDays() + g_date->DayInYear(10, 3) + 365;
            SimpleEvent(d1, dk_ctp_crush_trees, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 12)// first year after est
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_ferti_sand_s2, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 13 || (DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 14) // 2nd + 3rd after 
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_ferti_sand_s3_4, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 15) //4th after 
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk_s5, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 16) // 5th after
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk1_s6, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 17 || (DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 18) // 6th + 7th after
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk1_s7_8, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 19 || (DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 20) // 8th + 9th after
        {
            d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + 365;
            SimpleEvent(d1, dk_ctp_npk1_s9_10, false);
        }
        else if ((DK_CTP_YEAR + g_date->GetYearNumber()) % 22 == 21)
        {
            d1 = g_date->OldDays() + g_date->DayInYear(10, 3) + 365;  // harvest year
            SimpleEvent(d1, dk_ctp_npk1_s11, false);
        }
        break;
 
    }
    break; 
 
    //EST 1
    case dk_ctp_sleep_all_day:
        if (!a_farm->SleepAllDay(a_field, 0.0,
            g_date->DayInYear(19, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sleep_all_day, true);
            break;
        }
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(20, 8), dk_ctp_plough1_autumn, false);
        break;
 
    case dk_ctp_plough1_autumn:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!a_farm->AutumnPlough(a_field, 0.0,
                g_date->DayInYear(10, 9) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_plough1_autumn, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_plough2_autumn, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_depth_plough_autumn, false);
        break; // sandy soils
 
    case dk_ctp_depth_plough_autumn:
        if (!a_farm->DeepPlough(a_field, 0.0,
            g_date->DayInYear(10, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_depth_plough_autumn, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_stubble_harrow_autumn, false);
        break;
 
    case dk_ctp_plough2_autumn:
        if (!a_farm->AutumnPlough(a_field, 0.0,
            g_date->DayInYear(20, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_plough2_autumn, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_cover_crop_autumn, false);
        break;
 
    case dk_ctp_stubble_harrow_autumn:
        if (!a_farm->StubbleHarrowing(a_field, 0.0,
            g_date->DayInYear(20, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_stubble_harrow_autumn, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_cover_crop_autumn, false);
        break;
 
    case dk_ctp_sow_cover_crop_autumn:
        if (!a_farm->AutumnSow(a_field, 0.0,
            g_date->DayInYear(30, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sow_cover_crop_autumn, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_plant_trees_autumn, false);
        break;
        
    case dk_ctp_plant_trees_autumn:
        if (!a_farm->AutumnSow(a_field, 0.0,
            g_date->DayInYear(30, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_plant_trees_autumn, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_row_cultivation_autumn, false);
        break;
 
    case dk_ctp_row_cultivation_autumn:
        if (!a_farm->RowCultivation(a_field, 0.0, g_date->DayInYear(5, 10) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_row_cultivation_autumn, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_harrow_autumn, false);
        break;
 
    case dk_ctp_harrow_autumn:
        if (!a_farm->AutumnHarrow(a_field, 0.0, g_date->DayInYear(6, 10) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_harrow_autumn, true);
            break;
        }
        done = true; // end of EST1
        break;
 
        // EST2
    case  dk_ctp_crush_trees:
        if (!m_farm->Shredding(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_crush_trees, true);
            break;
        }
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_herbicide, false);
        break;
 
    case dk_ctp_herbicide: // some do this (suggest 50%) others sow inter crops
        if (m_ev->m_lock || m_farm->DoIt(50)) {
            if (!m_farm->HerbicideTreat(m_field, 0.0,
                g_date->DayInYear(30, 7) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide, true);
                break;
            }
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_sow_catch_crop1, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 7), dk_ctp_sow_inter_crops, false);
        break;
 
    case dk_ctp_sow_catch_crop1: // may need changing
        if (!m_farm->AutumnSow(m_field, 0.0, g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop1, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_plant_trees, false);
        break;
 
    case dk_ctp_sow_inter_crops: // may need changing
        if (!m_farm->AutumnSow(m_field, 0.0, g_date->DayInYear(31, 7) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sow_inter_crops, true);
            break;
        }
        SimpleEvent(g_date->Date() + 50, dk_ctp_harrow, false);
        break;
 
    case dk_ctp_harrow:
        if (!m_farm->AutumnHarrow(m_field, 0.0, g_date->DayInYear(29, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_harrow, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_plant_trees, false);
        break;
 
    case dk_ctp_plant_trees:
        if (!m_farm->AutumnSow(m_field, 0.0, g_date->DayInYear(30, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_plant_trees, true);
            break;
        }
        done = true; // end of EST2
        break;
 
        // 1st year after EST
    case dk_ctp_ferti_sand_s2:
        if (m_field->GetSoilType() == tos_Sand || m_field->GetSoilType() == tos_LoamySand || m_field->GetSoilType() == tos_SandyLoam || m_field->GetSoilType() == tos_SandyClayLoam) // on sandy soils (NL ZAND & LOSS)
        {
            if (a_farm->IsStockFarmer()) {
                if (!m_farm->FA_Manure(m_field, 0.0,
                    g_date->DayInYear(30, 4) - g_date->DayInYear())) {
                    SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_sand_s2, true);
                    break;
                }
                SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_2, false);
                break;
            }
            else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 1), dk_ctp_ferti_sand_p2, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_ctp_ferti_clay_s2, false);
        break; // clay soils
 
    case dk_ctp_ferti_sand_p2:
        if (!m_farm->FP_Manure(m_field, 0.0,
            g_date->DayInYear(30, 4) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_sand_p2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_2, false);
        break;
 
    case dk_ctp_ferti_clay_s2:
        if (a_farm->IsStockFarmer()) {
            if (!m_farm->FA_Manure(m_field, 0.0,
                g_date->DayInYear(15, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_clay_s2, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_2, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_ctp_ferti_clay_p2, false);
        break;
 
    case dk_ctp_ferti_clay_p2:
        if (!m_farm->FP_Manure(m_field, 0.0,
            g_date->DayInYear(15, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_clay_p2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_2, false);
        break;
 
    case dk_ctp_manual_weeding_2:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_2, false);
        break;
 
    case dk_ctp_herbicide1_2:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2_2, false);
        break;
 
    case dk_ctp_herbicide2_2:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2_2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3_2, false);
        break;
 
    case dk_ctp_herbicide3_2:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3_2, true);
            break;
        }
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 7), dk_ctp_wait, false);
        break;
 
    case dk_ctp_wait:
        // end of 1st year after
        done = true;
        break;
 
        // year 2nd + 3rd year after
    case dk_ctp_ferti_sand_s3_4:
        if (m_field->GetSoilType() == tos_Sand || m_field->GetSoilType() == tos_LoamySand || m_field->GetSoilType() == tos_SandyLoam || m_field->GetSoilType() == tos_SandyClayLoam) // on sandy soils (NL ZAND & LOSS)
        {
            if (a_farm->IsStockFarmer())
            {
                if (!m_farm->FA_Manure(m_field, 0.0,
                    g_date->DayInYear(30, 4) - g_date->DayInYear())) {
                    SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_sand_s3_4, true);
                    break;
                }
                SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_ctp_npk_sand1_s3_4, false); // fertilizer thread main thread
                break;
            }
            else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 1), dk_ctp_ferti_sand_p3_4, false); // fertilizer thread main thread
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_ctp_ferti_clay_s3_4, false);
        break;
 
 
    case dk_ctp_ferti_sand_p3_4:
        if (!m_farm->FP_Manure(m_field, 0.0,
            g_date->DayInYear(30, 4) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_sand_p3_4, true);
            break;
        }
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_ctp_npk_sand1_p3_4, false); // fertilizer thread main thread
        break;
 
    case dk_ctp_ferti_clay_s3_4:
        if (a_farm->IsStockFarmer())
        {
            if (!m_farm->FA_Manure(m_field, 0.0,
                g_date->DayInYear(15, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_clay_s3_4, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_clay_s3_4, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_ctp_ferti_clay_p3_4, false);
        break;
 
    case dk_ctp_ferti_clay_p3_4:
        if (!m_farm->FP_Manure(m_field, 0.0,
            g_date->DayInYear(15, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_ferti_clay_p3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_3_4, false);
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_3_4, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_sow_catch_crop2, false);
        break;
 
    case dk_ctp_npk_clay_s3_4:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_clay_s3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_3_4, false); // weeding / herbicide thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_3_4, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_sow_catch_crop2, false);
        break;
 
    case dk_ctp_npk_sand1_s3_4:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_sand1_s3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_3_4, false); // weeding / herbicide thread
        SimpleEvent(g_date->Date() + 1, dk_ctp_grazing_3_4, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk_sand2_s3_4, false);
        break;
 
    case dk_ctp_npk_sand1_p3_4:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_sand1_p3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_3_4, false); // weeding / herbicide thread
        SimpleEvent(g_date->Date() + 1, dk_ctp_grazing_3_4, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk_sand2_p3_4, false);
        break;
 
    case dk_ctp_manual_weeding_3_4:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_3_4, false);
        break;
 
    case dk_ctp_herbicide1_3_4:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2_3_4, false);
        break;
 
    case dk_ctp_herbicide2_3_4:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2_3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3_3_4, false);
        break;
 
    case dk_ctp_herbicide3_3_4:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3_3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_3_4, false);
        break;
 
    case dk_ctp_manual_cutting_3_4: // no specific timing for this trimming event
        if (!m_farm->Pruning(m_field, 0.0,
            g_date->DayInYear(31, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_3_4, true);
            break;
        }
        break;
 
        // end of weeding / herbicide thread
 
    case dk_ctp_grazing_3_4:
        if (m_ev->m_lock || m_farm->DoIt_prob(.10)) { // suggest it is not common
            if (!m_farm->PigsOut(m_field, 0.0,
                g_date->DayInYear(1, 7) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_grazing_3_4, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_3_4, false);
            break;
        }
        break;
    case dk_ctp_pig_is_out_3_4:    // Keep the pigs out there
                                 // PigsAreOut() returns false if it is not time to stop grazing
        if (!m_farm->PigsAreOut(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_3_4, false);
            break;
        }
        break; // end of grazing thread
 
    case dk_ctp_npk_sand2_s3_4:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_sand2_s3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop2, false);
        break;
 
    case dk_ctp_npk_sand2_p3_4:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_sand2_p3_4, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop2, false);
        break;
 
        // year 5 (after establishment)
    case dk_ctp_npk_s5:
        if (a_farm->IsStockFarmer())
        {
            if (!m_farm->FA_NPK(m_field, 0.0,
                g_date->DayInYear(1, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk_s5, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_5, false); // weeding / herbicide thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_5, false); // grazing thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk_sand_s5, false); // fertilizer thread - main thread
            break;
        }// here comes a fork of parallel events:
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 1), dk_ctp_npk_p5, false);
        break;
 
    case dk_ctp_npk_p5:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk_p5, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_5, false); // weeding / herbicide thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_5, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk_sand_p5, false); // fertilizer thread - main thread
        break;
 
    case dk_ctp_manual_weeding_5:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_5, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_5, false);
        break;
 
    case dk_ctp_herbicide1_5:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_5, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2_5, false);
        break;
 
    case dk_ctp_herbicide2_5:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2_5, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3_5, false);
        break;
 
    case dk_ctp_herbicide3_5:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3_5, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_5, false);
        break;
 
    case dk_ctp_manual_cutting_5: // no specific timing for this trimming event
        if (!m_farm->Pruning(m_field, 0.0,
            g_date->DayInYear(31, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_5, true);
            break;
        }
        break;
 
    case dk_ctp_grazing_5:
        if (m_ev->m_lock || m_farm->DoIt_prob(.10)) { // suggest it is not common
            if (!m_farm->PigsOut(m_field, 0.0,
                g_date->DayInYear(1, 7) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_grazing_5, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_5, false);
            break;
        }
        break;
    case dk_ctp_pig_is_out_5:    // Keep the pigs out there
                                 // PigsAreOut() returns false if it is not time to stop grazing
        if (!m_farm->PigsAreOut(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_5, false);
            break;
        }
        break; // end of grazing thread
 
    case dk_ctp_npk_sand_s5:
        if (m_field->GetSoilType() == tos_Sand || m_field->GetSoilType() == tos_LoamySand || m_field->GetSoilType() == tos_SandyLoam || m_field->GetSoilType() == tos_SandyClayLoam) // on sandy soils (NL ZAND & LOSS)
        {
            if (!m_farm->FA_NPK(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk_sand_s5, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop2, false);
        break;
 
    case dk_ctp_npk_sand_p5:
        if (m_field->GetSoilType() == tos_Sand || m_field->GetSoilType() == tos_LoamySand || m_field->GetSoilType() == tos_SandyLoam || m_field->GetSoilType() == tos_SandyClayLoam) // on sandy soils (NL ZAND & LOSS)
        {
            if (!m_farm->FP_NPK(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk_sand_p5, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop2, false);
        break;
 
    case dk_ctp_sow_catch_crop2: // changes may be needed
        if (!m_farm->AutumnSow(m_field, 0.0, g_date->DayInYear(16, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 90, dk_ctp_herbicide4_3_4, false);
        break;
 
    case dk_ctp_herbicide4_3_4:
        if (!m_farm->HerbicideTreat(m_field, 0.0, g_date->DayInYear(16, 11) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide4_3_4, true);
            break;
        }
        //end of year 2nd, 3rd and 4th year after
        done = true;
        break;
 
        // 5th year after
    case dk_ctp_npk1_s6:
        if (a_farm->IsStockFarmer())
        {
            if (!m_farm->FA_NPK(m_field, 0.0,
                g_date->DayInYear(1, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_s6, true);
                break;
            }
            // here comes a fork of parallel events:
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_6, false); // weeding / herbicide thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_6, false); // grazing thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_s6, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 1), dk_ctp_npk1_p6, false);
        break;
 
    case dk_ctp_npk1_p6:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_p6, true);
            break;
        }
        // here comes a fork of parallel events:
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_6, false); // weeding / herbicide thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_6, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_p6, false);
        break;
 
    case dk_ctp_npk2_s6:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_s6, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_s6, false);
        break;
 
    case dk_ctp_npk2_p6:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_p6, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_p6, false);
        break;
 
    case dk_ctp_calcium_s6:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FA_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_s6, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, false);
        break;
 
    case dk_ctp_calcium_p6:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FP_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_p6, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, false);
        break;
 
    case dk_ctp_grazing_6:
        if (m_ev->m_lock || m_farm->DoIt_prob(.10)) { // suggest it is not common
            if (!m_farm->PigsOut(m_field, 0.0,
                g_date->DayInYear(1, 7) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_grazing_6, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_6, false);
            break;
        }
        break;
    case dk_ctp_pig_is_out_6:    // Keep the pigs out there
                                 // PigsAreOut() returns false if it is not time to stop grazing
        if (!m_farm->PigsAreOut(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_6, false);
            break;
        }
        break; // end of grazing thread
 
    case dk_ctp_manual_weeding_6:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_6, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_6, false);
        break;
 
    case dk_ctp_herbicide1_6:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_6, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2_6, false);
        break;
 
    case dk_ctp_herbicide2_6:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2_6, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3_6, false);
        break;
 
    case dk_ctp_herbicide3_6:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3_6, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_6, false);
        break;
 
    case dk_ctp_manual_cutting_6: // no specific timing for this trimming event
        if (!m_farm->Pruning(m_field, 0.0,
            g_date->DayInYear(31, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_6, true);
            break;
        }
        break;
 
        // 6th + 7th year after 
    case dk_ctp_npk1_s7_8:
        if (a_farm->IsStockFarmer())
        {
            if (!m_farm->FA_NPK(m_field, 0.0,
                g_date->DayInYear(1, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_s7_8, true);
                break;
            }
            // here comes a fork of parallel events:
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_7_8, false); // weeding / herbicide thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_7_8, false); // grazing thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_s7_8, false); // fertilizer thread
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 1), dk_ctp_npk1_p7_8, false);
        break;
 
    case dk_ctp_npk1_p7_8:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_p7_8, true);
            break;
        }
        // here comes a fork of parallel events:
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_7_8, false); // weeding / herbicide thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 6), dk_ctp_grazing_7_8, false); // grazing thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_p7_8, false); // fertilizer thread
        break;
 
    case dk_ctp_npk2_s7_8:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_s7_8, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_s7_8, false);
        break;
 
    case dk_ctp_npk2_p7_8:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_p7_8, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_p7_8, false);
        break;
 
    case dk_ctp_calcium_s7_8:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FA_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_s7_8, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, false);
        break;
 
    case dk_ctp_calcium_p7_8:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FP_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_p7_8, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, false);
        break;
 
    case dk_ctp_grazing_7_8:
        if (m_ev->m_lock || m_farm->DoIt_prob(.10)) { // suggest it is not common
            if (!m_farm->PigsOut(m_field, 0.0,
                g_date->DayInYear(1, 7) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_grazing_7_8, true);
                break;
            }
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_7_8, false);
            break;
        }
        break;
    case dk_ctp_pig_is_out_7_8:    // Keep the pigs out there
                                 // PigsAreOut() returns false if it is not time to stop grazing
        if (!m_farm->PigsAreOut(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_pig_is_out_7_8, false);
            break;
        }
        break; // end of grazing thread
 
    case dk_ctp_manual_weeding_7_8:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_7_8, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_7_8, false);
        break;
 
    case dk_ctp_herbicide1_7_8:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_7_8, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2_7_8, false);
        break;
 
    case dk_ctp_herbicide2_7_8:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2_7_8, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3_7_8, false);
        break;
 
    case dk_ctp_herbicide3_7_8:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3_7_8, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_7_8, false);
        break;
 
    case dk_ctp_manual_cutting_7_8: // no specific timing for this trimming event
        if (!m_farm->Pruning(m_field, 0.0,
            g_date->DayInYear(31, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_7_8, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting2_7_8, false);
        break;
 
    case dk_ctp_manual_cutting2_7_8: // no specific timing for this trimming event (removing faulty trees)
        if (!m_farm->Pruning(m_field, 0.0,
            g_date->DayInYear(15, 9) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting2_7_8, true);
            break;
        }
        break;
 
        // 8th + 9th year after
    case dk_ctp_npk1_s9_10:
        if (a_farm->IsStockFarmer())
        {
            if (!m_farm->FA_NPK(m_field, 0.0,
                g_date->DayInYear(1, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_s9_10, true);
                break;
            }
            // here comes a fork of parallel events:
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_9_10, false); // weeding / herbicide thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_s9_10, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 1), dk_ctp_npk1_p9_10, false);
        break;
 
    case dk_ctp_npk1_p9_10:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_p9_10, true);
            break;
        }
        // here comes a fork of parallel events:
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_9_10, false); // weeding / herbicide thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_p9_10, false);
        break;
 
    case dk_ctp_npk2_s9_10:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_s9_10, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_s9_10, false);
        break;
 
    case dk_ctp_npk2_p9_10:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_p9_10, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_p9_10, false);
        break;
 
    case dk_ctp_calcium_s9_10:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FA_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_s9_10, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, false);
        break;
 
    case dk_ctp_calcium_p9_10:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FP_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_p9_10, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, false);
        break;
 
    case dk_ctp_sow_catch_crop3:
        if (!m_farm->AutumnSow(m_field, 0.0, g_date->DayInYear(16, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop3, true);
            break;
        }
        SimpleEvent(g_date->Date() + 90, dk_ctp_herbicide4_9_10, false);
        break;
 
    case dk_ctp_herbicide4_9_10:
        if (!m_farm->HerbicideTreat(m_field, 0.0, g_date->DayInYear(16, 11) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide4_9_10, true);
            break;
        }
        //end 5th-9th year after
        done = true;
        break;
 
    case dk_ctp_manual_weeding_9_10:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_9_10, true);
            break;
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_9_10, false);
        break;
 
    case dk_ctp_herbicide1_9_10:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1_9_10, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2_9_10, false);
        break;
 
    case dk_ctp_herbicide2_9_10:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2_9_10, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3_9_10, false);
        break;
 
    case dk_ctp_herbicide3_9_10:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3_9_10, true);
            break;
        }
        // end of weeding / herbicide thread
        break;
 
        // year 10+ - harvest year 
    case dk_ctp_npk1_s11:
        if (a_farm->IsStockFarmer())
        {
            if (!m_farm->FA_NPK(m_field, 0.0,
                g_date->DayInYear(1, 5) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_s11, true);
                break;
            }
            // here comes a fork of parallel events:
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_11, false); // weeding 
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1, false); // herbi thread
            SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_s11, false);
            break;
        }
        else SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 3), dk_ctp_npk1_p11, false);
        break;
 
    case dk_ctp_npk1_p11:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(1, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk1_p11, true);
            break;
        }
        // here comes a fork of parallel events:
        SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_11, false); // weeding
        SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1, false); // herbi thread
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_ctp_npk2_p11, false);
        break;
 
    case dk_ctp_npk2_s11:
        if (!m_farm->FA_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_s11, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_s11, false);
        break;
 
    case dk_ctp_npk2_p11:
        if (!m_farm->FP_NPK(m_field, 0.0,
            g_date->DayInYear(15, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_npk2_p11, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_calcium_p11, false);
        break;
 
    case dk_ctp_calcium_s11:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FA_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_s11, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop_11, false);
        break;
 
    case dk_ctp_calcium_p11:
        if (m_field->GetSoilType() != tos_Sand && m_field->GetSoilType() != tos_LoamySand && m_field->GetSoilType() != tos_SandyLoam && m_field->GetSoilType() != tos_SandyClayLoam) // on clay soils (NL KLEI & VEEN)
        {
            if (!m_farm->FP_Calcium(m_field, 0.0,
                g_date->DayInYear(15, 8) - g_date->DayInYear())) {
                SimpleEvent(g_date->Date() + 1, dk_ctp_calcium_p11, true);
                break;
            }
        }
        SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop_11, false);
        break;
 
    case dk_ctp_sow_catch_crop_11:
        if (!m_farm->AutumnSow(m_field, 0.0,
            g_date->DayInYear(17, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_sow_catch_crop_11, true);
            break;
        }
        SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 9), dk_ctp_manual_cutting_11, false);
        break;
 
    case dk_ctp_manual_cutting_11:
        if (!m_farm->Pruning(m_field, 0.0, g_date->DayInYear(25, 12) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_cutting_11, true);
            break;
        }
        SimpleEvent(g_date->Date(), dk_ctp_harvest, false);
        break;
 
    case dk_ctp_harvest:
        if (!m_farm->Harvest(m_field, 0.0, g_date->DayInYear(25, 12) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_harvest, true);
            break;
        }
        //end of harvest year - end of Christmas tree management!
        done = true;
        break;
 
    case dk_ctp_manual_weeding_11:
        if (!m_farm->ManualWeeding(m_field, 0.0,
            g_date->DayInYear(16, 8) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_manual_weeding_11, true);
            break;
        }
        break;
 
    case dk_ctp_herbicide1:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(17, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide1, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide2, false);
        break;
 
    case dk_ctp_herbicide2:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(31, 5) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide2, true);
            break;
        }
        SimpleEvent(g_date->Date() + 10, dk_ctp_herbicide3, false);
        break;
 
    case dk_ctp_herbicide3:
        if (!m_farm->HerbicideTreat(m_field, 0.0,
            g_date->DayInYear(30, 6) - g_date->DayInYear())) {
            SimpleEvent(g_date->Date() + 1, dk_ctp_herbicide3, true);
            break;
        }
        // end of weeding / herbicide thread
        break;
        // So we are done, and somewhere else the farmer will queue up the start event of the next crop
        // END OF MAIN THREAD
        g_msg->Warn(WARN_BUG, "DK_ChristmasTrees_Perm::Do(): "
            "Unknown event type! ", "");
        exit(1);
    }
    return done;
}

References Farm::AutumnHarrow(), Farm::AutumnPlough(), Farm::AutumnSow(), LE::ClearManagementActionSum(), Calendar::Date(), Calendar::DayInYear(), Farm::DeepPlough(), dk_ctp_calcium_p11, dk_ctp_calcium_p6, dk_ctp_calcium_p7_8, dk_ctp_calcium_p9_10, dk_ctp_calcium_s11, dk_ctp_calcium_s6, dk_ctp_calcium_s7_8, dk_ctp_calcium_s9_10, dk_ctp_crush_trees, dk_ctp_depth_plough_autumn, dk_ctp_ferti_clay_p2, dk_ctp_ferti_clay_p3_4, dk_ctp_ferti_clay_s2, dk_ctp_ferti_clay_s3_4, dk_ctp_ferti_sand_p2, dk_ctp_ferti_sand_p3_4, dk_ctp_ferti_sand_s2, dk_ctp_ferti_sand_s3_4, dk_ctp_grazing_3_4, dk_ctp_grazing_5, dk_ctp_grazing_6, dk_ctp_grazing_7_8, dk_ctp_harrow, dk_ctp_harrow_autumn, dk_ctp_harvest, dk_ctp_herbicide, dk_ctp_herbicide1, dk_ctp_herbicide1_2, dk_ctp_herbicide1_3_4, dk_ctp_herbicide1_5, dk_ctp_herbicide1_6, dk_ctp_herbicide1_7_8, dk_ctp_herbicide1_9_10, dk_ctp_herbicide2, dk_ctp_herbicide2_2, dk_ctp_herbicide2_3_4, dk_ctp_herbicide2_5, dk_ctp_herbicide2_6, dk_ctp_herbicide2_7_8, dk_ctp_herbicide2_9_10, dk_ctp_herbicide3, dk_ctp_herbicide3_2, dk_ctp_herbicide3_3_4, dk_ctp_herbicide3_5, dk_ctp_herbicide3_6, dk_ctp_herbicide3_7_8, dk_ctp_herbicide3_9_10, dk_ctp_herbicide4_3_4, dk_ctp_herbicide4_9_10, dk_ctp_manual_cutting2_7_8, dk_ctp_manual_cutting_11, dk_ctp_manual_cutting_3_4, dk_ctp_manual_cutting_5, dk_ctp_manual_cutting_6, dk_ctp_manual_cutting_7_8, dk_ctp_manual_weeding_11, dk_ctp_manual_weeding_2, dk_ctp_manual_weeding_3_4, dk_ctp_manual_weeding_5, dk_ctp_manual_weeding_6, dk_ctp_manual_weeding_7_8, dk_ctp_manual_weeding_9_10, dk_ctp_npk1_p11, dk_ctp_npk1_p6, dk_ctp_npk1_p7_8, dk_ctp_npk1_p9_10, dk_ctp_npk1_s11, dk_ctp_npk1_s6, dk_ctp_npk1_s7_8, dk_ctp_npk1_s9_10, dk_ctp_npk2_p11, dk_ctp_npk2_p6, dk_ctp_npk2_p7_8, dk_ctp_npk2_p9_10, dk_ctp_npk2_s11, dk_ctp_npk2_s6, dk_ctp_npk2_s7_8, dk_ctp_npk2_s9_10, dk_ctp_npk_clay_s3_4, dk_ctp_npk_p5, dk_ctp_npk_s5, dk_ctp_npk_sand1_p3_4, dk_ctp_npk_sand1_s3_4, dk_ctp_npk_sand2_p3_4, dk_ctp_npk_sand2_s3_4, dk_ctp_npk_sand_p5, dk_ctp_npk_sand_s5, dk_ctp_pig_is_out_3_4, dk_ctp_pig_is_out_5, dk_ctp_pig_is_out_6, dk_ctp_pig_is_out_7_8, dk_ctp_plant_trees, dk_ctp_plant_trees_autumn, dk_ctp_plough1_autumn, dk_ctp_plough2_autumn, dk_ctp_row_cultivation_autumn, dk_ctp_sleep_all_day, dk_ctp_sow_catch_crop1, dk_ctp_sow_catch_crop2, dk_ctp_sow_catch_crop3, dk_ctp_sow_catch_crop_11, dk_ctp_sow_cover_crop_autumn, dk_ctp_sow_inter_crops, dk_ctp_start, dk_ctp_stubble_harrow_autumn, dk_ctp_wait, DK_CTP_YEAR, Farm::DoIt(), Farm::DoIt_prob(), Farm::FA_Calcium(), Farm::FA_Manure(), Farm::FA_NPK(), Farm::FP_Calcium(), Farm::FP_Manure(), Farm::FP_NPK(), g_date, g_msg, LE::GetSoilType(), Calendar::GetYearNumber(), Farm::Harvest(), Farm::HerbicideTreat(), Farm::IsStockFarmer(), Crop::m_ev, Crop::m_farm, Crop::m_field, Crop::m_last_date, FarmEvent::m_lock, FarmEvent::m_todo, Farm::ManualWeeding(), Calendar::OldDays(), Farm::PigsAreOut(), Farm::PigsOut(), Farm::Pruning(), Farm::RowCultivation(), Farm::Shredding(), Crop::SimpleEvent(), Farm::SleepAllDay(), Crop::StartUpCrop(), Farm::StubbleHarrowing(), tos_LoamySand, tos_Sand, tos_SandyClayLoam, tos_SandyLoam, tov_DKChristmasTrees_Perm, MapErrorMsg::Warn(), and WARN_BUG.

SetUpFarmCategoryInformation()

void DK_ChristmasTrees_Perm::SetUpFarmCategoryInformation ( )

inline

                                        {
        const int elements = 2 + (dk_ctp_foobar - DK_CTP_BASE);
        m_base_elements_no = DK_CTP_BASE - 2;
 
        FarmManagementCategory catlist[elements] =
        {
        fmc_Others, // zero element unused but must be here 
        fmc_Others, //  dk_ctp_start = 1, // Compulsory, must always be 1 (one).
        fmc_Others, //  dk_ctp_sleep_all_day = DK_CTP_BASE,
        fmc_Cultivation,    //  dk_ctp_plough1_autumn,
        fmc_Cultivation,    //  dk_ctp_depth_plough_autumn,
        fmc_Cultivation,    //  dk_ctp_plough2_autumn,
        fmc_Cultivation,    //  dk_ctp_stubble_harrow_autumn,
        fmc_Others, //  dk_ctp_sow_cover_crop_autumn,
        fmc_Others, //  dk_ctp_plant_trees_autumn,
        fmc_Cultivation,    //  dk_ctp_row_cultivation_autumn,
        fmc_Cultivation,    //  dk_ctp_harrow_autumn,
        fmc_Cutting, //dk_ctp2e_crush_trees,
        fmc_Others, //dk_ctp2e_sow_inter_crops,
        fmc_Cultivation, // dk_ctp2e_harrow,
        fmc_Herbicide, //dk_ctp2e_herbicide,
        fmc_Others, // dk_ctp2e_sow_catch_crops,
        fmc_Others, // dk_ctp2e_plant_trees,
        fmc_Fertilizer, //dk_ctp2_ferti_clay_s2,
        fmc_Fertilizer, //dk_ctp2_ferti_sand_s2,
        fmc_Fertilizer, //dk_ctp2_ferti_clay_p2,
        fmc_Fertilizer, //dk_ctp2_ferti_sand_p2,
        fmc_Cultivation, //dk_ctp2_manual_weeding_2,
        fmc_Herbicide, //dk_ctp2_herbicide1_2,
        fmc_Herbicide, //dk_ctp2_herbicide2_2,
        fmc_Herbicide, //dk_ctp2_herbicide3_2,
        fmc_Fertilizer, //dk_ctp2_ferti_clay_s3_4,
        fmc_Fertilizer, //dk_ctp2_ferti_sand_s3_4,
        fmc_Fertilizer, //dk_ctp2_npk_clay_s3_4,
        fmc_Fertilizer, //dk_ctp2_npk_sand1_s3_4,
        fmc_Fertilizer, //dk_ctp2_npk_sand2_s3_4,
        fmc_Fertilizer, //dk_ctp2_ferti_clay_p3_4,
        fmc_Fertilizer, //dk_ctp2_ferti_sand_p3_4,
        fmc_Fertilizer, //dk_ctp2_npk_clay_p3_4,
        fmc_Fertilizer, //dk_ctp2_npk_sand1_p3_4,
        fmc_Fertilizer, //dk_ctp2_npk_sand2_p3_4,
        fmc_Cultivation, //dk_ctp2_manual_weeding_3_4,
        fmc_Herbicide, //dk_ctp2_herbicide1_3_4,
        fmc_Herbicide, //dk_ctp2_herbicide2_3_4,
        fmc_Herbicide, //dk_ctp2_herbicide3_3_4,
        fmc_Cutting, // dk_ctp2_manual_cutting_3_4
        fmc_Grazing, //dk_ctp2_grazing_3_4,
        fmc_Grazing, //dk_ctp2_pig_is_out_3_4,
        fmc_Others, //dk_ctp2_sow_catch_crop,
        fmc_Herbicide, //dk_ctp2_herbicide4,
        fmc_Fertilizer, //dk_ctp2_npk_s5,
        fmc_Fertilizer, //dk_ctp2_npk_sand_s5,
        fmc_Fertilizer, //dk_ctp2_npk_p5,
        fmc_Fertilizer, //dk_ctp2_npk_sand_p5,
        fmc_Grazing, //dk_ctp2_grazing_5,
        fmc_Grazing, //dk_ctp2_pig_is_out_5,
        fmc_Cultivation, //dk_ctp2_manual_weeding_5,
        fmc_Herbicide, //dk_ctp2_herbicide1_5,
        fmc_Herbicide, //dk_ctp2_herbicide2_5,
        fmc_Herbicide, //dk_ctp2_herbicide3_5,
        fmc_Cutting, //dk_ctp2_manual_cutting_5,
        fmc_Fertilizer, //dk_ctp3_npk1_s6,
        fmc_Fertilizer, //dk_ctp3_npk2_s6,
        fmc_Fertilizer, //dk_ctp3_calcium_s6,
        fmc_Fertilizer, //dk_ctp3_npk1_p6,
        fmc_Fertilizer, //dk_ctp3_npk2_p6,
        fmc_Fertilizer, //dk_ctp3_calcium_p6,
        fmc_Grazing, //dk_ctp3_grazing_6,
        fmc_Grazing, //dk_ctp3_pig_is_out_6,
        fmc_Cultivation, //dk_ctp3_manual_weeding_6,
        fmc_Herbicide, //dk_ctp3_herbicide1_6,
        fmc_Herbicide, //dk_ctp3_herbicide2_6,
        fmc_Herbicide, //dk_ctp3_herbicide3_6,
        fmc_Cutting, //dk_ctp3_manual_cutting_6,
        fmc_Fertilizer, //dk_ctp3_npk1_s7_8,
        fmc_Fertilizer, //dk_ctp3_npk2_s7_8,
        fmc_Fertilizer, //dk_ctp3_calcium_s7_8,
        fmc_Fertilizer, //dk_ctp3_npk1_p7_8,
        fmc_Fertilizer, //dk_ctp3_npk2_p7_8,
        fmc_Fertilizer, //dk_ctp3_calcium_p7_8,
        fmc_Grazing, //dk_ctp3_grazing_7_8,
        fmc_Grazing, //dk_ctp3_pig_is_out_7_8,
        fmc_Cultivation, //dk_ctp3_manual_weeding_7_8,
        fmc_Herbicide, //dk_ctp3_herbicide1_7_8,
        fmc_Herbicide, //dk_ctp3_herbicide2_7_8,
        fmc_Herbicide, //dk_ctp3_herbicide3_7_8,
        fmc_Cutting, //dk_ctp3_manual_cutting_7_8,
        fmc_Cutting, //dk_ctp3_manual_cutting2_7_8,
        fmc_Fertilizer, //dk_ctp3_npk1_s9_10,
        fmc_Fertilizer, //dk_ctp3_npk2_s9_10,
        fmc_Fertilizer, //dk_ctp3_calcium_s9_10,
        fmc_Fertilizer, //dk_ctp3_npk1_p9_10,
        fmc_Fertilizer, //dk_ctp3_npk2_p9_10,
        fmc_Fertilizer, //dk_ctp3_calcium_p9_10,
        fmc_Others, //  dk_ctp3_sow_catch_crop,
        fmc_Herbicide, //dk_ctp3_herbicide4,
        fmc_Cultivation, // dk_ctp3_manual_weeding_9_10,
        fmc_Herbicide, //dk_ctp3_herbicide1_9_10,
        fmc_Herbicide, //dk_ctp3_herbicide2_9_10,
        fmc_Herbicide, //dk_ctp3_herbicide3_9_10,
        fmc_Fertilizer, //dk_ctp2_npk1_s11,
        fmc_Fertilizer, //dk_ctp2_npk2_s11,
        fmc_Fertilizer, //dk_ctp2_calcium_s11,
        fmc_Fertilizer, //dk_ctp2_npk1_p11,
        fmc_Fertilizer, //dk_ctp2_npk2_p11,
        fmc_Fertilizer, //dk_ctp2_calcium_p11,
        fmc_Cultivation, //dk_ctp2_manual_weeding_11,
        fmc_Herbicide, //dk_ctp4_herbicide1,
        fmc_Herbicide, //dk_ctp4_herbicide2,
        fmc_Herbicide, //dk_ctp4_herbicide3,
        fmc_Others, //dk_ctp2_sow_catch_crop_11,
        fmc_Cutting, //dk_ctp2_manual_cutting_11,
        fmc_Harvest, //dk_ctp2_harvest,
        fmc_Others, //dk_ctp_wait
                // no foobar entry  
 
        };
        // Iterate over the catlist elements and copy them to vector                
        copy(begin(catlist), end(catlist), back_inserter(m_ManagementCategories));
 
    }

References DK_CTP_BASE, dk_ctp_foobar, fmc_Cultivation, fmc_Cutting, fmc_Fertilizer, fmc_Grazing, fmc_Harvest, fmc_Herbicide, fmc_Others, Crop::m_base_elements_no, and Crop::m_ManagementCategories.

Referenced by DK_ChristmasTrees_Perm().

---

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

• /builds/ALMaSS/ALMaSS_MIDox/Landscape/cropprogs/DK_ChristmasTrees_Perm.h
• /builds/ALMaSS/ALMaSS_MIDox/Landscape/cropprogs/DK_ChristmasTrees_Perm.cpp