File failed to load: https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/extensions/ams.js
ALMaSS  1.2 (after EcoStack, March 2024)
The Animal, Landscape and Man Simulation System
•All Classes Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
Public Member Functions | List of all members
NLGrassGrazed1 Class Reference

NLGrassGrazed1 class
. More...

#include <NLGrassGrazed1.h>

Inheritance diagram for NLGrassGrazed1:
Crop

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

NLGrassGrazed1 class
.

See NLGrassGrazed1.h::NLGrassGrazed1ToDo for a complete list of all possible events triggered codes by the TemporalGrassGrazed1 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

◆ NLGrassGrazed1()

NLGrassGrazed1::NLGrassGrazed1 ( TTypesOfVegetation  a_tov,
TTypesOfCrops  a_toc,
Landscape *  a_L 
)
inline
93  : Crop(a_tov, a_toc, a_L)
94  {
95  // When we start it off, the first possible date for a farm operation is 5th November
96  // This information is used by other crops when they decide how much post processing of
97  // the management is allowed after harvest before the next crop starts.
98  m_first_date=g_date->DayInYear( 30,11 );
99  m_forcespringpossible = true;
100  SetUpFarmCategoryInformation();
101  }

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

Member Function Documentation

◆ Do()

bool NLGrassGrazed1::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 m_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 - in this case conventional TemporalGrassGrazed1.

Reimplemented from Crop.

55 {
56  /******************** This block can be added to the top of all Crop::Do methods ***********************************************/
57  m_farm = a_farm;
58  m_field = a_field;
59  m_ev = a_ev;
60  bool done = false; // The boolean value done indicates when we are totally finished with this plan (i.e. it is set to true, m_farm, m_field).
61  bool flag = false;
62  int d1 = 0;
63  int noDates = 1;
64  TTypesOfVegetation l_tov = tov_NLGrassGrazed1;
65  int l_nextcropstartdate;
66  /**********************************************To Here *************************************************************************/
67 
68  // Depending what event has occured jump to the correct bit of code
69  switch (m_ev->m_todo)
70  {
71  case nl_gg1_start:
72  {
73  NL_GG1_CUT_DATE = 0;
74  NL_GG1_WATER_DATE = 0;
75  m_field->ClearManagementActionSum();
76 
77  m_last_date = g_date->DayInYear(31, 10); // Should match the last flexdate below
78  //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
79  std::vector<std::vector<int>> flexdates(1 + 1, std::vector<int>(2, 0));
80  // Set up the date management stuff
81  // Start and stop dates for all events after harvest
82  flexdates[0][1] = g_date->DayInYear(10, 10); // first possible day of finishing harvest - this is in effect day before the earliest date that a following crop can use
83 
84  flexdates[1][0] = -1; // This date will be moved back as far as necessary and potentially to flexdates 1 (start op 1)
85  flexdates[1][1] = g_date->DayInYear(31, 10); // This date will be moved back as far as necessary and potentially to flexdates 1 (end op 1) - straw chopping
86 
87  // Below if this is a spring crop use 365, otherwise set this to 0, second parameter is fixed, and the third is the start up operation in the first year
88  int isSpring = 0;
89  if (StartUpCrop(isSpring, flexdates, int(nl_gg1_spring_sow))) break;
90 
91  // End single block date checking code. Please see next line comment as well.
92  // Reinit d1 to first possible starting date.
93  d1 = g_date->OldDays() + g_date->DayInYear(1, 10) + isSpring;
94  // OK, let's go.
95  if (m_ev->m_forcespring) {
96  int day_num_shift = 365;
97  if (g_date->DayInYear() < 70) day_num_shift = 0;
98  if (m_farm->IsStockFarmer()) //Stock Farmer
99  {
100  SimpleEvent_(g_date->OldDays() + g_date->DayInYear(20, 2) + day_num_shift, nl_gg1_ferti_s1, false, m_farm, m_field);
101  }
102  else SimpleEvent_(g_date->OldDays() + g_date->DayInYear(20, 2) + day_num_shift, nl_gg1_ferti_p1, false, m_farm, m_field);
103  break;
104  }
105  else {
106  // Here we queue up the first event - this differs depending on whether we have field on snady or clay soils
107  SimpleEvent_(d1, nl_gg1_winter_plough, false, m_farm, m_field);
108  break;
109  }
110  break;
111  }
112  break;
113 
114  // This is the first real farm operation
115  case nl_gg1_winter_plough:
116  if (!m_farm->WinterPlough(m_field, 0.0, g_date->DayInYear(1, 12) - g_date->DayInYear())) {
117  SimpleEvent_(g_date->Date() + 1, nl_gg1_winter_plough, true, m_farm, m_field);
118  break;
119  }
120  SimpleEvent_(g_date->OldDays() + g_date->DayInYear(5, 12), nl_gg1_herbicide, false, m_farm, m_field);
121  break;
122  case nl_gg1_herbicide:
123  if (!m_farm->HerbicideTreat(m_field, 0.0, g_date->DayInYear(25, 12) - g_date->DayInYear())) {
124  SimpleEvent_(g_date->Date() + 1, nl_gg1_herbicide, true, m_farm, m_field);
125  break;
126  }
127  if (m_farm->IsStockFarmer()) //Stock Farmer
128  {
129  SimpleEvent_(g_date->OldDays() + g_date->DayInYear(20, 2) + 365, nl_gg1_ferti_s1, false, m_farm, m_field);
130  }
131  else SimpleEvent_(g_date->OldDays() + g_date->DayInYear(20, 2) + 365, nl_gg1_ferti_p1, false, m_farm, m_field);
132  break;
133  case nl_gg1_ferti_p1:
134  if (!m_farm->FP_Slurry(m_field, 0.0, g_date->DayInYear(20, 3) - g_date->DayInYear())) {
135  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p1, true, m_farm, m_field);
136  break;
137  }
138  SimpleEvent_(g_date->Date() + 1, nl_gg1_preseeding_cultivator, false, m_farm, m_field);
139  break;
140  case nl_gg1_ferti_s1:
141  if (!m_farm->FA_Slurry(m_field, 0.0, g_date->DayInYear(20, 3) - g_date->DayInYear())) {
142  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s1, true, m_farm, m_field);
143  break;
144  }
145  SimpleEvent_(g_date->Date() + 1, nl_gg1_preseeding_cultivator, false, m_farm, m_field);
146  break;
147  case nl_gg1_preseeding_cultivator:
148  if (!m_farm->PreseedingCultivator(m_field, 0.0, g_date->DayInYear(20, 3) - g_date->DayInYear())) {
149  SimpleEvent_(g_date->Date() + 1, nl_gg1_preseeding_cultivator, true, m_farm, m_field);
150  break;
151  }
152  SimpleEvent_(g_date->Date() + 1, nl_gg1_spring_sow, false, m_farm, m_field);
153  break;
154  case nl_gg1_spring_sow:
155  if (!m_farm->SpringSow(m_field, 0.0, g_date->DayInYear(20, 3) - g_date->DayInYear())) {
156  SimpleEvent_(g_date->Date() + 1, nl_gg1_spring_sow, true, m_farm, m_field);
157  break;
158  }
159  d1 = g_date->Date() + 7;
160  if (d1 < g_date->OldDays() + g_date->DayInYear(1, 3)) {
161  d1 = g_date->OldDays() + g_date->DayInYear(1, 3);
162  }
163  if (m_farm->IsStockFarmer()) //Stock Farmer
164  {
165  SimpleEvent_(d1, nl_gg1_ferti_s2, false, m_farm, m_field);
166  }
167  else SimpleEvent_(d1, nl_gg1_ferti_p2, false, m_farm, m_field);
168  break;
169  case nl_gg1_ferti_p2:
170  if (m_farm->DoIt_prob(0.90)) {
171  if (!m_farm->FP_NPK(m_field, 0.0, g_date->DayInYear(30, 3) - g_date->DayInYear())) {
172  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p2, true, m_farm, m_field);
173  break;
174  }
175  }
176  if (m_farm->DoIt_prob(0.50)) {
177  SimpleEvent_(g_date->OldDays() + g_date->DayInYear(25, 4), nl_gg1_cut_to_silage1, false, m_farm, m_field);
178  }
179  else SimpleEvent_(g_date->OldDays() + g_date->DayInYear(5, 4), nl_gg1_cattle_out, false, m_farm, m_field);
180  break;
181  case nl_gg1_ferti_s2:
182  if (m_farm->DoIt_prob(0.90)) {
183  if (!m_farm->FA_NPK(m_field, 0.0, g_date->DayInYear(30, 3) - g_date->DayInYear())) {
184  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s2, true, m_farm, m_field);
185  break;
186  }
187  }
188  if (m_farm->DoIt_prob(0.50)) {
189  SimpleEvent_(g_date->OldDays() + g_date->DayInYear(25, 4), nl_gg1_cut_to_silage1, false, m_farm, m_field);
190  }
191  else SimpleEvent_(g_date->OldDays() + g_date->DayInYear(5, 4), nl_gg1_cattle_out, false, m_farm, m_field);
192  break;
193  case nl_gg1_cut_to_silage1:
194  // At least 7 days from last watering and 21 from last application of fertilizer.
195  if (g_date->Date() < NL_GG1_WATER_DATE + 7) {
196  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage1, true, m_farm, m_field);
197  break;
198  }
199  else
200  {
201  if (!m_farm->CutToSilage(m_field, 0.0, g_date->DayInYear(10, 5) - g_date->DayInYear())) {
202  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage1, true, m_farm, m_field);
203  break;
204  }
205  NL_GG1_CUT_DATE = g_date->DayInYear();
206  if (m_farm->IsStockFarmer()) //Stock Farmer
207  {
208  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s3, false, m_farm, m_field);
209  }
210  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p3, false, m_farm, m_field);
211  // Start water thread
212  SimpleEvent_(g_date->Date() + 1, nl_gg1_watering, false, m_farm, m_field);
213  break;
214  }
215  break;
216 
217  case nl_gg1_ferti_s3:
218  if (!m_farm->FA_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
219  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s3, true, m_farm, m_field);
220  break;
221  }
222  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s4, false, m_farm, m_field);
223  break;
224  case nl_gg1_ferti_p3:
225  if (!m_farm->FP_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
226  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p3, true, m_farm, m_field);
227  break;
228  }
229  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p4, false, m_farm, m_field);
230  break;
231  case nl_gg1_ferti_s4:
232  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
233  {
234  if (!m_farm->FA_NPK(m_field, 0.0, g_date->DayInYear(20, 5) - g_date->DayInYear())) {
235  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s4, true, m_farm, m_field);
236  break;
237  }
238  }
239  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage2, false, m_farm, m_field);
240  break;
241  case nl_gg1_ferti_p4:
242  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
243  {
244  if (!m_farm->FP_NPK(m_field, 0.0, g_date->DayInYear(20, 5) - g_date->DayInYear())) {
245  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p4, true, m_farm, m_field);
246  break;
247  }
248  }
249  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage2, false, m_farm, m_field);
250  break;
251  case nl_gg1_cut_to_silage2:
252  // At least 7 days from last watering and 21 from last application of fertilizer.
253  if (g_date->Date() < NL_GG1_WATER_DATE + 7) {
254  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage2, true, m_farm, m_field);
255  break;
256  }
257  else
258  {
259  if (!m_farm->CutToSilage(m_field, 0.0, g_date->DayInYear(15, 6) - g_date->DayInYear())) {
260  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage2, true, m_farm, m_field);
261  break;
262  }
263  NL_GG1_CUT_DATE = g_date->DayInYear();
264  if (m_farm->IsStockFarmer()) //Stock Farmer
265  {
266  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s5, false, m_farm, m_field);
267  }
268  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p5, false, m_farm, m_field);
269  break;
270  }
271  break;
272  case nl_gg1_ferti_s5:
273  if (!m_farm->FA_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
274  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s5, true, m_farm, m_field);
275  break;
276  }
277  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s6, false, m_farm, m_field);
278  break;
279  case nl_gg1_ferti_p5:
280  if (!m_farm->FP_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
281  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p5, true, m_farm, m_field);
282  break;
283  }
284  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p6, false, m_farm, m_field);
285  break;
286  case nl_gg1_ferti_s6:
287  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
288  {
289  if (!m_farm->FA_NPK(m_field, 0.0, g_date->DayInYear(25, 6) - g_date->DayInYear())) {
290  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s6, true, m_farm, m_field);
291  break;
292  }
293  }
294  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage3, false, m_farm, m_field);
295  break;
296  case nl_gg1_ferti_p6:
297  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
298  {
299  if (!m_farm->FP_NPK(m_field, 0.0, g_date->DayInYear(25, 6) - g_date->DayInYear())) {
300  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p6, true, m_farm, m_field);
301  break;
302  }
303  }
304  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage3, false, m_farm, m_field);
305  break;
306  case nl_gg1_cut_to_silage3:
307  // At least 7 days from last watering and 21 from last application of fertilizer.
308  if (g_date->Date() < NL_GG1_WATER_DATE + 7) {
309  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage3, true, m_farm, m_field);
310  break;
311  }
312  else
313  {
314  if (!m_farm->CutToSilage(m_field, 0.0, g_date->DayInYear(25, 7) - g_date->DayInYear())) {
315  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage3, true, m_farm, m_field);
316  break;
317  }
318  NL_GG1_CUT_DATE = g_date->DayInYear();
319  if (m_farm->IsStockFarmer()) //Stock Farmer
320  {
321  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s7, false, m_farm, m_field);
322  }
323  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p7, false, m_farm, m_field);
324  break;
325  }
326  break;
327 
328  case nl_gg1_ferti_s7:
329  if (!m_farm->FA_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
330  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s7, true, m_farm, m_field);
331  break;
332  }
333  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s8, false, m_farm, m_field);
334  break;
335  case nl_gg1_ferti_p7:
336  if (!m_farm->FP_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
337  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p7, true, m_farm, m_field);
338  break;
339  }
340  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p8, false, m_farm, m_field);
341  break;
342  case nl_gg1_ferti_s8:
343  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
344  {
345  if (!m_farm->FA_NPK(m_field, 0.0, g_date->DayInYear(5, 8) - g_date->DayInYear())) {
346  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s8, true, m_farm, m_field);
347  break;
348  }
349  }
350  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage4, false, m_farm, m_field);
351  break;
352  case nl_gg1_ferti_p8:
353  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
354  {
355  if (!m_farm->FP_NPK(m_field, 0.0, g_date->DayInYear(5, 8) - g_date->DayInYear())) {
356  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p8, true, m_farm, m_field);
357  break;
358  }
359  }
360  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage4, false, m_farm, m_field);
361  break;
362  case nl_gg1_cut_to_silage4:
363  // At least 7 days from last watering and 21 from last application of fertilizer.
364  if (g_date->Date() < NL_GG1_WATER_DATE + 7) {
365  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage4, true, m_farm, m_field);
366  break;
367  }
368  else
369  {
370  if (!m_farm->CutToSilage(m_field, 0.0, g_date->DayInYear(31, 8) - g_date->DayInYear())) {
371  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage4, true, m_farm, m_field);
372  break;
373  }
374  NL_GG1_CUT_DATE = g_date->DayInYear();
375  if (m_farm->IsStockFarmer()) //Stock Farmer
376  {
377  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s9, false, m_farm, m_field);
378  }
379  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p9, false, m_farm, m_field);
380  break;
381  }
382  break;
383  case nl_gg1_ferti_s9:
384  if (!m_farm->FA_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
385  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s9, true, m_farm, m_field);
386  break;
387  }
388  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s10, false, m_farm, m_field);
389  break;
390  case nl_gg1_ferti_p9:
391  if (!m_farm->FP_Slurry(m_field, 0.0, (NL_GG1_CUT_DATE + 4) - g_date->DayInYear())) {
392  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p9, true, m_farm, m_field);
393  break;
394  }
395  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p10, false, m_farm, m_field);
396  break;
397  case nl_gg1_ferti_s10:
398  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
399  {
400  if (!m_farm->FA_NPK(m_field, 0.0, g_date->DayInYear(5, 9) - g_date->DayInYear())) {
401  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s10, true, m_farm, m_field);
402  break;
403  }
404  }
405  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage5, false, m_farm, m_field);
406  break;
407  case nl_gg1_ferti_p10:
408  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
409  {
410  if (!m_farm->FP_NPK(m_field, 0.0, g_date->DayInYear(5, 9) - g_date->DayInYear())) {
411  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p10, true, m_farm, m_field);
412  break;
413  }
414  }
415  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage5, false, m_farm, m_field);
416  break;
417  case nl_gg1_cut_to_silage5:
418  // At least 7 days from last watering and 21 from last application of fertilizer.
419  if (g_date->Date() < NL_GG1_WATER_DATE + 7) {
420  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage5, true, m_farm, m_field);
421  break;
422  }
423  else
424  {
425  if (m_ev->m_lock || m_farm->DoIt_prob(0.40))
426  {
427  if (!m_farm->CutToSilage(m_field, 0.0, m_field->GetMDates(0, 0) - g_date->DayInYear())) {
428  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage5, true, m_farm, m_field);
429  break;
430  }
431  NL_GG1_CUT_DATE = g_date->DayInYear();
432  }
433  if (m_farm->IsStockFarmer()) //Stock Farmer
434  {
435  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s12, false, m_farm, m_field);
436  }
437  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p12, false, m_farm, m_field);
438  break;
439  }
440  break;
441  case nl_gg1_ferti_s12:
442  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
443  {
444  if (!m_farm->FA_NPK(m_field, 0.0, m_field->GetMDates(1, 1) - g_date->DayInYear())) {
445  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s12, true, m_farm, m_field);
446  break;
447  }
448  }
449  done = true;
450  break;
451  case nl_gg1_ferti_p12:
452  if (m_ev->m_lock || m_farm->DoIt_prob(0.90))
453  {
454  if (!m_farm->FP_NPK(m_field, 0.0, m_field->GetMDates(1, 1) - g_date->DayInYear())) {
455  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p12, true, m_farm, m_field);
456  break;
457  }
458  }
459  done = true;
460  break;
461  case nl_gg1_cattle_out:
462  if (!m_farm->CattleOut(m_field, 0.0, g_date->DayInYear(30, 4) - g_date->DayInYear())) {
463  SimpleEvent_(g_date->Date() + 1, nl_gg1_cattle_out, true, m_farm, m_field);
464  break;
465  }
466  // Keep them out there
467  SimpleEvent_(g_date->Date(), nl_gg1_cattle_is_out, false, m_farm, m_field);
468  break;
469 
470  case nl_gg1_cattle_is_out: // Keep the cattle out there
471  // CattleIsOut() returns false if it is not time to stop grazing
472  if (!m_farm->CattleIsOut(m_field, 0.0, g_date->DayInYear(31, 8) - g_date->DayInYear(), g_date->DayInYear(31, 8))) {
473  SimpleEvent_(g_date->Date() + 1, nl_gg1_cattle_is_out, false, m_farm, m_field);
474  break;
475  }
476  if (m_farm->IsStockFarmer()) //Stock Farmer
477  {
478  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s11, false, m_farm, m_field);
479  }
480  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p11, false, m_farm, m_field);
481  break;
482 
483  case nl_gg1_ferti_s11:
484  if (!m_farm->FA_Slurry(m_field, 0.0, g_date->DayInYear(5, 9) - g_date->DayInYear())) {
485  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s11, true, m_farm, m_field);
486  break;
487  }
488  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage6, false, m_farm, m_field);
489  break;
490  case nl_gg1_ferti_p11:
491  if (!m_farm->FP_Slurry(m_field, 0.0, g_date->DayInYear(5, 9) - g_date->DayInYear())) {
492  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p11, true, m_farm, m_field);
493  break;
494  }
495  SimpleEvent_(g_date->Date() + 21, nl_gg1_cut_to_silage6, false, m_farm, m_field);
496  break;
497  case nl_gg1_cut_to_silage6:
498  if (!m_farm->CutToSilage(m_field, 0.0, m_field->GetMDates(1, 0) - g_date->DayInYear())) {
499  SimpleEvent_(g_date->Date() + 1, nl_gg1_cut_to_silage6, true, m_farm, m_field);
500  break;
501  }
502  if (m_farm->IsStockFarmer()) //Stock Farmer
503  {
504  SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_s12, false, m_farm, m_field);
505  }
506  else SimpleEvent_(g_date->Date() + 1, nl_gg1_ferti_p12, false, m_farm, m_field);
507  break;
508  case nl_gg1_watering:
509  if (m_ev->m_lock || m_farm->DoIt_prob(0.40))
510  {
511  if (g_date->Date() < NL_GG1_CUT_DATE + 3) {
512  // Too close to silage cutting, so try again tomorrow.
513  SimpleEvent_(g_date->Date() + 1, nl_gg1_watering, true, m_farm, m_field);
514  }
515  else
516  {
517  if (!m_farm->Water(m_field, 0.0, g_date->DayInYear(31, 8) - g_date->DayInYear())) {
518  SimpleEvent_(g_date->Date() + 1, nl_gg1_watering, true, m_farm, m_field);
519  break;
520  }
521  NL_GG1_WATER_DATE = g_date->Date();
522  }
523  }
524  // End of thread
525  break;
526  default:
527  g_msg->Warn(WARN_BUG, "NLGrassGrazed1::Do(): "
528  "Unknown event type! ", "");
529  exit(1);
530  }
531  return done;
532 }

References Farm::CattleIsOut(), Farm::CattleOut(), LE::ClearManagementActionSum(), Farm::CutToSilage(), Calendar::Date(), Calendar::DayInYear(), Farm::DoIt_prob(), Farm::FA_NPK(), Farm::FA_Slurry(), Farm::FP_NPK(), Farm::FP_Slurry(), g_date, g_msg, LE::GetMDates(), Farm::HerbicideTreat(), Farm::IsStockFarmer(), Crop::m_ev, Crop::m_farm, Crop::m_field, FarmEvent::m_forcespring, Crop::m_last_date, FarmEvent::m_lock, FarmEvent::m_todo, nl_gg1_cattle_is_out, nl_gg1_cattle_out, NL_GG1_CUT_DATE, nl_gg1_cut_to_silage1, nl_gg1_cut_to_silage2, nl_gg1_cut_to_silage3, nl_gg1_cut_to_silage4, nl_gg1_cut_to_silage5, nl_gg1_cut_to_silage6, nl_gg1_ferti_p1, nl_gg1_ferti_p10, nl_gg1_ferti_p11, nl_gg1_ferti_p12, nl_gg1_ferti_p2, nl_gg1_ferti_p3, nl_gg1_ferti_p4, nl_gg1_ferti_p5, nl_gg1_ferti_p6, nl_gg1_ferti_p7, nl_gg1_ferti_p8, nl_gg1_ferti_p9, nl_gg1_ferti_s1, nl_gg1_ferti_s10, nl_gg1_ferti_s11, nl_gg1_ferti_s12, nl_gg1_ferti_s2, nl_gg1_ferti_s3, nl_gg1_ferti_s4, nl_gg1_ferti_s5, nl_gg1_ferti_s6, nl_gg1_ferti_s7, nl_gg1_ferti_s8, nl_gg1_ferti_s9, nl_gg1_herbicide, nl_gg1_preseeding_cultivator, nl_gg1_spring_sow, nl_gg1_start, NL_GG1_WATER_DATE, nl_gg1_watering, nl_gg1_winter_plough, Calendar::OldDays(), Farm::PreseedingCultivator(), Crop::SimpleEvent_(), Farm::SpringSow(), Crop::StartUpCrop(), tov_NLGrassGrazed1, MapErrorMsg::Warn(), WARN_BUG, Farm::Water(), and Farm::WinterPlough().

◆ SetUpFarmCategoryInformation()

void NLGrassGrazed1::SetUpFarmCategoryInformation ( )
inline
102  {
103  const int elements = 2 + (nl_gg1_foobar - NLGRASSGRAZED1_BASE);
104  m_base_elements_no = NLGRASSGRAZED1_BASE - 2;
105 
106  FarmManagementCategory catlist[elements] =
107  {
108  fmc_Others, // zero element unused but must be here
109  fmc_Others,//nl_gg1_start = 1, // Compulsory, must always be 1 (one).
110  fmc_Others,//nl_gg1_sleep_all_day = NLGRASSGRAZED1_BASE,
111  fmc_Cultivation,//nl_gg1_winter_plough,
112  fmc_Herbicide,//nl_gg1_herbicide,
113  fmc_Fertilizer,//nl_gg1_ferti_p1,
114  fmc_Fertilizer,//nl_gg1_ferti_s1,
115  fmc_Cultivation,//nl_gg1_preseeding_cultivator,
116  fmc_Others,//nl_gg1_spring_sow,
117  fmc_Fertilizer,//nl_gg1_ferti_p2,
118  fmc_Fertilizer,//nl_gg1_ferti_s2,
119  fmc_Cutting,//nl_gg1_cut_to_silage1,
120  fmc_Cutting,//nl_gg1_cut_to_silage2,
121  fmc_Cutting,//nl_gg1_cut_to_silage3,
122  fmc_Cutting,//nl_gg1_cut_to_silage4,
123  fmc_Cutting,//nl_gg1_cut_to_silage5,
124  fmc_Cutting,//nl_gg1_cut_to_silage6,
125  fmc_Fertilizer,//nl_gg1_ferti_p3,
126  fmc_Fertilizer,//nl_gg1_ferti_s3,
127  fmc_Fertilizer,//nl_gg1_ferti_p4,
128  fmc_Fertilizer,//nl_gg1_ferti_s4,
129  fmc_Fertilizer,//nl_gg1_ferti_p5,
130  fmc_Fertilizer,//nl_gg1_ferti_s5,
131  fmc_Fertilizer,//nl_gg1_ferti_p6,
132  fmc_Fertilizer,//nl_gg1_ferti_s6,
133  fmc_Fertilizer,//nl_gg1_ferti_p7,
134  fmc_Fertilizer,//nl_gg1_ferti_s7,
135  fmc_Fertilizer,//nl_gg1_ferti_p8,
136  fmc_Fertilizer,//nl_gg1_ferti_s8,
137  fmc_Fertilizer,//nl_gg1_ferti_p9,
138  fmc_Fertilizer, //nl_gg1_ferti_s9,
139  fmc_Fertilizer,//nl_gg1_ferti_p10,
140  fmc_Fertilizer,//nl_gg1_ferti_s10,
141  fmc_Fertilizer,//nl_gg1_ferti_p11,
142  fmc_Fertilizer,//nl_gg1_ferti_s11,
143  fmc_Fertilizer,//nl_gg1_ferti_p12,
144  fmc_Fertilizer,//nl_gg1_ferti_s12,
145  fmc_Watering,//nl_gg1_watering,
146  fmc_Grazing,//nl_gg1_cattle_out,
147  fmc_Grazing//nl_gg1_cattle_is_out,
148 
149 
150  };
151  // Iterate over the catlist elements and copy them to vector
152  copy(begin(catlist), end(catlist), back_inserter(m_ManagementCategories));
153 
154  }

References fmc_Cultivation, fmc_Cutting, fmc_Fertilizer, fmc_Grazing, fmc_Herbicide, fmc_Others, fmc_Watering, Crop::m_base_elements_no, Crop::m_ManagementCategories, nl_gg1_foobar, and NLGRASSGRAZED1_BASE.

Referenced by NLGrassGrazed1().

The documentation for this class was generated from the following files:
LE::GetMDates
int GetMDates(int a, int b)
Definition: Elements.h:405
FarmEvent::m_forcespring
bool m_forcespring
Definition: Farm.h:392
Farm::FA_Slurry
virtual bool FA_Slurry(LE *a_field, double a_user, int a_days)
Spready slurry on a_field owned by an stock farmer.
Definition: FarmFuncs.cpp:1067
Farm::PreseedingCultivator
virtual bool PreseedingCultivator(LE *a_field, double a_user, int a_days)
Carry out preseeding cultivation on a_field (tilling set including cultivator and string roller to co...
Definition: FarmFuncs.cpp:312
NLGrassGrazed1::SetUpFarmCategoryInformation
void SetUpFarmCategoryInformation()
Definition: NLGrassGrazed1.h:102
nl_gg1_ferti_p4
Definition: NLGrassGrazed1.h:56
Farm::HerbicideTreat
virtual bool HerbicideTreat(LE *a_field, double a_user, int a_days)
Apply herbicide to a_field.
Definition: FarmFuncs.cpp:2025
nl_gg1_ferti_s3
Definition: NLGrassGrazed1.h:55
Farm::IsStockFarmer
bool IsStockFarmer(void)
Definition: Farm.h:961
nl_gg1_ferti_p2
Definition: NLGrassGrazed1.h:46
nl_gg1_cut_to_silage3
Definition: NLGrassGrazed1.h:50
FarmEvent::m_lock
bool m_lock
Definition: Farm.h:384
nl_gg1_preseeding_cultivator
Definition: NLGrassGrazed1.h:44
Farm::CattleIsOut
virtual bool CattleIsOut(LE *a_field, double a_user, int a_days, int a_max)
Generate a 'cattle_out' event for every day the cattle are on a_field.
Definition: FarmFuncs.cpp:2470
LE::ClearManagementActionSum
void ClearManagementActionSum()
clears the management action counters
Definition: Elements.h:247
Farm::FP_NPK
virtual bool FP_NPK(LE *a_field, double a_user, int a_days)
Apply NPK fertilizer, on a_field owned by an arable farmer.
Definition: FarmFuncs.cpp:645
Farm::CutToSilage
virtual bool CutToSilage(LE *a_field, double a_user, int a_days)
Cut vegetation for silage on a_field.
Definition: FarmFuncs.cpp:1644
Farm::DoIt_prob
bool DoIt_prob(double a_probability)
Return chance out of 0 to 1.
Definition: Farm.cpp:864
nl_gg1_ferti_s11
Definition: NLGrassGrazed1.h:71
g_date
class Calendar * g_date
Definition: Calendar.cpp:37
fmc_Herbicide
Definition: LandscapeFarmingEnums.h:1006
NL_GG1_CUT_DATE
#define NL_GG1_CUT_DATE
A flag used to indicate autumn ploughing status.
Definition: NLGrassGrazed1.h:28
Farm::SpringSow
virtual bool SpringSow(LE *a_field, double a_user, int a_days, double a_seed_coating_amount=-1, PlantProtectionProducts a_ppp=ppp_foobar)
Carry out a sowing event in the spring on a_field.
Definition: FarmFuncs.cpp:501
Crop::m_base_elements_no
int m_base_elements_no
Definition: Farm.h:505
nl_gg1_ferti_p6
Definition: NLGrassGrazed1.h:60
Crop::m_first_date
int m_first_date
Definition: Farm.h:501
Farm::FA_NPK
virtual bool FA_NPK(LE *a_field, double a_user, int a_days)
Apply NPK fertilizer to a_field owned by an stock farmer.
Definition: FarmFuncs.cpp:982
nl_gg1_foobar
Definition: NLGrassGrazed1.h:77
nl_gg1_ferti_s1
Definition: NLGrassGrazed1.h:43
nl_gg1_winter_plough
Definition: NLGrassGrazed1.h:40
fmc_Cutting
Definition: LandscapeFarmingEnums.h:1009
fmc_Fertilizer
Definition: LandscapeFarmingEnums.h:1004
nl_gg1_ferti_s12
Definition: NLGrassGrazed1.h:73
nl_gg1_herbicide
Definition: NLGrassGrazed1.h:41
nl_gg1_cut_to_silage1
Definition: NLGrassGrazed1.h:48
NLGRASSGRAZED1_BASE
#define NLGRASSGRAZED1_BASE
Definition: NLGrassGrazed1.h:24
Calendar::Date
long Date(void)
Definition: Calendar.h:57
fmc_Cultivation
Definition: LandscapeFarmingEnums.h:1008
nl_gg1_ferti_s7
Definition: NLGrassGrazed1.h:63
nl_gg1_ferti_s4
Definition: NLGrassGrazed1.h:57
fmc_Others
Definition: LandscapeFarmingEnums.h:1003
nl_gg1_ferti_s8
Definition: NLGrassGrazed1.h:65
nl_gg1_ferti_p5
Definition: NLGrassGrazed1.h:58
fmc_Watering
Definition: LandscapeFarmingEnums.h:1011
Calendar::OldDays
long OldDays(void)
Definition: Calendar.h:60
nl_gg1_ferti_s10
Definition: NLGrassGrazed1.h:69
nl_gg1_start
Definition: NLGrassGrazed1.h:38
nl_gg1_ferti_p9
Definition: NLGrassGrazed1.h:66
MapErrorMsg::Warn
void Warn(MapErrorState a_level, std::string a_msg1, std::string a_msg2)
Definition: MapErrorMsg.cpp:69
nl_gg1_ferti_p12
Definition: NLGrassGrazed1.h:72
nl_gg1_cut_to_silage6
Definition: NLGrassGrazed1.h:53
Crop::StartUpCrop
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 a...
Definition: Farm.cpp:652
nl_gg1_cut_to_silage4
Definition: NLGrassGrazed1.h:51
nl_gg1_ferti_p11
Definition: NLGrassGrazed1.h:70
nl_gg1_ferti_p10
Definition: NLGrassGrazed1.h:68
NL_GG1_WATER_DATE
#define NL_GG1_WATER_DATE
Definition: NLGrassGrazed1.h:29
Crop::m_farm
Farm * m_farm
Definition: Farm.h:498
Crop::m_field
LE * m_field
Definition: Farm.h:499
nl_gg1_cattle_out
Definition: NLGrassGrazed1.h:75
nl_gg1_ferti_s2
Definition: NLGrassGrazed1.h:47
Crop::m_ManagementCategories
vector< FarmManagementCategory > m_ManagementCategories
Holds the translation between the farm operation enum for each crop and the farm management category ...
Definition: Farm.h:530
nl_gg1_ferti_p7
Definition: NLGrassGrazed1.h:62
tov_NLGrassGrazed1
Definition: LandscapeFarmingEnums.h:259
FarmEvent::m_todo
int m_todo
Definition: Farm.h:388
Farm::FP_Slurry
virtual bool FP_Slurry(LE *a_field, double a_user, int a_days)
Apply slurry to a_field owned by an arable farmer.
Definition: FarmFuncs.cpp:823
nl_gg1_cattle_is_out
Definition: NLGrassGrazed1.h:76
Farm::Water
virtual bool Water(LE *a_field, double a_user, int a_days)
Carry out a watering on a_field.
Definition: FarmFuncs.cpp:1330
Crop::m_last_date
int m_last_date
Definition: Farm.h:503
nl_gg1_ferti_p3
Definition: NLGrassGrazed1.h:54
g_msg
MapErrorMsg * g_msg
Definition: MapErrorMsg.cpp:41
fmc_Grazing
Definition: LandscapeFarmingEnums.h:1010
TTypesOfVegetation
TTypesOfVegetation
Values that represent the types of vegetation that are represented in ALMaSS.
Definition: LandscapeFarmingEnums.h:192
nl_gg1_cut_to_silage5
Definition: NLGrassGrazed1.h:52
nl_gg1_ferti_s9
Definition: NLGrassGrazed1.h:67
Farm::WinterPlough
virtual bool WinterPlough(LE *a_field, double a_user, int a_days)
Carry out a ploughing event in the winter on a_field.
Definition: FarmFuncs.cpp:395
nl_gg1_ferti_p8
Definition: NLGrassGrazed1.h:64
nl_gg1_ferti_s5
Definition: NLGrassGrazed1.h:59
nl_gg1_cut_to_silage2
Definition: NLGrassGrazed1.h:49
Calendar::DayInYear
int DayInYear(void)
Definition: Calendar.h:58
nl_gg1_spring_sow
Definition: NLGrassGrazed1.h:45
Crop::Crop
Crop(TTypesOfVegetation a_tov, TTypesOfCrops a_toc, Landscape *a_L)
Definition: Farm.cpp:733
nl_gg1_ferti_p1
Definition: NLGrassGrazed1.h:42
Crop::m_forcespringpossible
bool m_forcespringpossible
Used to signal that the crop can be forced to start in spring.
Definition: Farm.h:508
nl_gg1_watering
Definition: NLGrassGrazed1.h:74
Crop::m_ev
FarmEvent * m_ev
Definition: Farm.h:500
Farm::CattleOut
virtual bool CattleOut(LE *a_field, double a_user, int a_days)
Start a grazing event on a_field today.
Definition: FarmFuncs.cpp:2368
WARN_BUG
Definition: MapErrorMsg.h:34
FarmManagementCategory
FarmManagementCategory
Definition: LandscapeFarmingEnums.h:1001
Crop::SimpleEvent_
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.
Definition: Farm.cpp:751
nl_gg1_ferti_s6
Definition: NLGrassGrazed1.h:61