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
DK_OOrchardCrop_Perm Class Reference

DK_OOrchardCrop_Perm class
. More...

#include <DK_OOrchardCrop_Perm.h>

Inheritance diagram for DK_OOrchardCrop_Perm:
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...
 
 DK_OOrchardCrop_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_OOrchardCrop_Perm class
.

See DK_OOrchardCrop_Perm.h::DK_OOrchardCrop_PermToDo for a complete list of all possible events triggered codes by the 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_OOrchardCrop_Perm()

DK_OOrchardCrop_Perm::DK_OOrchardCrop_Perm ( TTypesOfVegetation  a_tov,
TTypesOfCrops  a_toc,
Landscape *  a_L 
)
inline
103  : Crop(a_tov, a_toc, a_L)
104  {
105  // When we start it off, the first possible date for a farm operation is ...
106  // This information is used by other crops when they decide how much post processing of
107  // the management is allowed after harvest before the next crop starts.
108  m_first_date=g_date->DayInYear( 30,4 );
109  SetUpFarmCategoryInformation();
110  }

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

Member Function Documentation

◆ Do()

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

59 {
60  m_farm = a_farm;
61  m_field = a_field;
62  m_ev = a_ev;
63  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).
64  bool flag = false;
65  int d1 = 0;
66  int noDates = 1;
67  TTypesOfVegetation l_tov = tov_DKOOrchardCrop_Perm;
68  // Depending what event has occured jump to the correct bit of code
69  switch (m_ev->m_todo)
70  {
71  case dk_oop_start:
72  {
73  // dk_obfp1_start just sets up all the starting conditions and reference dates that are needed to start a dk_obfp1
74 
75  DK_OOP_YEARS_AFTER_PLANT = 0;
76  DK_OOP_EST_YEAR = false;
77 
78 
79  a_field->ClearManagementActionSum();
80 
81  m_last_date = g_date->DayInYear(31, 12); // Should match the last flexdate below
82  //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
83  std::vector<std::vector<int>> flexdates(1 + 1, std::vector<int>(2, 0));
84  // Set up the date management stuff
85  // Start and stop dates for all events after harvest
86  flexdates[0][1] = g_date->DayInYear(31, 12); // last possible day of cutting orch
87  // Now these are done in pairs, start & end for each operation. If its not used then -1
88  flexdates[1][0] = -1; // This date will be moved back as far as necessary and potentially to flexdates 1 (start op 1)
89  flexdates[1][1] = -1; // This date will be moved back as far as necessary and potentially to flexdates 1 (end op 1)
90 
91  // 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
92  int isSpring = 365;
93  if (StartUpCrop(isSpring, flexdates, int(dk_oop_spring_plough))) break;
94 
95  // End single block date checking code. Please see next line comment as well.
96  // Reinit d1 to first possible starting date.
97  // Here we queue up the first event
98  //Each field has assign randomly a DK_ooap_YEARS_AFTER_PLANT
99 
100  if ((DK_OOP_YEARS_AFTER_PLANT + g_date->GetYearNumber()) % 1 == 1)
101  {
102  d1 = g_date->OldDays() + g_date->DayInYear(1, 3) + isSpring;
103  SimpleEvent(d1, dk_oop_spring_plough, false);
104  }
105  else if ((DK_OOP_YEARS_AFTER_PLANT + g_date->GetYearNumber()) % 1 == 0)
106  {
107  d1 = g_date->OldDays() + g_date->DayInYear(1, 1) + isSpring;
108  SimpleEvent(d1, dk_oop_sleep_all_day, false);
109  }
110  break;
111 
112  }
113  break;
114 
115  // LKM: This is the first real farm operation
116  case dk_oop_spring_plough:
117  if (m_ev->m_lock || m_farm->DoIt_prob(1.00)) {
118  if (!m_farm->SpringPlough(m_field, 0.0, g_date->DayInYear(30, 4) - g_date->DayInYear())) {
119  SimpleEvent(g_date->Date() + 1, dk_oop_spring_plough, true);
120  break;
121  }
122  DK_OOP_EST_YEAR = true; // remember if est year
123  }
124  SimpleEvent(g_date->Date()+1, dk_oop_stubble_harrow1, false);
125  break;
126  case dk_oop_stubble_harrow1:
127  if (m_ev->m_lock || m_farm->DoIt_prob(1.00))
128  {
129  if (!a_farm->StubbleHarrowing(m_field, 0.0, g_date->DayInYear(5, 5) - g_date->DayInYear())) {
130  SimpleEvent(g_date->Date() + 1, dk_oop_stubble_harrow1, true);
131  break;
132  }
133  }
134  SimpleEvent(g_date->Date()+1, dk_oop_stubble_harrow2, false);
135  break;
136  case dk_oop_stubble_harrow2:
137  if (m_ev->m_lock || m_farm->DoIt_prob(0.50))
138  {
139  if (!a_farm->StubbleHarrowing(m_field, 0.0, g_date->DayInYear(10, 5) - g_date->DayInYear())) {
140  SimpleEvent(g_date->Date() + 1, dk_oop_stubble_harrow2, true);
141  break;
142  }
143  }
144  if (a_farm->IsStockFarmer()) {
145  SimpleEvent(g_date->Date() + 1, dk_oop_manure1_s, false);
146  break;
147  }
148  else SimpleEvent(g_date->Date() + 1, dk_oop_manure1_p, false);
149  break;
150  case dk_oop_manure1_s:
151  if (!a_farm->FA_Manure(m_field, 0.0, g_date->DayInYear(15, 5) - g_date->DayInYear())) {
152  SimpleEvent(g_date->Date() + 1, dk_oop_manure1_s, true);
153  break;
154  }
155  SimpleEvent(g_date->Date() + 1, dk_oop_water1, false);
156  break;
157 
158  case dk_oop_manure1_p:
159  if (!a_farm->FP_Manure(m_field, 0.0, g_date->DayInYear(15, 5) - g_date->DayInYear())) {
160  SimpleEvent(g_date->Date() + 1, dk_oop_manure1_p, true);
161  break;
162  }
163  SimpleEvent(g_date->Date() + 1, dk_oop_water1, false);
164  break;
165  case dk_oop_water1:
166  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(20, 5) - g_date->DayInYear())) {
167  SimpleEvent(g_date->Date() + 1, dk_oop_water1, true);
168  break;
169  }
170  SimpleEvent(g_date->Date()+1, dk_oop_subsoiler, false);
171  break;
172  case dk_oop_subsoiler:
173  if (!a_farm->DeepPlough(m_field, 0.0, g_date->DayInYear(25, 5) - g_date->DayInYear())) {
174  SimpleEvent(g_date->Date() + 1, dk_oop_subsoiler, true);
175  break;
176  }
177  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_oop_planting, false);
178  break;
179  case dk_oop_planting:
180  if (!a_farm->SpringSow(m_field, 0.0, g_date->DayInYear(30, 5) - g_date->DayInYear())) {
181  SimpleEvent(g_date->Date() + 1, dk_oop_planting, true);
182  break;
183  }
184  SimpleEvent(g_date->Date(), dk_oop_sow_grass, false); // sow thread
185  SimpleEvent(g_date->Date(), dk_oop_manual_cutting5, false); // cutting thread
186  break;
187 
188  case dk_oop_sow_grass:
189  if (!a_farm->SpringSow(m_field, 0.0, g_date->DayInYear(30, 5) - g_date->DayInYear())) {
190  SimpleEvent(g_date->Date() + 1, dk_oop_sow_grass, true);
191  break;
192  }
193  break; // end of thread
194 
195  // start of years after planting year:
196  case dk_oop_sleep_all_day:
197  if (!a_farm->SleepAllDay(m_field, 0.0, g_date->DayInYear(31, 1) - g_date->DayInYear())) {
198  SimpleEvent(g_date->Date() + 1, dk_oop_sleep_all_day, true);
199  break;
200  }
201  SimpleEvent(g_date->Date(), dk_oop_manual_cutting1, false);
202  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 2), dk_oop_fungicide5, false);
203  break;
204 
205  case dk_oop_fungicide5:
206  if (!a_farm->OrganicFungicide(m_field, 0.0, g_date->DayInYear(31, 5) - g_date->DayInYear())) {
207  SimpleEvent(g_date->Date() + 1, dk_oop_fungicide5, true);
208  break;
209  }
210  break;
211 
212  case dk_oop_manual_cutting1:
213  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 1) - g_date->DayInYear())) {
214  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting1, true);
215  break;
216  }
217  if (a_farm->IsStockFarmer()) {
218  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting2, false); // thread for manual cutting (once a month)
219  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 3), dk_oop_manure2_s, false); // main thread
220  SimpleEvent(g_date->OldDays() + g_date->DayInYear(20, 3), dk_oop_copper_s, false); // fertilizer thread
221  SimpleEvent(g_date->OldDays() + g_date->DayInYear(20, 3), dk_oop_fungicide1, false); // pesticide thread
222  break;
223  }
224  else SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting2, false); // thread for manual cutting (once a month)
225  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 3), dk_oop_manure2_p, false); // main thread
226  SimpleEvent(g_date->OldDays() + g_date->DayInYear(20, 3), dk_oop_copper_p, false); // fertilizer thread
227  SimpleEvent(g_date->OldDays() + g_date->DayInYear(20, 3), dk_oop_fungicide1, false); // pesticide thread
228  break;
229  case dk_oop_manual_cutting2:
230  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(28, 2) - g_date->DayInYear())) {
231  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting2, true);
232  break;
233  }
234  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting3, false);
235  break;
236  case dk_oop_manual_cutting3:
237  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 3) - g_date->DayInYear())) {
238  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting3, true);
239  break;
240  }
241  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting4, false);
242  break;
243  case dk_oop_manual_cutting4:
244  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(30, 4) - g_date->DayInYear())) {
245  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting4, true);
246  break;
247  }
248  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting5, false);
249  break;
250  case dk_oop_manual_cutting5:
251  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 5) - g_date->DayInYear())) {
252  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting5, true);
253  break;
254  }
255  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting6, false);
256  break;
257  case dk_oop_manual_cutting6:
258  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(30, 6) - g_date->DayInYear())) {
259  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting6, true);
260  break;
261  }
262  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting7, false);
263  break;
264  case dk_oop_manual_cutting7:
265  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 7) - g_date->DayInYear())) {
266  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting7, true);
267  break;
268  }
269  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting8, false);
270  break;
271  case dk_oop_manual_cutting8:
272  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 8) - g_date->DayInYear())) {
273  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting8, true);
274  break;
275  }
276  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting9, false);
277  break;
278  case dk_oop_manual_cutting9:
279  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(30, 9) - g_date->DayInYear())) {
280  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting9, true);
281  break;
282  }
283  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting10, false);
284  break;
285  case dk_oop_manual_cutting10:
286  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 10) - g_date->DayInYear())) {
287  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting10, true);
288  break;
289  }
290  SimpleEvent(g_date->Date() + 25, dk_oop_manual_cutting11, false);
291  break;
292  case dk_oop_manual_cutting11:
293  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(30, 11) - g_date->DayInYear())) {
294  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting11, true);
295  break;
296  }
297  if (DK_OOP_EST_YEAR == true)
298  {
299  done = true;
300  break;
301  }
302  break;
303  // end of cutting thread
304  // fertilizer thread:
305  case dk_oop_copper_s:
306  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
307  if (!a_farm->FA_Cu(m_field, 0.0, g_date->DayInYear(31, 3) - g_date->DayInYear())) {
308  SimpleEvent(g_date->Date() + 1, dk_oop_copper_s, true);
309  break;
310  }
311  }
312  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 5), dk_oop_boron_s, false);
313  break;
314  case dk_oop_boron_s:
315  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
316  if (!a_farm->FA_Boron(m_field, 0.0, g_date->DayInYear(31, 5) - g_date->DayInYear())) {
317  SimpleEvent(g_date->Date() + 1, dk_oop_boron_s, true);
318  break;
319  }
320  }
321  break;
322  // end of fertilizer thread
323  case dk_oop_copper_p:
324  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
325  if (!a_farm->FP_Cu(m_field, 0.0, g_date->DayInYear(31, 3) - g_date->DayInYear())) {
326  SimpleEvent(g_date->Date() + 1, dk_oop_copper_p, true);
327  break;
328  }
329  }
330  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 5), dk_oop_boron_p, false);
331  break;
332  case dk_oop_boron_p:
333  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
334  if (!a_farm->FP_Boron(m_field, 0.0, g_date->DayInYear(31, 5) - g_date->DayInYear())) {
335  SimpleEvent(g_date->Date() + 1, dk_oop_boron_p, true);
336  break;
337  }
338  }
339  break;
340  // end of fertilizer thread
341  // pesticide thread:
342  case dk_oop_fungicide1:
343  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
344  if (!a_farm->OrganicFungicide(m_field, 0.0, g_date->DayInYear(31, 3) - g_date->DayInYear())) {
345  SimpleEvent(g_date->Date() + 1, dk_oop_fungicide1, true);
346  break;
347  }
348  }
349  SimpleEvent(g_date->OldDays() + g_date->DayInYear(25, 4), dk_oop_insecticide, false);
350  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 5), dk_oop_fungicide2, false);
351  break;
352 
353  case dk_oop_insecticide:
354  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
355  if (!a_farm->OrganicInsecticide(m_field, 0.0, g_date->DayInYear(5, 5) - g_date->DayInYear())) {
356  SimpleEvent(g_date->Date() + 1, dk_oop_insecticide, true);
357  break;
358  }
359  }
360  break;
361 
362  case dk_oop_fungicide2:
363  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
364  if (!a_farm->OrganicFungicide(m_field, 0.0, g_date->DayInYear(25, 6) - g_date->DayInYear())) {
365  SimpleEvent(g_date->Date() + 1, dk_oop_fungicide2, true);
366  break;
367  }
368  }
369  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_oop_fungicide3, false);
370  break;
371 
372  case dk_oop_fungicide3:
373  if (m_ev->m_lock || m_farm->DoIt_prob(0.10)) {
374  if (!a_farm->OrganicFungicide(m_field, 0.0, g_date->DayInYear(30, 9) - g_date->DayInYear())) {
375  SimpleEvent(g_date->Date() + 1, dk_oop_fungicide3, true);
376  break;
377  }
378  }
379  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 10), dk_oop_fungicide4, false);
380  break;
381 
382  case dk_oop_fungicide4:
383  if (!a_farm->OrganicFungicide(m_field, 0.0, g_date->DayInYear(31, 12) - g_date->DayInYear())) {
384  SimpleEvent(g_date->Date() + 1, dk_oop_fungicide4, true);
385  break;
386  }
387  break;
388  // end of thread
389 
390  case dk_oop_manure2_s:
391  if (!a_farm->FA_Manure(m_field, 0.0, g_date->DayInYear(1, 4) - g_date->DayInYear())) {
392  SimpleEvent(g_date->Date() + 1, dk_oop_manure2_s, true);
393  break;
394  }
395  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_oop_row_cultivation1, false); //row cultivation thread
396  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_oop_water2, false); // water thread
397  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 5), dk_oop_cutting1, false); // cutting grass thread
398  SimpleEvent(g_date->OldDays() + g_date->DayInYear(15, 6), dk_oop_remove_fruits, false); // main thread
399  break;
400 
401  case dk_oop_manure2_p:
402  if (!a_farm->FP_Manure(m_field, 0.0, g_date->DayInYear(1, 4) - g_date->DayInYear())) {
403  SimpleEvent(g_date->Date() + 1, dk_oop_manure2_p, true);
404  break;
405  }
406  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_oop_row_cultivation1, false); //row cultivation thread
407  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 4), dk_oop_water2, false); // water thread
408  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 5), dk_oop_cutting1, false); // cutting grass thread
409  SimpleEvent(g_date->OldDays() + g_date->DayInYear(15, 6), dk_oop_remove_fruits, false); // main thread
410  break;
411 
412  case dk_oop_row_cultivation1:
413  if (!a_farm->RowCultivation(m_field, 0.0, g_date->DayInYear(31, 7) - g_date->DayInYear())) {
414  SimpleEvent(g_date->Date() + 1, dk_oop_row_cultivation1, true);
415  break;
416  }
417  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 10), dk_oop_row_cultivation2, false);
418  break;
419 
420  case dk_oop_row_cultivation2:
421  if (!a_farm->RowCultivation(m_field, 0.0, g_date->DayInYear(30, 11) - g_date->DayInYear())) {
422  SimpleEvent(g_date->Date() + 1, dk_oop_row_cultivation2, true);
423  break;
424  }
425  break;
426  // end of thread
427 
428  //Here comes water thread:
429  case dk_oop_water2:
430  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(1, 5) - g_date->DayInYear())) {
431  SimpleEvent(g_date->Date() + 1, dk_oop_water2, true);
432  break;
433  }
434  SimpleEvent(g_date->Date() + 25, dk_oop_water3, false);
435  break;
436  case dk_oop_water3:
437  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(1, 6) - g_date->DayInYear())) {
438  SimpleEvent(g_date->Date() + 1, dk_oop_water3, true);
439  break;
440  }
441  SimpleEvent(g_date->Date() + 25, dk_oop_water4, false);
442  break;
443  case dk_oop_water4:
444  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(1, 7) - g_date->DayInYear())) {
445  SimpleEvent(g_date->Date() + 1, dk_oop_water4, true);
446  break;
447  }
448  SimpleEvent(g_date->Date() + 25, dk_oop_water5, false);
449  break;
450  case dk_oop_water5:
451  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(1, 8) - g_date->DayInYear())) {
452  SimpleEvent(g_date->Date() + 1, dk_oop_water5, true);
453  break;
454  }
455  SimpleEvent(g_date->Date() + 25, dk_oop_water6, false);
456  break;
457  case dk_oop_water6:
458  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(1, 9) - g_date->DayInYear())) {
459  SimpleEvent(g_date->Date() + 1, dk_oop_water6, true);
460  break;
461  }
462  SimpleEvent(g_date->Date() + 25, dk_oop_water7, false);
463  break;
464  case dk_oop_water7:
465  if (!a_farm->Water(m_field, 0.0, g_date->DayInYear(1, 10) - g_date->DayInYear())) {
466  SimpleEvent(g_date->Date() + 1, dk_oop_water7, true);
467  break;
468  }
469  break;
470  // end of thread
471  // cutting grass thread:
472  //Here comes water thread:
473  case dk_oop_cutting1:
474  if (!a_farm->CutOrch(m_field, 0.0, g_date->DayInYear(1, 6) - g_date->DayInYear())) {
475  SimpleEvent(g_date->Date() + 1, dk_oop_cutting1, true);
476  break;
477  }
478  SimpleEvent(g_date->Date() + 25, dk_oop_cutting2, false);
479  break;
480  case dk_oop_cutting2:
481  if (!a_farm->CutOrch(m_field, 0.0, g_date->DayInYear(1, 7) - g_date->DayInYear())) {
482  SimpleEvent(g_date->Date() + 1, dk_oop_cutting2, true);
483  break;
484  }
485  SimpleEvent(g_date->Date() + 25, dk_oop_cutting3, false);
486  break;
487  case dk_oop_cutting3:
488  if (!a_farm->CutOrch(m_field, 0.0, g_date->DayInYear(1, 8) - g_date->DayInYear())) {
489  SimpleEvent(g_date->Date() + 1, dk_oop_cutting3, true);
490  break;
491  }
492  SimpleEvent(g_date->Date() + 25, dk_oop_cutting4, false);
493  break;
494  case dk_oop_cutting4:
495  if (!a_farm->CutOrch(m_field, 0.0, g_date->DayInYear(1, 9) - g_date->DayInYear())) {
496  SimpleEvent(g_date->Date() + 1, dk_oop_cutting4, true);
497  break;
498  }
499  SimpleEvent(g_date->Date() + 25, dk_oop_cutting5, false);
500  break;
501  case dk_oop_cutting5:
502  if (!a_farm->CutOrch(m_field, 0.0, g_date->DayInYear(1, 10) - g_date->DayInYear())) {
503  SimpleEvent(g_date->Date() + 1, dk_oop_cutting5, true);
504  break;
505  }
506  SimpleEvent(g_date->Date() + 25, dk_oop_cutting6, false);
507  break;
508  case dk_oop_cutting6:
509  if (!a_farm->CutOrch(m_field, 0.0, g_date->DayInYear(1, 11) - g_date->DayInYear())) {
510  SimpleEvent(g_date->Date() + 1, dk_oop_cutting6, true);
511  break;
512  }
513  break;
514  // end of thread
515 
516  case dk_oop_remove_fruits:
517  if (!a_farm->Pruning(m_field, 0.0, g_date->DayInYear(31, 8) - g_date->DayInYear())) {
518  SimpleEvent(g_date->Date() + 1, dk_oop_remove_fruits, true);
519  break;
520  }
521  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 8), dk_oop_harvest, false);
522  break;
523  case dk_oop_harvest:
524  if (!a_farm->FruitHarvest(m_field, 0.0, g_date->DayInYear(1, 11) - g_date->DayInYear())) {
525  SimpleEvent(g_date->Date() + 1, dk_oop_harvest, true);
526  break;
527  }
528  SimpleEvent(g_date->OldDays() + g_date->DayInYear(1, 12), dk_oop_manual_cutting12, false);
529  break;
530  case dk_oop_manual_cutting12:
531  if (!a_farm->Pruning(m_field, 0.0, m_field->GetMDates(1, 0) - g_date->DayInYear())) {
532  SimpleEvent(g_date->Date() + 1, dk_oop_manual_cutting12, true);
533  break;
534  }
535  done = true;
536  break;
537  // So we are done, and somewhere else the farmer will queue up the start event of the next crop (DK_OOrchard_Perm)
538  // END of MAIN THREAD
539  break;
540  default:
541  g_msg->Warn(WARN_BUG, "DK_OOrchard_Perm::Do(): "
542  "Unknown event type! ", "");
543  exit(1);
544  }
545  return done;
546 }

References LE::ClearManagementActionSum(), Farm::CutOrch(), Calendar::Date(), Calendar::DayInYear(), Farm::DeepPlough(), dk_oop_boron_p, dk_oop_boron_s, dk_oop_copper_p, dk_oop_copper_s, dk_oop_cutting1, dk_oop_cutting2, dk_oop_cutting3, dk_oop_cutting4, dk_oop_cutting5, dk_oop_cutting6, DK_OOP_EST_YEAR, dk_oop_fungicide1, dk_oop_fungicide2, dk_oop_fungicide3, dk_oop_fungicide4, dk_oop_fungicide5, dk_oop_harvest, dk_oop_insecticide, dk_oop_manual_cutting1, dk_oop_manual_cutting10, dk_oop_manual_cutting11, dk_oop_manual_cutting12, dk_oop_manual_cutting2, dk_oop_manual_cutting3, dk_oop_manual_cutting4, dk_oop_manual_cutting5, dk_oop_manual_cutting6, dk_oop_manual_cutting7, dk_oop_manual_cutting8, dk_oop_manual_cutting9, dk_oop_manure1_p, dk_oop_manure1_s, dk_oop_manure2_p, dk_oop_manure2_s, dk_oop_planting, dk_oop_remove_fruits, dk_oop_row_cultivation1, dk_oop_row_cultivation2, dk_oop_sleep_all_day, dk_oop_sow_grass, dk_oop_spring_plough, dk_oop_start, dk_oop_stubble_harrow1, dk_oop_stubble_harrow2, dk_oop_subsoiler, dk_oop_water1, dk_oop_water2, dk_oop_water3, dk_oop_water4, dk_oop_water5, dk_oop_water6, dk_oop_water7, DK_OOP_YEARS_AFTER_PLANT, Farm::DoIt_prob(), Farm::FA_Boron(), Farm::FA_Cu(), Farm::FA_Manure(), Farm::FP_Boron(), Farm::FP_Cu(), Farm::FP_Manure(), Farm::FruitHarvest(), g_date, g_msg, LE::GetMDates(), Calendar::GetYearNumber(), Farm::IsStockFarmer(), Crop::m_ev, Crop::m_farm, Crop::m_field, Crop::m_last_date, FarmEvent::m_lock, FarmEvent::m_todo, Calendar::OldDays(), Farm::OrganicFungicide(), Farm::OrganicInsecticide(), Farm::Pruning(), Farm::RowCultivation(), Crop::SimpleEvent(), Farm::SleepAllDay(), Farm::SpringPlough(), Farm::SpringSow(), Crop::StartUpCrop(), Farm::StubbleHarrowing(), tov_DKOOrchardCrop_Perm, MapErrorMsg::Warn(), WARN_BUG, and Farm::Water().

◆ SetUpFarmCategoryInformation()

void DK_OOrchardCrop_Perm::SetUpFarmCategoryInformation ( )
inline
111  {
112  const int elements = 2 + (dk_oop_foobar - DK_OOP_BASE);
113  m_base_elements_no = DK_OOP_BASE - 2;
114 
115  FarmManagementCategory catlist[elements] =
116  {
117  fmc_Others, // zero element unused but must be here
118  fmc_Others, // dk_oop_start = 1, // Compulsory, must always be 1 (one).
119  fmc_Others, // dk_oop_sleep_all_day = DK_OBFP1_BASE,
120  fmc_Cultivation, //dk_oop_spring_plough,
121  fmc_Cultivation, //dk_oop_stubble_harrow1,
122  fmc_Cultivation, //dk_oop_stubble_harrow2,
123  fmc_Fertilizer, //dk_oop_manure1,
124  fmc_Fertilizer, //dk_oop_manure1,
125  fmc_Watering, //dk_oop_water1,
126  fmc_Cultivation, //dk_oop_subsoiler,
127  fmc_Others, //dk_oop_planting,
128  fmc_Others, //dk_oop_sow_grass,
129  fmc_Cutting, //dk_oop_manual_cutting1,
130  fmc_Cutting, //dk_oop_manual_cutting2,
131  fmc_Cutting, //dk_oop_manual_cutting3,
132  fmc_Cutting, //dk_oop_manual_cutting4,
133  fmc_Cutting, //dk_oop_manual_cutting5,
134  fmc_Cutting, //dk_oop_manual_cutting6,
135  fmc_Cutting, //dk_oop_manual_cutting7,
136  fmc_Cutting, //dk_oop_manual_cutting8,
137  fmc_Cutting, //dk_oop_manual_cutting9,
138  fmc_Cutting, //dk_oop_manual_cutting10,
139  fmc_Cutting, //dk_oop_manual_cutting11,
140  fmc_Cutting, //dk_oop_manual_cutting12,
141  fmc_Cutting, //dk_oop_manure2,
142  fmc_Cultivation, //dk_oop_row_cultivation1,
143  fmc_Watering, //dk_oop_water2,
144  fmc_Watering, //dk_oop_water3,
145  fmc_Watering, //dk_oop_water4,
146  fmc_Watering, //dk_oop_water5,
147  fmc_Watering, //dk_oop_water6,
148  fmc_Watering, //dk_oop_water7,
149  fmc_Cutting, //dk_oop_cutting1,
150  fmc_Cutting, //dk_oop_cutting2,
151  fmc_Cutting, //dk_oop_cutting3,
152  fmc_Cutting, //dk_oop_cutting4,
153  fmc_Cutting, //dk_oop_cutting5,
154  fmc_Cutting, //dk_oop_cutting6,
155  fmc_Cultivation, //dk_oop_row_cultivation2,
156  fmc_Fertilizer, //dk_oop_coppper,
157  fmc_Fertilizer, //dk_oop_coppper,
158  fmc_Others, //dk_oop_fungicide1,
159  fmc_Fertilizer, //dk_oop_boron,
160  fmc_Fertilizer, //dk_oop_boron,
161  fmc_Others, //dk_oop_fungicide2,
162  fmc_Others, //dk_oop_insecticide,
163  fmc_Cutting, //dk_oop_remove_fruits,
164  fmc_Others, //dk_oop_fungicide3,
165  fmc_Harvest, //dk_oop_harvest,
166  fmc_Others, //dk_oop_fungicide4,
167  fmc_Others, //dk_oop_fungicide5,
168 
169 
170  // no foobar entry
171 
172  };
173  // Iterate over the catlist elements and copy them to vector
174  copy(begin(catlist), end(catlist), back_inserter(m_ManagementCategories));
175 
176  }

References DK_OOP_BASE, dk_oop_foobar, fmc_Cultivation, fmc_Cutting, fmc_Fertilizer, fmc_Harvest, fmc_Others, fmc_Watering, Crop::m_base_elements_no, and Crop::m_ManagementCategories.

Referenced by DK_OOrchardCrop_Perm().

The documentation for this class was generated from the following files:
LE::GetMDates
int GetMDates(int a, int b)
Definition: Elements.h:405
dk_oop_manure2_s
Definition: DK_OOrchardCrop_Perm.h:60
dk_oop_manure1_p
Definition: DK_OOrchardCrop_Perm.h:43
Farm::OrganicInsecticide
virtual bool OrganicInsecticide(LE *a_field, double a_user, int a_days)
Biocide applied on a_field.
Definition: FarmFuncs.cpp:2195
dk_oop_fungicide2
Definition: DK_OOrchardCrop_Perm.h:81
Farm::SpringPlough
virtual bool SpringPlough(LE *a_field, double a_user, int a_days)
Carry out a ploughing event in the spring on a_field.
Definition: FarmFuncs.cpp:421
dk_oop_manual_cutting12
Definition: DK_OOrchardCrop_Perm.h:59
Farm::IsStockFarmer
bool IsStockFarmer(void)
Definition: Farm.h:961
dk_oop_boron_s
Definition: DK_OOrchardCrop_Perm.h:79
DK_OOP_YEARS_AFTER_PLANT
#define DK_OOP_YEARS_AFTER_PLANT
Definition: DK_OOrchardCrop_Perm.h:23
dk_oop_cutting2
Definition: DK_OOrchardCrop_Perm.h:70
FarmEvent::m_lock
bool m_lock
Definition: Farm.h:384
dk_oop_water5
Definition: DK_OOrchardCrop_Perm.h:66
dk_oop_water7
Definition: DK_OOrchardCrop_Perm.h:68
dk_oop_manual_cutting8
Definition: DK_OOrchardCrop_Perm.h:55
LE::ClearManagementActionSum
void ClearManagementActionSum()
clears the management action counters
Definition: Elements.h:247
Calendar::GetYearNumber
int GetYearNumber(void)
Definition: Calendar.h:72
Farm::FP_Cu
virtual bool FP_Cu(LE *a_field, double a_user, int a_days)
Apply Cu fertilizer, on a_field owned by plant farmer (orchard)
Definition: FarmFuncs.cpp:1974
dk_oop_insecticide
Definition: DK_OOrchardCrop_Perm.h:82
dk_oop_sow_grass
Definition: DK_OOrchardCrop_Perm.h:47
dk_oop_fungicide5
Definition: DK_OOrchardCrop_Perm.h:87
Farm::DoIt_prob
bool DoIt_prob(double a_probability)
Return chance out of 0 to 1.
Definition: Farm.cpp:864
g_date
class Calendar * g_date
Definition: Calendar.cpp:37
dk_oop_cutting1
Definition: DK_OOrchardCrop_Perm.h:69
dk_oop_foobar
Definition: DK_OOrchardCrop_Perm.h:88
dk_oop_water6
Definition: DK_OOrchardCrop_Perm.h:67
Farm::FA_Manure
virtual bool FA_Manure(LE *a_field, double a_user, int a_days)
Spread manure on a_field owned by an stock farmer.
Definition: FarmFuncs.cpp:1110
dk_oop_stubble_harrow1
Definition: DK_OOrchardCrop_Perm.h:40
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
DK_OOP_EST_YEAR
#define DK_OOP_EST_YEAR
Definition: DK_OOrchardCrop_Perm.h:24
Crop::m_base_elements_no
int m_base_elements_no
Definition: Farm.h:505
dk_oop_cutting4
Definition: DK_OOrchardCrop_Perm.h:72
dk_oop_fungicide1
Definition: DK_OOrchardCrop_Perm.h:78
Crop::m_first_date
int m_first_date
Definition: Farm.h:501
dk_oop_manure1_s
Definition: DK_OOrchardCrop_Perm.h:42
dk_oop_manure2_p
Definition: DK_OOrchardCrop_Perm.h:61
Crop::SimpleEvent
void SimpleEvent(long a_date, int a_todo, bool a_lock)
Adds an event to this crop management.
Definition: Farm.cpp:747
dk_oop_row_cultivation1
Definition: DK_OOrchardCrop_Perm.h:62
Farm::FP_Manure
virtual bool FP_Manure(LE *a_field, double a_user, int a_days)
Spread manure on a_field owned by an arable farmer.
Definition: FarmFuncs.cpp:896
DK_OOP_BASE
#define DK_OOP_BASE
Definition: DK_OOrchardCrop_Perm.h:26
fmc_Cutting
Definition: LandscapeFarmingEnums.h:1009
dk_oop_fungicide4
Definition: DK_OOrchardCrop_Perm.h:86
dk_oop_copper_s
Definition: DK_OOrchardCrop_Perm.h:76
fmc_Fertilizer
Definition: LandscapeFarmingEnums.h:1004
dk_oop_manual_cutting1
Definition: DK_OOrchardCrop_Perm.h:48
Calendar::Date
long Date(void)
Definition: Calendar.h:57
dk_oop_copper_p
Definition: DK_OOrchardCrop_Perm.h:77
fmc_Cultivation
Definition: LandscapeFarmingEnums.h:1008
dk_oop_manual_cutting10
Definition: DK_OOrchardCrop_Perm.h:57
fmc_Others
Definition: LandscapeFarmingEnums.h:1003
dk_oop_planting
Definition: DK_OOrchardCrop_Perm.h:46
dk_oop_manual_cutting11
Definition: DK_OOrchardCrop_Perm.h:58
dk_oop_remove_fruits
Definition: DK_OOrchardCrop_Perm.h:83
dk_oop_manual_cutting5
Definition: DK_OOrchardCrop_Perm.h:52
fmc_Watering
Definition: LandscapeFarmingEnums.h:1011
Calendar::OldDays
long OldDays(void)
Definition: Calendar.h:60
dk_oop_water1
Definition: DK_OOrchardCrop_Perm.h:44
dk_oop_manual_cutting3
Definition: DK_OOrchardCrop_Perm.h:50
MapErrorMsg::Warn
void Warn(MapErrorState a_level, std::string a_msg1, std::string a_msg2)
Definition: MapErrorMsg.cpp:69
dk_oop_subsoiler
Definition: DK_OOrchardCrop_Perm.h:45
DK_OOrchardCrop_Perm::SetUpFarmCategoryInformation
void SetUpFarmCategoryInformation()
Definition: DK_OOrchardCrop_Perm.h:111
Farm::FA_Boron
virtual bool FA_Boron(LE *a_field, double a_user, int a_days)
Apply soluble Boron to a_field owned by a stock farmer.
Definition: FarmFuncs.cpp:868
Farm::CutOrch
virtual bool CutOrch(LE *a_field, double a_user, int a_days)
Cut vegetation on orchard crop. //based on cut to silage - values from cutting function of orchard.
Definition: FarmFuncs.cpp:1666
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
Farm::FP_Boron
virtual bool FP_Boron(LE *a_field, double a_user, int a_days)
Apply soluble Boron to a_field owned by an arable farmer.
Definition: FarmFuncs.cpp:854
Crop::m_farm
Farm * m_farm
Definition: Farm.h:498
Crop::m_field
LE * m_field
Definition: Farm.h:499
dk_oop_cutting6
Definition: DK_OOrchardCrop_Perm.h:74
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
FarmEvent::m_todo
int m_todo
Definition: Farm.h:388
dk_oop_manual_cutting7
Definition: DK_OOrchardCrop_Perm.h:54
dk_oop_spring_plough
Definition: DK_OOrchardCrop_Perm.h:39
dk_oop_water3
Definition: DK_OOrchardCrop_Perm.h:64
dk_oop_row_cultivation2
Definition: DK_OOrchardCrop_Perm.h:75
Farm::SleepAllDay
virtual bool SleepAllDay(LE *a_field, double a_user, int a_days)
Nothing to to today on a_field.
Definition: FarmFuncs.cpp:272
dk_oop_water2
Definition: DK_OOrchardCrop_Perm.h:63
Farm::RowCultivation
virtual bool RowCultivation(LE *a_field, double a_user, int a_days)
Carry out a harrowing between crop rows on a_field.
Definition: FarmFuncs.cpp:1183
dk_oop_sleep_all_day
Definition: DK_OOrchardCrop_Perm.h:38
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
g_msg
MapErrorMsg * g_msg
Definition: MapErrorMsg.cpp:41
dk_oop_harvest
Definition: DK_OOrchardCrop_Perm.h:85
dk_oop_water4
Definition: DK_OOrchardCrop_Perm.h:65
TTypesOfVegetation
TTypesOfVegetation
Values that represent the types of vegetation that are represented in ALMaSS.
Definition: LandscapeFarmingEnums.h:192
Farm::DeepPlough
virtual bool DeepPlough(LE *a_field, double a_user, int a_days)
Carry out a deep ploughing event on a_field.
Definition: FarmFuncs.cpp:408
tov_DKOOrchardCrop_Perm
Definition: LandscapeFarmingEnums.h:441
fmc_Harvest
Definition: LandscapeFarmingEnums.h:1012
Farm::FruitHarvest
virtual bool FruitHarvest(LE *a_field, double a_user, int a_days)
FruitHarvest (harvest of the mature fruits, e.g., grapes) applied on a_field.
Definition: FarmFuncs.cpp:1959
dk_oop_cutting3
Definition: DK_OOrchardCrop_Perm.h:71
dk_oop_fungicide3
Definition: DK_OOrchardCrop_Perm.h:84
Farm::Pruning
virtual bool Pruning(LE *a_field, double a_user, int a_days)
Pruning applied on a_field - details needs to be added (e.g., impact on biomass, influence/impacts in...
Definition: FarmFuncs.cpp:1897
dk_oop_cutting5
Definition: DK_OOrchardCrop_Perm.h:73
Calendar::DayInYear
int DayInYear(void)
Definition: Calendar.h:58
Farm::FA_Cu
virtual bool FA_Cu(LE *a_field, double a_user, int a_days)
Apply Cu fertilizer, on a_field owned by stock farmer (orchard)
Definition: FarmFuncs.cpp:1988
dk_oop_stubble_harrow2
Definition: DK_OOrchardCrop_Perm.h:41
dk_oop_start
Definition: DK_OOrchardCrop_Perm.h:37
dk_oop_boron_p
Definition: DK_OOrchardCrop_Perm.h:80
Farm::OrganicFungicide
virtual bool OrganicFungicide(LE *a_field, double a_user, int a_days)
Biocide applied on a_field.
Definition: FarmFuncs.cpp:2231
Crop::Crop
Crop(TTypesOfVegetation a_tov, TTypesOfCrops a_toc, Landscape *a_L)
Definition: Farm.cpp:733
Crop::m_ev
FarmEvent * m_ev
Definition: Farm.h:500
dk_oop_manual_cutting6
Definition: DK_OOrchardCrop_Perm.h:53
dk_oop_manual_cutting9
Definition: DK_OOrchardCrop_Perm.h:56
dk_oop_manual_cutting2
Definition: DK_OOrchardCrop_Perm.h:49
WARN_BUG
Definition: MapErrorMsg.h:34
dk_oop_manual_cutting4
Definition: DK_OOrchardCrop_Perm.h:51
FarmManagementCategory
FarmManagementCategory
Definition: LandscapeFarmingEnums.h:1001
Farm::StubbleHarrowing
virtual bool StubbleHarrowing(LE *a_field, double a_user, int a_days)
Carry out stubble harrowing on a_field.
Definition: FarmFuncs.cpp:1523