;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Befergyonet Model;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Beef-Energy-Carbon-Offset-Model;;;:::::::;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;***Important Notice***;;;;;;;;;;;;;;;;;;;;;;;;;
;;;If users want to make changes on the code or the interface section, it; 
;;;is recommended to cut and paste some of the code already developed;;;;; 
;;;in a word document while making changes. Then, paste it back into the;; 
;;;model since this code is extensive. This will allow them to make;;;;;;;
;;;modifications to the model. Do not forget to save it after the desired;
;;;modifications are done. Then, close the model. When re-open the model;;
;;;it will have the changes and will be able to run. Enjoy!!!;;;;;;;;;;;;;
  
extensions [r matrix]
breed [cows cow]
breed [cowsi11 cowi11] 
breed [cowsi12 cowi12]
breed [cowsi13 cowi13]
breed [cowsi14 cowi14]
breed [cowsi15 cowi15]
breed [cowsi16 cowi16]
breed [cowsi17 cowi17]
breed [cowsi18 cowi18]
breed [cowsi19 cowi19]
breed [cowsi110 cowi110]
breed [cowsi111 cowi111]
breed [cowsi112 cowi112]
breed [cowsi113 cowi113]
breed [cowsi114 cowi114]
breed [cowsi115 cowi115]
breed [cowsn11 cown11]
breed [cowsn12 cown12]
breed [cowsn13 cown13]
breed [cowsn14 cown14]
breed [cowsn15 cown15]
breed [cowsn16 cown16]
breed [cowsn17 cown17]
breed [cowsn18 cown18]
breed [cowsn19 cown19]
breed [cowsn110 cown110]
breed [cowsn111 cown111]
breed [cowsn112 cown112]
breed [cowsn113 cown113]
breed [cowsn114 cown114]
breed [cowsn115 cown115]
breed [cowsnlc11 cownlc11]
breed [cowsnlc12 cownlc12]
breed [cowsnlc13 cownlc13]
breed [cowsnlc14 cownlc14]
breed [cowsnlc15 cownlc15]
breed [cowsnlc16 cownlc16]
breed [cowsnlc17 cownlc17]
breed [cowsnlc18 cownlc18]
breed [cowsnlc19 cownlc19]
breed [cowsnlc110 cownlc110]
breed [cowsnlc111 cownlc111]
breed [cowsnlc112 cownlc112]
breed [cowsnlc113 cownlc113]
breed [cowsnlc114 cownlc114]
breed [cowsnlc115 cownlc115]
breed [cowsnrc11 cownrc11]
breed [cowsnrc12 cownrc12]
breed [cowsnrc13 cownrc13]
breed [cowsnrc14 cownrc14]
breed [cowsnrc15 cownrc15]
breed [cowsnrc16 cownrc16]
breed [cowsnrc17 cownrc17]
breed [cowsnrc18 cownrc18]
breed [cowsnrc19 cownrc19]
breed [cowsnrc110 cownrc110]
breed [cowsnrc111 cownrc111]
breed [cowsnrc112 cownrc112]
breed [cowsnrc113 cownrc113]
breed [cowsnrc114 cownrc114]
breed [cowsnrc115 cownrc115]
breed [cowsnld11 cownld11]
breed [cowsnld12 cownld12]
breed [cowsnld13 cownld13]
breed [cowsnld14 cownld14]
breed [cowsnld15 cownld15]
breed [cowsnld16 cownld16]
breed [cowsnld17 cownld17]
breed [cowsnld18 cownld18]
breed [cowsnld19 cownld19]
breed [cowsnld110 cownld110]
breed [cowsnld111 cownld111]
breed [cowsnld112 cownld112]
breed [cowsnld113 cownld113]
breed [cowsnld114 cownld114]
breed [cowsnld115 cownld115]
breed [cowsnrd11 cownrd11]
breed [cowsnrd12 cownrd12]
breed [cowsnrd13 cownrd13]
breed [cowsnrd14 cownrd14]
breed [cowsnrd15 cownrd15]
breed [cowsnrd16 cownrd16]
breed [cowsnrd17 cownrd17]
breed [cowsnrd18 cownrd18]
breed [cowsnrd19 cownrd19]
breed [cowsnrd110 cownrd110]
breed [cowsnrd111 cownrd111]
breed [cowsnrd112 cownrd112]
breed [cowsnrd113 cownrd113]
breed [cowsnrd114 cownrd114]
breed [cowsnrd115 cownrd115]
breed [cowsnlu11 cownlu11]
breed [cowsnlu12 cownlu12]
breed [cowsnlu13 cownlu13]
breed [cowsnlu14 cownlu14]
breed [cowsnlu15 cownlu15]
breed [cowsnlu16 cownlu16]
breed [cowsnlu17 cownlu17]
breed [cowsnlu18 cownlu18]
breed [cowsnlu19 cownlu19]
breed [cowsnlu110 cownlu110]
breed [cowsnlu111 cownlu111]
breed [cowsnlu112 cownlu112]
breed [cowsnlu113 cownlu113]
breed [cowsnlu114 cownlu114]
breed [cowsnlu115 cownlu115]
breed [cowsnru11 cownru11]
breed [cowsnru12 cownru12]
breed [cowsnru13 cownru13]
breed [cowsnru14 cownru14]
breed [cowsnru15 cownru15]
breed [cowsnru16 cownru16]
breed [cowsnru17 cownru17]
breed [cowsnru18 cownru18]
breed [cowsnru19 cownru19]
breed [cowsnru110 cownru110]
breed [cowsnru111 cownru111]
breed [cowsnru112 cownru112]
breed [cowsnru113 cownru113]
breed [cowsnru114 cownru114]
breed [cowsnru115 cownru115]
breed [cowsncu11 cowncu11]
breed [cowsncu12 cowncu12]
breed [cowsncu13 cowncu13]
breed [cowsncu14 cowncu14]
breed [cowsncu15 cowncu15]
breed [cowsncu16 cowncu16]
breed [cowsncu17 cowncu17]
breed [cowsncu18 cowncu18]
breed [cowsncu19 cowncu19]
breed [cowsncu110 cowncu110]
breed [cowsncu111 cowncu111]
breed [cowsncu112 cowncu112]
breed [cowsncu113 cowncu113]
breed [cowsncu114 cowncu114]
breed [cowsncu115 cowncu115]
breed [farmers0 farmer0]
breed [farmers1 farmer1]
breed [farmers2 farmer2]
breed [farmers3 farmer3]
breed [farmers4 farmer4]
breed [farmers5 farmer5]
breed [farmers6 farmer6]
breed [farmers7 farmer7]
breed [cows11 cow11]
breed [trees tree]
breed [cowhouses cowhouse]
breed [cowhouses1 cowhouse1]
breed [farmhouses farmhouse]
breed [digestors digestor]
breed [carbon-offset-counters carbon-offset-counter]
breed [manure-storages manure-storage]
breed [manure-lagoons manure-lagoon]
breed [fences fence]
breed [tractors tractor]
breed [hauling-trucks1 hauling-truck1]
breed [hauling-trucks2 hauling-truck2]
breed [hauling-trucks3 hauling-truck3]
breed [hauling-trucks4 hauling-truck4]
breed [hauling-trucks5 hauling-truck5]
breed [hauling-trucks6 hauling-truck6]
breed [hauling-trucks7 hauling-truck7]
breed [hauling-trucks-hay hauling-truck-hay]
breed [tractors-hay tractor-hay]
breed [tractors-fertilizer tractor-fertilizer]
breed [silages-truck silage-truck]
breed [silages-truck1 silage-truck1]
breed [silages-truck2 silage-truck2]

Globals [
  Value1 Value2 Value3 Value4 Value5 Value6 Value7 Value8 Value9 Value10 Value11 Value12 Value13 Value14 Value15 Value16 Value17 Value18 Value19 Value20
  Value21 Value22 Value23 Value24 Value25 Value26 Value27 Value28 Value29 Value30
  ave-annual-prec1 ave-annual-prec2 ave-annual-prec3 ave-annual-prec4 ave-annual-prec5 
  ave-annual-prec6 ave-annual-prec7 ave-annual-prec8 ave-annual-prec9 tot-prec1 tot-prec2 tot-prec3 tot-prec4 tot-prec5 tot-prec6 tot-prec7 tot-prec8 tot-prec9 
  random-tot-prec1 precipitation-adjustment1 precipitation-adjustment1-stoc price-beef-head price-electricity price-CO2e hay-price cost-per-mile-manure cost-manure beef-variable-cost dry-matter-demand
  slope-adjustment-of-interest slope-adjustment-nearby-manure slope-adjustment
  average-annual-precipitation miles-distance total-length Annual-Forage-Intake
  
  stocking-rate base-stocking-rate optimal-stocking-interest-1 optimal-stocking-interest-1-stoc optimal-stocking-nearby-1 optimal-stocking-nearby-1-stoc optimal-stocking-rate
  total-precipitation average-precipitation tot-prec1-list stdev1 mean1 tot-prec1-stoc initial-time-frame tick-list
  heads-interest-11 heads-interest-12 heads-interest-13 heads-interest-14 heads-interest-15 heads-interest-16 heads-interest-17 heads-interest-18 
  heads-interest-19 heads-interest-110 heads-interest-111 heads-interest-112 heads-interest-113 heads-interest-114 heads-interest-115 
  heads-nearby-11 heads-nearby-12 heads-nearby-13 heads-nearby-14 heads-nearby-15 heads-nearby-16 heads-nearby-17 heads-nearby-18 heads-nearby-19 
  heads-nearby-110 heads-nearby-111 heads-nearby-112 heads-nearby-113 heads-nearby-114 heads-nearby-115
  heads-interest-11-stoc heads-interest-12-stoc heads-interest-13-stoc  heads-interest-14-stoc  heads-interest-15-stoc  heads-interest-16-stoc  heads-interest-17-stoc
  heads-interest-18-stoc heads-interest-19-stoc heads-interest-110-stoc heads-interest-111-stoc heads-interest-112-stoc heads-interest-113-stoc heads-interest-114-stoc 
  heads-interest-115-stoc
  heads-nearby-11-stoc heads-nearby-12-stoc heads-nearby-13-stoc heads-nearby-14-stoc heads-nearby-15-stoc heads-nearby-16-stoc heads-nearby-17-stoc
  heads-nearby-18-stoc heads-nearby-19-stoc heads-nearby-110-stoc heads-nearby-111-stoc heads-nearby-112-stoc heads-nearby-113-stoc heads-nearby-114-stoc heads-nearby-115-stoc
  Total-Electricity-Yr-1 Total-Electricity-Yr-2 Total-Electricity-Yr-3 Total-Electricity-Yr-4
  Total-Electricity-Yr-5 Total-Electricity-Yr-6 Total-Electricity-Yr-7 Total-Electricity-Yr-8 Total-Electricity-Yr-9 Total-Electricity-Yr-10 Total-Electricity-Yr-11
  Total-Electricity-Yr-12 Total-Electricity-Yr-13 Total-Electricity-Yr-14 Total-Electricity-Yr-15 
  Total-Carbon-Offset-Yr-1 Total-Carbon-Offset-Yr-2 Total-Carbon-Offset-Yr-3 Total-Carbon-Offset-Yr-4 Total-Carbon-Offset-Yr-5 Total-Carbon-Offset-Yr-6 Total-Carbon-Offset-Yr-7
  Total-Carbon-Offset-Yr-8 Total-Carbon-Offset-Yr-9 Total-Carbon-Offset-Yr-10 Total-Carbon-Offset-Yr-11 Total-Carbon-Offset-Yr-12 Total-Carbon-Offset-Yr-13 Total-Carbon-Offset-Yr-14
  Total-Carbon-Offset-Yr-15  
  Total-co2Equivalent-baseline-yr-1 Total-co2Equivalent-baseline-yr-2 Total-co2Equivalent-baseline-yr-3 
  Total-co2Equivalent-baseline-yr-4 Total-co2Equivalent-baseline-yr-5 Total-co2Equivalent-baseline-yr-6 Total-co2Equivalent-baseline-yr-7 Total-co2Equivalent-baseline-yr-8 
  Total-co2Equivalent-baseline-yr-9 Total-co2Equivalent-baseline-yr-10 Total-co2Equivalent-baseline-yr-11 Total-co2Equivalent-baseline-yr-12 Total-co2Equivalent-baseline-yr-13 
  Total-co2Equivalent-baseline-yr-14 Total-co2Equivalent-baseline-yr-15 
  electricity-variable-cost1 electricity-variable-cost2 electricity-variable-cost3 electricity-variable-cost4 electricity-variable-cost5 electricity-variable-cost6
  electricity-variable-cost7 electricity-variable-cost8 electricity-variable-cost9 electricity-variable-cost10 electricity-variable-cost11 electricity-variable-cost12
  electricity-variable-cost13 electricity-variable-cost14 electricity-variable-cost15 
  manure-variable-cost1 manure-variable-cost2 manure-variable-cost3 manure-variable-cost4 manure-variable-cost5 manure-variable-cost6 manure-variable-cost7 
  manure-variable-cost8 manure-variable-cost9 manure-variable-cost10 manure-variable-cost11 manure-variable-cost12 manure-variable-cost13 manure-variable-cost14 
  manure-variable-cost15
  Total-Manure-Yr-1 Total-Manure-Yr-2 Total-Manure-Yr-3 Total-Manure-Yr-4 Total-Manure-Yr-5 Total-Manure-Yr-6 Total-Manure-Yr-7 Total-Manure-Yr-8 Total-Manure-Yr-9
  Total-Manure-Yr-10 Total-Manure-Yr-11 Total-Manure-Yr-12 Total-Manure-Yr-13 Total-Manure-Yr-14 Total-Manure-Yr-15
  Total-Beef-Yr-1 Total-Beef-Yr-2 Total-Beef-Yr-3 Total-Beef-Yr-4 Total-Beef-Yr-5 Total-Beef-Yr-6 Total-Beef-Yr-7 Total-Beef-Yr-8 Total-Beef-Yr-9 Total-Beef-Yr-10
  Total-Beef-Yr-11 Total-Beef-Yr-12 Total-Beef-Yr-13 Total-Beef-Yr-14 Total-Beef-Yr-15
  
  transportation-frequency manure-production-adjacent manure-variable-cost variable-cost-manure electricity-variable-cost total-variable-cost year beef-revenue electricity-revenue
  carbon-revenue other-variable-cost purchase-price-head total-revenue-1 total-variable-cost1 total-variable-cost2 total-variable-cost3 total-variable-cost4 total-variable-cost5 
  total-variable-cost6 total-variable-cost7
  total-variable-cost8 total-variable-cost9 total-variable-cost10 total-variable-cost11 total-variable-cost12 total-variable-cost13 total-variable-cost14 total-variable-cost15
  
  digester-capital-investment optimal-stocking-rate-interest-list average-stocking-interest optimal-stocking-rate-nearby-list average-stocking-nearby spatial-stocking-clustering
  alpha beta total-stocking-interest transportation-base-cost transportation-milage-cost manure-collected-cost PV-Receipts1 PV-Expendetures1
  Net-cash-Flows1 Net-Present-Value1 NPV11 pasture-production-cost manure-transportation-cost slope1 precip temp rainfall new-rainfall new-precip new-temp tmax new-tmax tmin new-tmin tave new-tave 
  latitude lambda RYE Pan-Evap Pan-Evapd Sp Lat-Radians DEC DL H D R ASW day ASW-max evotrans-vs-panevap lower-critical-temp lower-optimum-temp
  upper-optimum-temp upper-critical-temp ASW-above min-day-length max-day-length min-day-length-latitude max-day-length-latitude RGR-H2O RGR-Temp GRG-DL Rel-Cum-Growth RGR-DL Cum-Growth ASW-pct
  Eff-ET previous-ASW previous-Eff-ET previous-Rel-Cum-Growth dl-list new-asww Lag-ASW Lag-Eff-ET Lag-Rel-Cum-Growth Total-Pasture
  feeder-price-2013 feeder-price-2014 feeder-price-2015 feeder-price-2016 feeder-price-2017 feeder-price-2018 feeder-price-2019 feeder-price-2020 feeder-price-2021 feeder-price-2022 feeder-price-2023
  feeder-price-2024 feeder-price-2025 feeder-price-2026 feeder-price-2027 
  beef-price-2013 beef-price-2014 beef-price-2015 beef-price-2016 beef-price-2017 beef-price-2018 beef-price-2019 beef-price-2020 beef-price-2021 beef-price-2022 beef-price-2023 beef-price-2024 
  beef-price-2025 beef-price-2026 beef-price-2027 
  electricity-price-2013 electricity-price-2014 electricity-price-2015 electricity-price-2016 electricity-price-2017 electricity-price-2018 electricity-price-2019 electricity-price-2020
  electricity-price-2021 electricity-price-2022 electricity-price-2023 electricity-price-2024 electricity-price-2025 electricity-price-2026 electricity-price-2027 
  
  actual-feeder-price lag-feeder-price last-lag-feeder actual-electricity-price lag-electricity-price last-lag-electricity
  actual-beef-price lag-beef-price last-lag-beef  
  
  Pan-Evap-stoc Pan-Evapd-stoc rainfall-stoc ASW-stoc Lag-ASW-stoc previous-ASW-stoc  Eff-ET-stoc ASW-pct-stoc Lag-Eff-ET-stoc previous-Eff-ET-stoc RGR-H2O-stoc
  Cum-Growth-stoc Rel-Cum-Growth-stoc previous-Rel-Cum-Growth-stoc Lag-Rel-Cum-Growth-stoc
  
  rainfall-mean  lag-rainfall rainfall-std daily-pgr-list ave-pgr-monthly daily-pgr-list-replace daily-pgr-list2
  Total-Pasture-Stoc stocking-rate-stoc base-stocking-rate-stoc heads-risk hay-purchase beef-variable-cost-stoc new-rainfall-stoc co2-baseline-mean carbon-mean generation-mean Beef-mean
  
  eat-pasture max-pasture-grow regrow-pasture daily-planning-horizon initial-weight-adjuster
   
  Total-CO2Equivalent-Baseline Total-Beef Total-Carbon-Offset Total-Electricity total-manure const-beef const-electricity  const-feeder price-feeder-coef price-electricity-coef price-beef-coef
  average-miles annual-average-miles daily-pre-interaction Total-CO2Equivalent-Baseline-stoc  
  Total-CO2Equivalent-Baseline-Yr-1-stoc Total-CO2Equivalent-Baseline-Yr-2-stoc Total-CO2Equivalent-Baseline-Yr-3-stoc Total-CO2Equivalent-Baseline-Yr-4-stoc
  Total-CO2Equivalent-Baseline-Yr-5-stoc Total-CO2Equivalent-Baseline-Yr-6-stoc Total-CO2Equivalent-Baseline-Yr-7-stoc Total-CO2Equivalent-Baseline-Yr-8-stoc
  Total-CO2Equivalent-Baseline-Yr-9-stoc Total-CO2Equivalent-Baseline-Yr-10-stoc Total-CO2Equivalent-Baseline-Yr-11-stoc Total-CO2Equivalent-Baseline-Yr-12-stoc 
  Total-CO2Equivalent-Baseline-Yr-13-stoc Total-CO2Equivalent-Baseline-Yr-14-stoc Total-CO2Equivalent-Baseline-Yr-15-stoc 
  Total-Carbon-Offset-stoc
  Total-Carbon-Offset-Yr-1-stoc Total-Carbon-Offset-Yr-2-stoc Total-Carbon-Offset-Yr-3-stoc Total-Carbon-Offset-Yr-4-stoc Total-Carbon-Offset-Yr-5-stoc
  Total-Carbon-Offset-Yr-6-stoc Total-Carbon-Offset-Yr-7-stoc Total-Carbon-Offset-Yr-8-stoc Total-Carbon-Offset-Yr-9-stoc Total-Carbon-Offset-Yr-10-stoc
  Total-Carbon-Offset-Yr-11-stoc Total-Carbon-Offset-Yr-12-stoc Total-Carbon-Offset-Yr-13-stoc Total-Carbon-Offset-Yr-14-stoc Total-Carbon-Offset-Yr-15-stoc
  Total-Electricity-stoc 
  Total-Electricity-Yr-1-stoc Total-Electricity-Yr-2-stoc Total-Electricity-Yr-3-stoc Total-Electricity-Yr-4-stoc Total-Electricity-Yr-5-stoc Total-Electricity-Yr-6-stoc 
  Total-Electricity-Yr-7-stoc Total-Electricity-Yr-8-stoc Total-Electricity-Yr-9-stoc Total-Electricity-Yr-10-stoc Total-Electricity-Yr-11-stoc Total-Electricity-Yr-12-stoc
  Total-Electricity-Yr-13-stoc Total-Electricity-Yr-14-stoc Total-Electricity-Yr-15-stoc
  
  Value1-stoc Value2-stoc Value3-stoc Value4-stoc Value5-stoc Value6-stoc Value7-stoc Value8-stoc Value9-stoc Value10-stoc Value11-stoc Value12-stoc Value13-stoc 
  Value14-stoc Value15-stoc NPV11-stoc average-stocking-interest-stoc average-stocking-nearby-stoc spatial-stocking-clustering-stoc digester-capital-investment-stoc 
  carbon-revenue-stoc electricity-revenue-stoc beef-revenue-stoc electricity-variable-cost-stoc variable-cost-manure-stoc initial-pasture-mass initial-soil-organic-matter
  transportation-base-cost-stoc transportation-milage-cost-stoc manure-collected-cost-stoc manure-production-adjacent-stoc transportation-frequency-stoc   
  hay-purchase-interest heads-risk-interest Total-Beef-stoc average-stocking-interest-stoc-mod average-stocking-interest-mod
  
  slope-range slope-range1 dist. total-pasture-1 total-pasture-2 total-pasture-3 total-pasture-4 total-pasture-5 total-pasture-6 total-pasture-7 total-pasture-8 total-pasture-9 total-pasture-10 
  total-pasture-11 total-pasture-12 total-pasture-13 total-pasture-14 total-pasture-15 pasture-mass pasture-mass-extraction NPV-Beef-stoc Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc 
  PV-Expendetures-Beef-stoc NPV-Beef Net-Cash-Flow-Beef PV-Receipts-Beef PV-Expendetures-Beef 
  pasture-mass-stoc total-pasture-1-stoc total-pasture-2-stoc total-pasture-3-stoc total-pasture-4-stoc total-pasture-5-stoc total-pasture-6-stoc total-pasture-7-stoc
  total-pasture-8-stoc total-pasture-9-stoc total-pasture-10-stoc total-pasture-11-stoc total-pasture-12-stoc total-pasture-13-stoc total-pasture-14-stoc total-pasture-15-stoc
  pasture-mass-extraction-stoc electricity-cost paddock-costs average-miles1
  log-cost log-heads const-anaerobic heads-coef pasture-consumed pasture-limit initial-loop seasonal-weight-gain
  price-beef-headb pasture-production-costb hay-purchaseb hay-purchase-interestb other-variable-costb purchase-price-headb beef-variable-costb beef-variable-cost-stocb 
  
  heads-riskb heads-risk-interestb beef-revenueb beef-revenue-stocb 
  heads-interest-11b heads-interest-12b heads-interest-13b heads-interest-14b heads-interest-15b heads-interest-16b heads-interest-17b heads-interest-18b heads-interest-19b
  heads-interest-110b heads-interest-111b heads-interest-112b heads-interest-113b heads-interest-114b heads-interest-115b
  heads-interest-11-stocb heads-interest-12-stocb heads-interest-13-stocb heads-interest-14-stocb heads-interest-15-stocb heads-interest-16-stocb heads-interest-17-stocb
  heads-interest-18-stocb heads-interest-19-stocb heads-interest-110-stocb heads-interest-111-stocb heads-interest-112-stocb heads-interest-113-stocb heads-interest-114-stocb
  heads-interest-115-stocb cow-intake cow-pounds
  
  base-stocking-rate-cow-calf stocking-rate-cow-calf base-stocking-rate-stoc-cow-calf stocking-rate-stoc-cow-calf optimal-stocking-nearby-1-cow-calf Annual-Forage-Intake-cow-calf 
  heads-nearby-11-cow-calf heads-nearby-12-cow-calf heads-nearby-13-cow-calf heads-nearby-14-cow-calf heads-nearby-15-cow-calf heads-nearby-16-cow-calf heads-nearby-17-cow-calf
  heads-nearby-18-cow-calf heads-nearby-19-cow-calf heads-nearby-110-cow-calf heads-nearby-111-cow-calf heads-nearby-112-cow-calf heads-nearby-113-cow-calf heads-nearby-114-cow-calf
  heads-nearby-115-cow-calf heads-nearby-11-stoc-cow-calf heads-nearby-12-stoc-cow-calf heads-nearby-13-stoc-cow-calf heads-nearby-14-stoc-cow-calf heads-nearby-15-stoc-cow-calf
  heads-nearby-16-stoc-cow-calf heads-nearby-17-stoc-cow-calf heads-nearby-18-stoc-cow-calf heads-nearby-19-stoc-cow-calf heads-nearby-110-stoc-cow-calf heads-nearby-111-stoc-cow-calf
  heads-nearby-112-stoc-cow-calf heads-nearby-113-stoc-cow-calf heads-nearby-114-stoc-cow-calf heads-nearby-115-stoc-cow-calf optimal-stocking-nearby-1-stoc-cow-calf 
  average-stocking-stocker average-stocking-stocker-stoc average-stocking-nearby-cow-calf average-stocking-nearby-cow-calf-stoc average-stocking-stocker-stoc-nearby
  winter-feeding sell
  
  beef-selling-price-list beef-purchasing-price-list beef-other-costs-list pasture-silage-production-costs-diversified-list manure-transportation-cost-list carbon-market-initial-list 
  Beef-Sold-Price-2013 Beef-Sold-Price-2014 Beef-Sold-Price-2015 Beef-Sold-Price-2016 Beef-Sold-Price-2017 Beef-Sold-Price-2018 Beef-Sold-Price-2019 Beef-Sold-Price-2020
  Beef-Sold-Price-2021 Beef-Sold-Price-2022 Beef-Sold-Price-2023 Beef-Sold-Price-2024 Beef-Sold-Price-2025 Beef-Sold-Price-2026 Beef-Sold-Price-2027
  Steer-Purchase-Price-2013 Steer-Purchase-Price-2014 Steer-Purchase-Price-2015 Steer-Purchase-Price-2016 Steer-Purchase-Price-2017 Steer-Purchase-Price-2018 Steer-Purchase-Price-2019
  Steer-Purchase-Price-2020 Steer-Purchase-Price-2021 Steer-Purchase-Price-2022 Steer-Purchase-Price-2023 Steer-Purchase-Price-2024 Steer-Purchase-Price-2025 Steer-Purchase-Price-2026
  Steer-Purchase-Price-2027 Other-Var-Costs-Beef-2013 Other-Var-Costs-Beef-2014 Other-Var-Costs-Beef-2015 Other-Var-Costs-Beef-2016 Other-Var-Costs-Beef-2017 Other-Var-Costs-Beef-2018
  Other-Var-Costs-Beef-2019 Other-Var-Costs-Beef-2020 Other-Var-Costs-Beef-2021 Other-Var-Costs-Beef-2022 Other-Var-Costs-Beef-2023 Other-Var-Costs-Beef-2024 Other-Var-Costs-Beef-2025
  Other-Var-Costs-Beef-2026 Other-Var-Costs-Beef-2027 pasture-silage-production-diversified-2013 pasture-silage-production-diversified-2014 pasture-silage-production-diversified-2015
  Other-Var-Costs-Beef-specialized-2013 Other-Var-Costs-Beef-specialized-2014 Other-Var-Costs-Beef-specialized-2015 Other-Var-Costs-Beef-specialized-2016 Other-Var-Costs-Beef-specialized-2017
  Other-Var-Costs-Beef-specialized-2018 Other-Var-Costs-Beef-specialized-2019 Other-Var-Costs-Beef-specialized-2020 Other-Var-Costs-Beef-specialized-2021 Other-Var-Costs-Beef-specialized-2022
  Other-Var-Costs-Beef-specialized-2023 Other-Var-Costs-Beef-specialized-2024 Other-Var-Costs-Beef-specialized-2025 Other-Var-Costs-Beef-specialized-2026 Other-Var-Costs-Beef-specialized-2027
  
  pasture-silage-production-diversified-2016 pasture-silage-production-diversified-2017 pasture-silage-production-diversified-2018 pasture-silage-production-diversified-2019 
  pasture-silage-production-diversified-2020 pasture-silage-production-diversified-2021 pasture-silage-production-diversified-2022 pasture-silage-production-diversified-2023
  pasture-silage-production-diversified-2024 pasture-silage-production-diversified-2025 pasture-silage-production-diversified-2026 pasture-silage-production-diversified-2027
  manure-trans-cost-2013 manure-trans-cost-2014 manure-trans-cost-2015 manure-trans-cost-2016 manure-trans-cost-2017 manure-trans-cost-2018 manure-trans-cost-2019 manure-trans-cost-2020
  manure-trans-cost-2021 manure-trans-cost-2022 manure-trans-cost-2023 manure-trans-cost-2024 manure-trans-cost-2025 manure-trans-cost-2026 manure-trans-cost-2027 carbon-market-initial
  pasture-production-cost-stoc pasture-production-costb-stoc
  manure-base-charge-list manure-cost-list pasture-production-specialized-list pasture-cost-list beef-other-costs-specialized-list paddock-costs-list pasture-silage-production-diversified-list
  pasture-production-specialized-2013 pasture-production-specialized-2014 pasture-production-specialized-2015 pasture-production-specialized-2016 pasture-production-specialized-2017
  pasture-production-specialized-2018 pasture-production-specialized-2019 pasture-production-specialized-2020 pasture-production-specialized-2021 pasture-production-specialized-2022
  pasture-production-specialized-2023 pasture-production-specialized-2024 pasture-production-specialized-2025 pasture-production-specialized-2026 pasture-production-specialized-2027 
  
  cost-pasture-2013 cost-pasture-2014 cost-pasture-2015 cost-pasture-2016 cost-pasture-2017 cost-pasture-2018 cost-pasture-2019 cost-pasture-2020 cost-pasture-2021 cost-pasture-2022 
  cost-pasture-2023 cost-pasture-2024 cost-pasture-2025 cost-pasture-2026 cost-pasture-2027 R-2-electricity R-2-anaerobic

  manure-cost-2013 manure-cost-2014 manure-cost-2015 manure-cost-2016 manure-cost-2017 manure-cost-2018 manure-cost-2019 manure-cost-2020 manure-cost-2021 manure-cost-2022 manure-cost-2023 
  manure-cost-2024 manure-cost-2025 manure-cost-2026 manure-cost-2027 manure-base-charge-2013 manure-base-charge-2014 manure-base-charge-2015 manure-base-charge-2016 manure-base-charge-2017 
  manure-base-charge-2018 manure-base-charge-2019 manure-base-charge-2020 manure-base-charge-2021 manure-base-charge-2022 manure-base-charge-2023 manure-base-charge-2024 manure-base-charge-2025 
  manure-base-charge-2026 manure-base-charge-2027 beef-variable-costb1 beef-variable-costb2 beef-variable-cost1 beef-variable-cost2 beef-variable-cost3 beef-variable-costb3
  beef-variable-cost1-stoc beef-variable-cost2-stoc beef-variable-cost3-stoc beef-variable-costb1-stoc beef-variable-costb2-stoc beef-variable-costb3-stoc beef-variable-cost4 death-loss death-loss-stoc
]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Characteristics of patches;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
patches-own [biomass]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Characteristics of turtles;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
turtles-own [weight electricity co2e-baseline co2e-offset goal state distance1-test count-links  cost-transportation-manure slope-interest  
             NPV11-Beef NPV-Beef1 NPV-Beef2 NPV-Beef3 NPV-Beef4 NPV-Beef5 NPV-Beef6 NPV-Beef7 NPV-Beef8 NPV-Beef9 NPV-Beef10 NPV-Beef11 NPV-Beef12 NPV-Beef13 NPV-Beef14 NPV-Beef15
             NPV11-Beef-stoc NPV-Beef-stoc1 NPV-Beef-stoc2 NPV-Beef-stoc3 NPV-Beef-stoc4 NPV-Beef-stoc5 NPV-Beef-stoc6 NPV-Beef-stoc7 NPV-Beef-stoc8 NPV-Beef-stoc9 NPV-Beef-stoc10 
             NPV-Beef-stoc11 NPV-Beef-stoc12 NPV-Beef-stoc13 NPV-Beef-stoc14 NPV-Beef-stoc15 summer winter seasonal-transition]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Characteristics of links;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
links-own [distance1 distance2 distance3 distance4 distance5 distance6 distance7 distance8 cluster-link]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Setting up initial commands;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to setup-agent
  ;; (for this model to work with NetLogo's new plotting features,
  ;; __clear-all-and-reset-ticks should be replaced with clear-all at
  ;; the beginning of your setup procedure and reset-ticks at the end
  ;; of the procedure.)
  __clear-all-and-reset-ticks
  setup-fences
  setup-trees
  r:eval "library(spatstat)"
  set daily-pgr-list (list daily-pgr-acre) 
  set eat-pasture 53
  set max-pasture-grow 55
  set regrow-pasture 54
  set pasture-consumed 53
  set initial-loop 500
  ask trees [set summer 62] 
  ask trees [set winter 2] 
  ask trees [set seasonal-transition 21]
  set initial-pasture-mass 1400;; 1,400 lbs./acre
  set initial-soil-organic-matter 6800;; 6,800 Kg./acre
  if initial-weight = 550 [set initial-weight-adjuster -275] 
  if initial-weight = 500 [set initial-weight-adjuster -250]
  if initial-weight = 450 [set initial-weight-adjuster -225] 
  if initial-weight = 400 [set initial-weight-adjuster -200]
  set seasonal-weight-gain 1.5    
  set cow-intake 0
  
  user-message "Welcome to the BEFERGYONET Model. Please type 'netlogoresults.csv' to export simulation results."
  let file user-new-file
  if is-string? file
  [
    if file-exists? file
      [ file-delete file ] 
  file-open file
  write-to-file
  ]
  setup-patches 
  regress-data
;;;;;;;;;;;;;;;;;;;;;;;;;Setting Up Farm Houses;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy 15 0 set color 13 set size 2.5 set slope-interest 1
  ] 
;;;;;;;;;;;;;;;;;;;;;;;;;Farm Up Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy 12 47 set color 3 set size 2.5 
  ] 
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Up Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy 48 32 set color 3 set size 2.5 
  ]
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Up Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"  
  create-farmhouses 1 [
  setxy -31 17 set color 3 set size 2.5 
  ]
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Center Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy -18 -12 set color 34 set size 2.5 
  ]
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Center Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy 48 9 set color 34 set size 2.5 
  ]
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Bottom Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy -18 -37 set color 3 set size 2.5 
  ] 
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Bottom Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy 30 -18 set color 3 set size 2.5 
  ]  
;;;;;;;;;;;;;;;;;;;;;;;;;;Farm Bottom Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape farmhouses "farm"   
  create-farmhouses 1 [
  setxy 9 -48 set color blue set size 2.5 set slope-interest 1
  ]
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;Setting up Farmer on Space;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;Farmer: Farm of Interest;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers0 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy 15 14 ]]  
;;;;;;;;;;;;;;;Farmer: Central Left;;;;;;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers1 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy -18 14 ]]
;;;;;;;;;;;;;;;Farmer: Central Right;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers2 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy 48 14 ]]  
;;;;;;;;;;;;;;;Farmer: Bottom Left;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers3 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy -19 -19 ]]  
;;;;;;;;;;;;;;;Farmer: Bottom Right;;;;;;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers4 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy 38 -19 ]]
;;;;;;;;;;;;;;;Farmer: Upper Left;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers5 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy -18 18 ]]  
;;;;;;;;;;;;;;;Farmer: Upper Right;;;;;;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers6 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy 48 28 ]]
;;;;;;;;;;;;;;;Farmer: Upper Center;;;;;;;;;;;;;;;;;;;;
if ticks = 0  [create-farmers7 1  
  [
    set color blue
    set size .25  
    set shape "farmer 2" 
    setxy -15 47 ]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;Setting up Cowhouses For Winter Season;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;At Farm of Interest;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 15 -2 set color 13 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 15 -3 set color 13 set size 2.5]
 
;;;;;;;;;;;;;;;;;;;Nearby Farms: Center Left;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy -18 -11 set color 34 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy -18 -10 set color 34 set size 2.5]
 
 ;;;;;;;;;;;;;;;;;;;Nearby Farms: Center Right;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 48 7 set color 34 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 48 6 set color 34 set size 2.5]
 
 ;;;;;;;;;;;;;;;;;;;Nearby Farms: Bottom Left;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy -18 -36 set color 3 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy -18 -35 set color 3 set size 2.5]
 
 ;;;;;;;;;;;;;;;;;;;Nearby Farms: Bottom Right;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 28 -18 set color 3 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 27 -18 set color 3 set size 2.5]
 
;;;;;;;;;;;;;;;;;;;Nearby Farms: Upper Left;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy -33 17 set color 3 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy -34 17 set color 3 set size 2.5]
 
 ;;;;;;;;;;;;;;;;;;;Nearby Farms: Upper Right;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 48 33 set color 3 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 48 34 set color 3 set size 2.5]
 
;;;;;;;;;;;;;;;;;;;Nearby Farms: Upper Center;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 10 47 set color 3 set size 2.5]
 
 set-default-shape cowhouses "cow house"  
 create-cowhouses 1 [
 setxy 9 47 set color 3 set size 2.5]
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;Setting up Manure Storage;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape manure-storages "manure storage"   
 create-manure-storages 1  
 [setxy 15 -5  set color 13 set size 2.5]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;Setting up Digestor/Electricity Generator;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape digestors "cylinder"   
 create-digestors 1  
 [setxy 15 -7  set color white set size 1.5]
   
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;Setting up Carbon-Offset-Counters;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape carbon-offset-counters "cylinder"   
 create-carbon-offset-counters 1  
 [setxy 15 -8  set color white set size 1]
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;Setting up Manure-Lagoon;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 set-default-shape manure-lagoons "dot"   
 create-manure-lagoons 1 
 [setxy 16 11  set color 105 set size .001 set label-color white] 
 
 ;;;;;;;;;;;;;;;;;;;Nearby Farms: Silage Farm;;;;;;;;;;;;;;;;;;;;;
 set-default-shape cowhouses "manure storage"  
 create-cowhouses 1 [
 setxy 7 -48 set color blue set size 2.5]
 
 set-default-shape cowhouses "manure storage"  
 create-cowhouses 1 [
 setxy 6 -48 set color blue set size 2.5]
 
 end

;;;;;;;;;;;;;;;;;;;;;;;;;;;Setting Up Some Patches;;;;;;;;;;;;;;;;;;;;;;;;;;;
to setup-patches

;;;;;;;;;;;;;;;;;;;;;;;;;;;;Pasture Area;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;10 patches = 1 acre and 15.5 acres = 1 paddock;;;;;;;;;;;;;;;;;;;;;;;;
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Up left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -49 and pxcor < -16 and pycor < 49 and pycor > 18)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Left Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -49 and pxcor < -18 and pycor < 16 and pycor > -17)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Up Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
ask patches [if (pxcor > 17 and pxcor < 48 and pycor < 49 and pycor > 16)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Up Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
ask patches [if (pxcor > -16 and pxcor < 17 and pycor < 47 and pycor > 16)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Down Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
ask patches [if (pxcor > -49 and pxcor < -18 and pycor < -17 and pycor > -50)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Center Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -16 and pxcor < 15 and pycor < 16 and pycor > -17)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Center Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > 17 and pxcor < 48 and pycor < 16 and pycor > -17)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Down Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
ask patches [if (pxcor > -16 and pxcor < 17 and pycor < -17 and pycor > -48)
    [set pcolor green]] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Down Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
ask patches [if (pxcor > 17 and pxcor < 50 and pycor < -19 and pycor > -50)
    [set pcolor green]] 

;;;;;;;;;;;;;;;;;;;;;;;;;Setting Up Infraestructure;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Up Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -49 and pxcor < -16 and pycor > 16 and pycor < 19)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Up Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -16 and pxcor < 17 and pycor > 46 and pycor < 49)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Up Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > 47 and pxcor < 50 and pycor > 16 and pycor < 49)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Center Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -19 and pxcor < -16 and pycor > -17 and pycor < 16)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Down Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -19 and pxcor < -16 and pycor > -50 and pycor < -17)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Center Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > 47 and pxcor < 50 and pycor > -17 and pycor < 16)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Down Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > 17 and pxcor < 50 and pycor > -20 and pycor < -17)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Down Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -16 and pxcor < 17 and pycor > -50 and pycor < -47)
    [set pcolor 35]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Center Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > 14 and pxcor < 17 and pycor > -17 and pycor < 16)
    [set pcolor 35]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Roads;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;1 st Vertical Road;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor = -16 and pycor < 49 and pycor > -50)
    [set pcolor 4]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;1 st Horizontal Road;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -49 and pxcor < 50 and pycor = 16)
    [set pcolor 4]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;2 nd Horizontal Road;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -49 and pxcor < 50 and pycor = -17)
    [set pcolor 4]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;2 nd Vertical Road;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor = 17 and pycor < 49 and pycor > -50)
    [set pcolor 4]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;Main Horizontal Road;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor > -50 and pxcor < 50 and pycor = 49)
    [set pcolor 4]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;Main Vertical Road;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask patches [if (pxcor = -49 and pycor < 50 and pycor > -50)
    [set pcolor 4]]
;;;;;;;;;;;;;;;;;;;;;;;;;;;Manure Lagoon;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches [if (pxcor < 17 and pxcor > 14 and pycor < 14 and pycor > 8)
    [set pcolor 105]]
end

;;;;;;;;;;;;;;;;;;;;;;;;Setting Up Fences;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to setup-fences
  set-default-shape fences "Fence Pole"
  create-fences 162
  [
    
;;;;;;;;;;;;;;;;;;;;;;Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 0 [setxy -15 15 set color white set size 1] 
  ask fence 1 [setxy -15 5 set color white set size 1] 
      ask fence 0 [create-link-with fence 1] 
      
  ask fence 2 [setxy -1 15 set color white set size 1] 
      ask fence 2 [create-link-with fence 0] 
  
  ask fence 3 [setxy -1 6 set color white set size 1] 
      ask fence 3 [create-link-with fence 2] 
  
  ask fence 4 [setxy -2 5 set color white set size 1]
      ask fence 4 [create-link-with fence 1] 
  
  ask fence 5 [setxy 14 15 set color white set size 1] 
      ask fence 5 [create-link-with fence 2] 
  
  ask fence 6 [setxy 14 5 set color white set size 1]
      ask fence 6 [create-link-with fence 8] 
  
  ask fence 7 [setxy 0 5 set color white set size 1] 
      ask fence 7 [create-link-with fence 6] 
      
  ask fence 8 [setxy 14 14 set color white set size 1] 
 
  ask fence 9 [setxy -15 -5 set color white set size 1] 
      ask fence 9 [create-link-with fence 1] 
  ask fence 10 [setxy -15 -16 set color white set size 1]
      ask fence 9 [create-link-with fence 10] 
      
  ask fence 11 [setxy -1 4 set color white set size 1] 
  ask fence 12 [setxy -1 -4 set color white set size 1] 
      ask fence 11 [create-link-with fence 12] 
  
  ask fence 13 [setxy -1 -16 set color white set size 1] 
      ask fence 13 [create-link-with fence 10] 

  ask fence 14 [setxy -2 -5 set color white set size 1] 
      ask fence 14[create-link-with fence 9] 
  
  ask fence 15 [setxy -1 -6 set color white set size 1] 
      ask fence 15 [create-link-with fence 13]
  
  ask fence 16 [setxy 0 -5 set color white set size 1] 
  ask fence 17 [setxy 14 -5 set color white set size 1] 
      ask fence 16 [create-link-with fence 17] 
      
  ask fence 18 [setxy 14 -16 set color white set size 1] 
  ask fence 19 [setxy 14 -6 set color white set size 1] 
      ask fence 18 [create-link-with fence 19] 
      ask fence 18 [create-link-with fence 13] 
      ask fence 6 [create-link-with fence 17] 
  
;;;;;;;;;;;;;;;;;;;;;;;Farm Center Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 20 [setxy 18 15 set color white set size 1] 
  ask fence 21 [setxy 18 5 set color white set size 1]
      ask fence 20 [create-link-with fence 21] 
      
  ask fence 22 [setxy 18 -5 set color white set size 1] 
  ask fence 23 [setxy 18 -16 set color white set size 1] 
      ask fence 22 [create-link-with fence 23] 
  
  ask fence 24 [setxy 47 15 set color white set size 1] 
      ask fence 23 [create-link-with fence 22] 
  
  ask fence 25 [setxy 47 14 set color white set size 1]
  ask fence 26 [setxy 47 5 set color white set size 1]
  ask fence 27 [setxy 47 -5 set color white set size 1]
  ask fence 28 [setxy 47 -6 set color white set size 1]
  ask fence 29 [setxy 47 -16 set color white set size 1]
      ask fence 25 [create-link-with fence 26] 
      ask fence 26 [create-link-with fence 27] 
      ask fence 28 [create-link-with fence 29] 
  
  ask fence 30 [setxy 32 15 set color white set size 1] 
  ask fence 31 [setxy 32 6 set color white set size 1]
  ask fence 32 [setxy 31 5 set color white set size 1]
  ask fence 33 [setxy 33 5 set color white set size 1]
      ask fence 30 [create-link-with fence 31] 
      ask fence 30 [create-link-with fence 24] 
      ask fence 32 [create-link-with fence 21] 
      ask fence 30 [create-link-with fence 20] 
      ask fence 33 [create-link-with fence 26] 
      ask fence 21 [create-link-with fence 22] 
      
 ask fence 34 [setxy 32 4 set color white set size 1]
 ask fence 35 [setxy 32 -4 set color white set size 1]
 ask fence 36 [setxy 32 -6 set color white set size 1]
 ask fence 37 [setxy 32 -16 set color white set size 1]
      ask fence 37 [create-link-with fence 23] 
      ask fence 37 [create-link-with fence 29] 
      ask fence 34 [create-link-with fence 35] 
      ask fence 36 [create-link-with fence 37] 
      ask fence 38 [create-link-with fence 27] 
      ask fence 39 [create-link-with fence 22] 
 
 ask fence 38 [setxy 33 -5 set color white set size 1]; 67
 ask fence 39[setxy 31 -5 set color white set size 1]; 68
  
;;;;;;;;;;;;;;;;;;;;;;;Farm Center Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 40 [setxy -48 15 set color white set size 1] 
  ask fence 41 [setxy -48 5 set color white set size 1]
      ask fence 40 [create-link-with fence 41] 
      
  ask fence 42 [setxy -48 -5 set color white set size 1] 
  ask fence 43 [setxy -48 -16 set color white set size 1] 
      ask fence 42 [create-link-with fence 43] 
      ask fence 42 [create-link-with fence 41] 
  
  ask fence 44 [setxy -34 15 set color white set size 1] 
     ask fence 44 [create-link-with fence 40] 
  
  ask fence 45 [setxy -34 6 set color white set size 1] 
  ask fence 46 [setxy -34 4 set color white set size 1] 
  ask fence 47 [setxy -34 -4 set color white set size 1]
  ask fence 48 [setxy -35 5 set color white set size 1] 
  ask fence 49 [setxy -35 -5 set color white set size 1] 
     ask fence 44 [create-link-with fence 45] 
     ask fence 46 [create-link-with fence 47] 
     ask fence 42 [create-link-with fence 49] 
     ask fence 41 [create-link-with fence 48]
 
  ask fence 50 [setxy -33 5 set color white set size 1]
  ask fence 51[setxy -19 5 set color white set size 1]
  ask fence 52 [setxy -19 15 set color white set size 1]
  ask fence 53 [setxy -19 14 set color white set size 1]
  ask fence 54 [setxy -19 -5 set color white set size 1]
  ask fence 55 [setxy -33 -5 set color white set size 1]
      ask fence 30 [create-link-with fence 31] 
      ask fence 51 [create-link-with fence 54] 
      ask fence 54 [create-link-with fence 55] 
      ask fence 60 [create-link-with fence 58] 
      
 ask fence 56 [setxy -34 -6 set color white set size 1] 
 ask fence 57 [setxy -34 -16 set color white set size 1]
 ask fence 58 [setxy -19 -16 set color white set size 1]
 ask fence 59 [setxy -19 -16 set color white set size 1]
 ask fence 60 [setxy -19 -6 set color white set size 1]
      ask fence 52 [create-link-with fence 44] 
      ask fence 53 [create-link-with fence 51] 
      ask fence 51 [create-link-with fence 50] 
      ask fence 58 [create-link-with fence 57] 
      ask fence 56 [create-link-with fence 57] 
      ask fence 57 [create-link-with fence 43]    
 
;;;;;;;;;;;;;;;;;;;;;;;Farm Bottom Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 61 [setxy -48 -18 set color white set size 1] 
  ask fence 62 [setxy -48 -27 set color white set size 1]
      ask fence 61 [create-link-with fence 62] 
      
  ask fence 63 [setxy -48 -37 set color white set size 1]
  ask fence 64 [setxy -34 -18 set color white set size 1]
      ask fence 62 [create-link-with fence 63] 
      ask fence 65 [create-link-with fence 64]        
  
  ask fence 65 [setxy -19 -18 set color white set size 1]  
      ask fence 65 [create-link-with fence 64] 
  
  ask fence 66 [setxy -19 -19 set color white set size 1]  
  ask fence 67 [setxy -48 -49 set color white set size 1] 
  ask fence 68 [setxy -34 -26 set color white set size 1]
  ask fence 69 [setxy -34 -36 set color white set size 1]
  ask fence 70 [setxy -34 -49 set color white set size 1]
      ask fence 61 [create-link-with fence 64] 
      ask fence 63 [create-link-with fence 67] 
      ask fence 62 [create-link-with fence 77] 
      ask fence 75 [create-link-with fence 69] 
 
  ask fence 71 [setxy -19 -49 set color white set size 1]
  ask fence 72 [setxy -19 -38 set color white set size 1]
  ask fence 73 [setxy -19 -37 set color white set size 1]
  ask fence 74 [setxy -19 -27 set color white set size 1]
  
      ask fence 66 [create-link-with fence 74] 
      ask fence 64 [create-link-with fence 68] 
      ask fence 72 [create-link-with fence 71] 
      ask fence 74 [create-link-with fence 73] 
      
 ask fence 75 [setxy -34 -28 set color white set size 1]
 ask fence 76 [setxy -34 -38 set color white set size 1]
 ask fence 77 [setxy -35 -27 set color white set size 1]
 ask fence 78 [setxy -33 -27 set color white set size 1]
 ask fence 79 [setxy -33 -37 set color white set size 1]
 ask fence 80 [setxy -35 -37 set color white set size 1]
      ask fence 78 [create-link-with fence 74] 
      ask fence 79 [create-link-with fence 73] 
      ask fence 63 [create-link-with fence 80] 
      ask fence 70 [create-link-with fence 76] 
      ask fence 67 [create-link-with fence 70] 
      ask fence 70 [create-link-with fence 71] 
 
;;;;;;;;;;;;;;;;;;;;;;;Farm Bottom Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 81 [setxy 18 48 set color white set size 1] 
  ask fence 82 [setxy 32 48 set color white set size 1]
  ask fence 83 [setxy 47 48 set color white set size 1]
      ask fence 81 [create-link-with fence 82] 
      ask fence 82 [create-link-with fence 83] 
      
      
  ask fence 84 [setxy 18 17 set color white set size 1] 
  ask fence 85 [setxy 32 17 set color white set size 1]
  ask fence 86 [setxy 47 17 set color white set size 1]
      ask fence 84 [create-link-with fence 85] 
      ask fence 85 [create-link-with fence 86] 
     
  ask fence 87 [setxy 18 39 set color white set size 1] 
      ask fence 65 [create-link-with fence 64] 
  
  ask fence 88 [setxy 18 28 set color white set size 1] 
  ask fence 89 [setxy 18 17 set color white set size 1]
  ask fence 90 [setxy 31 39 set color white set size 1]
  ask fence 91 [setxy 33 39 set color white set size 1]
  ask fence 92 [setxy 31 28 set color white set size 1]
  ask fence 93 [setxy 33 28 set color white set size 1]
      ask fence 87 [create-link-with fence 81] 
      ask fence 88 [create-link-with fence 87] 
      ask fence 88 [create-link-with fence 89] 
      ask fence 99 [create-link-with fence 98] 
      ask fence 99 [create-link-with fence 100] 
 
  ask fence 94 [setxy 32 40 set color white set size 1]
  ask fence 95 [setxy 32 38 set color white set size 1]
  ask fence 96 [setxy 32 29 set color white set size 1]
  ask fence 97 [setxy 32 27 set color white set size 1]
  
     ask fence 83 [create-link-with fence 98]
     ask fence 101 [create-link-with fence 86] 
     ask fence 97 [create-link-with fence 85] 
     ask fence 95 [create-link-with fence 96] 
      
 ask fence 98 [setxy 47 47 set color white set size 1]
 ask fence 99 [setxy 47 39 set color white set size 1]
 ask fence 100 [setxy 47 28 set color white set size 1]
 ask fence 101 [setxy 47 27 set color white set size 1]
 
      ask fence 82 [create-link-with fence 94] 
      ask fence 87 [create-link-with fence 90] 
      ask fence 88 [create-link-with fence 92] 
      ask fence 93 [create-link-with fence 100] 
      ask fence 91 [create-link-with fence 99] 
   
;;;;;;;;;;;;;;;;;;;;;;;;Farm Up Center;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 102 [setxy -15 46 set color white set size 1] 
  ask fence 103 [setxy -15 32 set color white set size 1]
  ask fence 104 [setxy -15 17 set color white set size 1]
      ask fence 102 [create-link-with fence 103] 
      ask fence 103 [create-link-with fence 104] 
      
  ask fence 105 [setxy -14 46 set color white set size 1]
  ask fence 106 [setxy -6 46 set color white set size 1]
  ask fence 107 [setxy 5 46 set color white set size 1]
      ask fence 106 [create-link-with fence 110] 
      ask fence 105 [create-link-with fence 106] 
      ask fence 106 [create-link-with fence 107] 
     
  ask fence 108 [setxy 6 46 set color white set size 1] 
      ask fence 108 [create-link-with fence 109] 
  
  ask fence 109 [setxy 16 46 set color white set size 1] 
  ask fence 110 [setxy -6 33 set color white set size 1]
  ask fence 111 [setxy 5 33 set color white set size 1]
  ask fence 112 [setxy 16 32 set color white set size 1]
  ask fence 113 [setxy 16 17 set color white set size 1]
  ask fence 114 [setxy -7 32 set color white set size 1]
      ask fence 103 [create-link-with fence 114] 
      ask fence 116 [create-link-with fence 120] 
      ask fence 104 [create-link-with fence 120] 
      ask fence 120 [create-link-with fence 121] 
      ask fence 121 [create-link-with fence 113] 
 
  ask fence 115 [setxy -5 32 set color white set size 1]
  ask fence 116 [setxy -6 31 set color white set size 1]
  ask fence 117 [setxy 4 32 set color white set size 1]
  ask fence 118 [setxy 6 32 set color white set size 1]
      ask fence 113 [create-link-with fence 112] 
      ask fence 109 [create-link-with fence 112] 
      ask fence 115 [create-link-with fence 117] 
      ask fence 107 [create-link-with fence 111] 
      
  ask fence 119 [setxy 5 31 set color white set size 1]
  ask fence 120 [setxy -6 17 set color white set size 1]
  ask fence 121 [setxy 5 17 set color white set size 1]
      ask fence 119 [create-link-with fence 121]
      ask fence 118 [create-link-with fence 112] 
  
;;;;;;;;;;;;;;;;;;;;;;;;Farm Up Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 122 [setxy -48 48 set color white set size 1] 
  ask fence 123 [setxy -48 19 set color white set size 1]
  ask fence 124 [setxy -17 48 set color white set size 1]
      ask fence 122 [create-link-with fence 126]
      ask fence 126 [create-link-with fence 123] 
      
  ask fence 125 [setxy -17 19 set color white set size 1]
  ask fence 126 [setxy -48 34 set color white set size 1]
  ask fence 127 [setxy -29 34 set color white set size 1]
      ask fence 122 [create-link-with fence 134] 
      ask fence 134 [create-link-with fence 131] 
      ask fence 130 [create-link-with fence 128] 
     
  ask fence 128 [setxy -39 19 set color white set size 1] 
      ask fence 128 [create-link-with fence 136] 
  
  ask fence 129 [setxy -28 19 set color white set size 1] 
  ask fence 130 [setxy -39 33 set color white set size 1]
  ask fence 131 [setxy -39 35 set color white set size 1]
  ask fence 132 [setxy -38 34 set color white set size 1]
  ask fence 133 [setxy -40 34 set color white set size 1]
  ask fence 134 [setxy -39 48 set color white set size 1]
      ask fence 128 [create-link-with fence 129] 
      ask fence 135 [create-link-with fence 129] 
      ask fence 137 [create-link-with fence 129] 
      ask fence 134 [create-link-with fence 138] 
      ask fence 138 [create-link-with fence 124] 
 
  ask fence 135 [setxy -28 33 set color white set size 1] 
  ask fence 136 [setxy -47 19 set color white set size 1]
  ask fence 137 [setxy -18 19 set color white set size 1]
  ask fence 138 [setxy -28 48 set color white set size 1]
      ask fence 126 [create-link-with fence 133] 
      ask fence 132 [create-link-with fence 127] 
      ask fence 138 [create-link-with fence 139] 
      ask fence 141 [create-link-with fence 140] 
      
  ask fence 139 [setxy -28 35 set color white set size 1]
  ask fence 140 [setxy -27 34 set color white set size 1]
  ask fence 141 [setxy -17 34 set color white set size 1]
      ask fence 124 [create-link-with fence 141] 
      ask fence 141 [create-link-with fence 125] 
    
;;;;;;;;;;;;;;;;;;;;;;;;Farm Bottom Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

  ask fence 142 [setxy 18 -20 set color white set size 1]  
  ask fence 143 [setxy 18 -49 set color white set size 1]
  ask fence 144 [setxy 49 -20 set color white set size 1]
      ask fence 142 [create-link-with fence 146] 
      ask fence 143 [create-link-with fence 146] 
      
  ask fence 145 [setxy 49 -49 set color white set size 1]
  ask fence 146 [setxy 18 -34 set color white set size 1]
  ask fence 147 [setxy 19 -20 set color white set size 1]
      ask fence 147 [create-link-with fence 148] 
      ask fence 148 [create-link-with fence 149] 
      ask fence 144 [create-link-with fence 151] 
     
  ask fence 148 [setxy 27 -20 set color white set size 1] 
      ask fence 159 [create-link-with fence 158] 
  
  ask fence 149 [setxy 38 -20 set color white set size 1]
  ask fence 150 [setxy 26 -34 set color white set size 1]
  ask fence 151 [setxy 39 -20 set color white set size 1]
  ask fence 152 [setxy 27 -33 set color white set size 1]
  ask fence 153 [setxy 28 -34 set color white set size 1]
  ask fence 154 [setxy 27 -35 set color white set size 1]
      ask fence 148 [create-link-with fence 152] 
      ask fence 146 [create-link-with fence 150] 
      ask fence 149 [create-link-with fence 148] 
      ask fence 156 [create-link-with fence 153] 
      ask fence 149 [create-link-with fence 155] 
 
  ask fence 155 [setxy 38 -33 set color white set size 1]
  ask fence 156 [setxy 37 -34 set color white set size 1]
  ask fence 157 [setxy 27 -49 set color white set size 1]
  ask fence 158 [setxy 38 -49 set color white set size 1]
      ask fence 143 [create-link-with fence 157] 
      ask fence 157 [create-link-with fence 158] 
      ask fence 145 [create-link-with fence 157] 
      ask fence 154 [create-link-with fence 157] 
      
  ask fence 159 [setxy 38 -35 set color white set size 1]  
  ask fence 160 [setxy 39 -34 set color white set size 1] 
  ask fence 161 [setxy 49 -34 set color white set size 1] 
      ask fence 160 [create-link-with fence 161] 
      ask fence 145 [create-link-with fence 161] 
      ask fence 144 [create-link-with fence 161] 

 ask links [set thickness .3 set color white set shape "fence"] 
  ]
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Settting up trees;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to setup-trees
  set-default-shape trees "tree"
  create-trees 96
  [ 
  ;;;;;;trees at Center Left;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 162 [setxy -26 13 set color 62 set size 1] 
  ask tree 163 [setxy -28 9 set color 62 set size 1]
  ask tree 164 [setxy -42 10 set color 62 set size 1] 
  ask tree 165 [setxy -46 1 set color 62 set size 1]
  ask tree 166 [setxy -36 -1 set color 62 set size 1]
  ask tree 167 [setxy -22 2 set color 62 set size 1]
  ask tree 168 [setxy -43 -13 set color 62 set size 1]
  ask tree 169 [setxy -30 -13 set color 62 set size 1]
  ask tree 170 [setxy -27 -7 set color 62 set size 1]
  ask tree 171 [setxy -29 -2 set color 62 set size 1]
  ask tree 172 [setxy -45 6 set color 62 set size 1]
  ask tree 173 [setxy -38 -9 set color 62 set size 1]
  
  ;;;;;;;trees at Center Right;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 174 [setxy 21 13 set color 62 set size 1] 
  ask tree 175 [setxy 23 8 set color 62 set size 1] 
  ask tree 176 [setxy 35 13 set color 62 set size 1] 
  ask tree 177 [setxy 44 12 set color 62 set size 1]
  ask tree 178 [setxy 24 0 set color 62 set size 1]
  ask tree 179 [setxy 25 -2 set color 62 set size 1]
  ask tree 180 [setxy 36 2 set color 62 set size 1]
  ask tree 181 [setxy 46 2 set color 62 set size 1] 
  ask tree 182 [setxy 45 -8 set color 62 set size 1] 
  ask tree 183 [setxy 37 -13 set color 62 set size 1] 
  ask tree 184 [setxy 20 -15 set color 62 set size 1] 
  ask tree 185 [setxy 20 -9 set color 62 set size 1] 
  
  ;;;;;;;;;;;trees at Center Center 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 186 [setxy 12 -3 set color 62 set size 1] 
  ask tree 187 [setxy 2 0 set color 62 set size 1] 
  ask tree 188 [setxy 1 -14 set color 62 set size 1]
  ask tree 189 [setxy 11 -11 set color 62 set size .8] 
  ask tree 190 [setxy -13 -14 set color 62 set size 1] 
  ask tree 191 [setxy -4 -14 set color 62 set size 1]
  ask tree 192 [setxy 2 11 set color 62 set size 1] 
  ask tree 193 [setxy 8 10 set color 62 set size 1]
  ask tree 194 [setxy -12 3 set color 62 set size 1]
  ask tree 195 [setxy -7 3 set color 62 set size 1]
  ask tree 196 [setxy -13 12 set color 62 set size 1]
  ask tree 197 [setxy -6 8 set color 62 set size 1]
  
  ;;;;;;;;;;;trees at Bottom Left 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 198 [setxy -47 -23 set color 62 set size 1] 
  ask tree 199 [setxy -42 -26 set color 62 set size 1] 
  ask tree 200 [setxy -27 -19 set color 62 set size 1]
  ask tree 201 [setxy -31 -22 set color 62 set size 1] 
  ask tree 202 [setxy -44 -31 set color 62 set size 1] 
  ask tree 203 [setxy -33 -33 set color 62 set size 1]
  ask tree 204 [setxy -30 -28 set color 62 set size 1] 
  ask tree 205 [setxy -44 -40 set color 62 set size 1]
  ask tree 206 [setxy -40 -41 set color 62 set size 1] 
  ask tree 207 [setxy -32 -41 set color 62 set size 1]
  ask tree 208 [setxy -26 -45 set color 62 set size 1]
  ask tree 209 [setxy -41 -36 set color 62 set size 1]
  
  ;;;;;;;;;;;trees at Bottom Right 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 210 [setxy 20 -23 set color 62 set size 1] 
  ask tree 211 [setxy 21 -31 set color 62 set size 1] 
  ask tree 212 [setxy 30 -23 set color 62 set size 1]
  ask tree 213 [setxy 35 -33 set color 62 set size 1] 
  ask tree 214 [setxy 43 -27 set color 62 set size 1] 
  ask tree 215 [setxy 46 -24 set color 62 set size 1]
  ask tree 216 [setxy 21 -39 set color 62 set size 1] 
  ask tree 217 [setxy 34 -46 set color 62 set size 1]
  ask tree 218 [setxy 41 -46 set color 62 set size 1] 
  ask tree 219 [setxy 44 -39 set color 62 set size 1]
  ask tree 220 [setxy 23 -47 set color 62 set size 1]
  ask tree 221 [setxy 30 -40 set color 62 set size 1]
  
  ;;;;;;;;;;;trees at Up Right 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 222 [setxy -47 45 set color 62 set size 1] 
  ask tree 223 [setxy -42 38 set color 62 set size 1] 
  ask tree 224 [setxy -36 45 set color 62 set size 1]
  ask tree 225 [setxy -31 37 set color 62 set size 1] 
  ask tree 226 [setxy -23 41 set color 62 set size 1] 
  ask tree 227 [setxy -22 38 set color 62 set size 1]
  ask tree 228 [setxy -45 27 set color 62 set size 1] 
  ask tree 229 [setxy -42 26 set color 62 set size 1]
  ask tree 230 [setxy -31 27 set color 62 set size 1] 
  ask tree 231 [setxy -31 22 set color 62 set size 1]
  ask tree 232 [setxy -24 26 set color 62 set size 1]
  ask tree 233 [setxy -23 22 set color 62 set size 1]
  
  ;;;;;;;;;;;trees at Up Center 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 234 [setxy -12 43 set color 62 set size 1] 
  ask tree 235 [setxy -10 35 set color 62 set size 1] 
  ask tree 236 [setxy -2 38 set color 62 set size 1]
  ask tree 237 [setxy -2 43 set color 62 set size 1] 
  ask tree 238 [setxy 7 37 set color 62 set size 1] 
  ask tree 239 [setxy 14 39 set color 62 set size 1]
  ask tree 240 [setxy -12 27 set color 62 set size 1] 
  ask tree 241 [setxy -11 28 set color 62 set size 1]
  ask tree 242 [setxy -4 22 set color 62 set size 1] 
  ask tree 243 [setxy 0 22 set color 62 set size 1]
  ask tree 244 [setxy 10 24 set color 62 set size 1]
  ask tree 245 [setxy 14 29 set color 62 set size 1]
  
  ;;;;;;;;;;;trees at Up Right 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask tree 246 [setxy 22 45 set color 62 set size 1] 
  ask tree 247 [setxy 29 41 set color 62 set size 1] 
  ask tree 248 [setxy 21 36 set color 62 set size 1]
  ask tree 249 [setxy 26 33 set color 62 set size 1] 
  ask tree 250 [setxy 23 23 set color 62 set size 1] 
  ask tree 251 [setxy 29 22 set color 62 set size 1]
  ask tree 252 [setxy 40 44 set color 62 set size 1] 
  ask tree 253 [setxy 39 43 set color 62 set size 1]
  ask tree 254 [setxy 33 33 set color 62 set size 1] 
  ask tree 255 [setxy 42 32 set color 62 set size 1]
  ask tree 256 [setxy 40 22 set color 62 set size 1]
  ask tree 257 [setxy 44 24 set color 62 set size 1]
   ]
end

;;;;;;;;;;;;;;;;;Go Procedure;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to go
  Farmers-Cow-Rotation
  move-cow-rotation-pasture-regrow
  season
  graze
  display-labels
  average-miles-distance-manure
  read-file
  write-to-file
  
  ;;;;;;;;;;;Defining Slope Percentage and Adjustment;;;;;;
  if slope1 = 1 [set slope-range (word ("0% - 10%"))]
  if slope1 = .7 [set slope-range (word ("11% - 30%"))]
  if slope1 = .3 [set slope-range (word ("31% - 60%"))]
  set slope-range1 (word ("0% - 10%"))
  
  ;;;;;;;;;Setting up Pre-interaction and Interaction;;;;;;
  if ticks >= 5490 [set daily-planning-horizon ticks - 5490]
  if ticks >= 0 and ticks < 5490 [set daily-pre-interaction ticks + 1]
  if ticks > 5489 [set daily-pre-interaction 0]
  
  ;;;;;;;;;;;;;Setting up Seasonal Weight;;;;;;;;;;;;;;;;;;
  if timer-loop-sequence >= 0 and timer-loop-sequence <= 798.5 [set seasonal-weight-gain 1.5];; 
  if timer-loop-sequence > 798.5 and timer-loop-sequence <= 1046 [set seasonal-weight-gain .793];;0.793 adjusts weight gain during winter season to 0.87.
  
  ;;;;;;;;;;;;;;;;;;;;;;Hay Harvesting I;;;;;;;;;;;;;;;;;;;;;;;;;;
   if timer-loop-sequence = 591.5 and ticks > 5490 [create-tractors-hay 1  
   ask tractors-hay [ set color blue set size .7 set shape "hay collector" setxy -1 -6 set goal patch -14 -6 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 596 and ticks > 5490  [ask tractors-hay [setxy -16 -7 set goal patch -3 -7 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 600.5 and ticks > 5490  [ask tractors-hay [setxy -1 -8 set goal patch -14 -8 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 605 and ticks > 5490  [ask tractors-hay [setxy -16 -9 set goal patch -3 -9 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 609.5 and ticks > 5490  [ask tractors-hay [setxy -1 -10 set goal patch -14 -10 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 614 and ticks > 5490  [ask tractors-hay [setxy -16 -11 set goal patch -3 -11 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 618.5 and ticks > 5490  [ask tractors-hay [setxy -1 -12 set goal patch -14 -12 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 623 and ticks > 5490  [ask tractors-hay [setxy -16 -13 set goal patch -3 -13 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 627.5 and ticks > 5490  [ask tractors-hay [setxy -1 -14 set goal patch -14 -14 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 632 and ticks > 5490  [ask tractors-hay [setxy -16 -15 set goal patch -3 -15 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
                   
   
 ask patches with [pcolor = 52] [if timer-loop-sequence = 675.5 and pxcor > -16 and pxcor < 0 and pycor < -4 and pycor > -17 [set pcolor green]]; 1er paddock                  
                                 
   if timer-loop-sequence = 635 and ticks > 5490  [ask tractors-hay [setxy -1 -6 set goal patch 12 -6 face goal]] 
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 639.5 and ticks > 5490  [ask tractors-hay[setxy 14 -7 set goal patch 0 -7 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 644 and ticks > 5490  [ask tractors-hay [setxy -1 -8 set goal patch 12 -8 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 648.5 and ticks > 5490  [ask tractors-hay [setxy 14 -9 set goal patch 0 -9 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 653 and ticks > 5490  [ask tractors-hay [setxy -1 -10 set goal patch 12 -10 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 657.5 and ticks > 5490  [ask tractors-hay [setxy 14 -11 set goal patch 0 -11 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 662 and ticks > 5490  [ask tractors-hay [setxy -1 -12 set goal patch 12 -12 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 666.5 and ticks > 5490  [ask tractors-hay [setxy 14 -13 set goal patch 0 -13 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 671 and ticks > 5490 [ask tractors-hay [setxy -1 -14 set goal patch 12 -14 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 675.5 and ticks > 5490  [ask tractors-hay [setxy 14 -15 set goal patch 0 -15 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 680 and ticks > 5490 [ask tractors-hay [die]] 
                    
 ask patches with [pcolor = 52] [if timer-loop-sequence = 725 and pxcor > -2 and pxcor < 15 and pycor < -4 and pycor > -17 [set pcolor green]]; 2do paddock 
 
 ;;;;;;;;;;;;;;;;;;;;;;Hay Harvesting II;;;;;;;;;;;;;;;;;;;;;;;;;;
   if timer-loop-sequence = 683 and ticks > 5490 [create-tractors-hay 1  
   ask tractors-hay [ set color blue set size .7 set shape "hay collector" setxy -1 -6 set goal patch -14 -6 face goal]] ;;3
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 687.5 and ticks > 5490  [ask tractors-hay [setxy -16 -7 set goal patch -3 -7 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 692 and ticks > 5490  [ask tractors-hay [setxy -1 -8 set goal patch -14 -8 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 696.5 and ticks > 5490  [ask tractors-hay [setxy -16 -9 set goal patch -3 -9 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 701 and ticks > 5490  [ask tractors-hay [setxy -1 -10 set goal patch -14 -10 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 705.5 and ticks > 5490  [ask tractors-hay [setxy -16 -11 set goal patch -3 -11 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52] 
   if timer-loop-sequence = 710 and ticks > 5490  [ask tractors-hay [setxy -1 -12 set goal patch -14 -12 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 714.5 and ticks > 5490  [ask tractors-hay [setxy -16 -13 set goal patch -3 -13 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 719 and ticks > 5490  [ask tractors-hay [setxy -1 -14 set goal patch -14 -14 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 723.5 and ticks > 5490  [ask tractors-hay [setxy -16 -15 set goal patch -3 -15 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   
 ask patches with [pcolor = 52] [if timer-loop-sequence = 767 and pxcor > -16 and pxcor < 0 and pycor < -4 and pycor > -17 [set pcolor green]]; 1er paddock                  
                                 
   if timer-loop-sequence = 726.5 and ticks > 5490  [ask tractors-hay [setxy -1 -6 set goal patch 12 -6 face goal]] 
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 731 and ticks > 5490  [ask tractors-hay[setxy 14 -7 set goal patch 0 -7 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 735.5 and ticks > 5490  [ask tractors-hay [setxy -1 -8 set goal patch 12 -8 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 740 and ticks > 5490  [ask tractors-hay [setxy 14 -9 set goal patch 0 -9 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]; 
   if timer-loop-sequence = 744.5 and ticks > 5490  [ask tractors-hay [setxy -1 -10 set goal patch 12 -10 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 749 and ticks > 5490  [ask tractors-hay [setxy 14 -11 set goal patch 0 -11 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 753.5 and ticks > 5490  [ask tractors-hay [setxy -1 -12 set goal patch 12 -12 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 758 and ticks > 5490  [ask tractors-hay [setxy 14 -13 set goal patch 0 -13 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 762.5 and ticks > 5490 [ask tractors-hay [setxy -1 -14 set goal patch 12 -14 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 767 and ticks > 5490  [ask tractors-hay [setxy 14 -15 set goal patch 0 -15 face goal]]
   ask tractors-hay [ face goal fd 1 set pcolor 52]
   if timer-loop-sequence = 771.5 and ticks > 5490 [ask tractors-hay [die]] 
                    
 ask patches with [pcolor = 52] [if timer-loop-sequence = 815 and pxcor > -2 and pxcor < 15 and pycor < -4 and pycor > -17 [set pcolor green]]; 2do paddock  
             
                    
   ;;;;;;;;;;;;;;;;;;Fertilizer Application;;;;;;;;;;;;;;;;
   if timer-loop-sequence = 546.5 and ticks > 5490 [create-tractors-fertilizer 1 
   ask tractors-fertilizer [ set color blue set size .7 set shape "digested manure applicator" setxy 3 -6 set goal patch -14 -6 face goal]]
   ask tractors-fertilizer [ face goal fd .5]; 
 
   if timer-loop-sequence = 552.5 and ticks > 5490   [ask tractors-fertilizer [setxy 3 -10 set goal patch -14 -10 face goal]]
   ask tractors-fertilizer [ face goal fd .5]; 

   if timer-loop-sequence = 558.5 and ticks > 5490   [ask tractors-fertilizer [setxy 3 -14 set goal patch -14 -14 face goal]]
   ask tractors-fertilizer [ face goal fd .5];
    
   if timer-loop-sequence = 564.5 and ticks > 5490   [ask tractors-fertilizer [setxy 16 -7 set goal patch 0 -7 face goal]] 
   ask tractors-fertilizer [ face goal fd 1]; 
   
   if timer-loop-sequence = 569 and ticks > 5490  [ask tractors-fertilizer [setxy 16 -9 set goal patch 0 -9 face goal]]
   ask tractors-fertilizer [ face goal fd 1]; 
  
   if timer-loop-sequence = 575 and ticks > 5490  [ask tractors-fertilizer [setxy 15 -13 set goal patch 0 -13 face goal]]
   ask tractors-fertilizer [ face goal fd 1]; 
   if timer-loop-sequence = 579.5 and ticks > 5490  [ask tractors-fertilizer [die]]
   
    
  ;;;;;;;;;;;;;;;;;;;Setting up Trucks for Manure Transportation;;;;;;;;;;;;;;  
    if timer-loop-sequence = 779 and clusters = 1 and ticks > 5671 [create-hauling-trucks1 1 [set color blue set size .8 set label-color blue set shape "truck" setxy 17 47 set goal patch 17 16 face goal]]   
    if timer-loop-sequence = 779 and clusters = 2 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]]    
    if timer-loop-sequence = 779 and clusters = 3 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1 create-hauling-trucks3 1 
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]
     ask hauling-trucks3 [set color blue set size .8 set label-color blue setxy -23 16 set goal patch 17 16 face goal set shape "truck"]]    
    if timer-loop-sequence = 779 and clusters = 4 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1 create-hauling-trucks3 1 create-hauling-trucks4 1
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]
     ask hauling-trucks3 [set color blue set size .8 set label-color blue setxy -23 16 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks4 [set color blue set size .8 set label-color blue setxy -16 -32 set goal patch -16 -17 face goal set shape "truck"]]  
    if timer-loop-sequence = 779 and clusters = 5 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1 create-hauling-trucks3 1 create-hauling-trucks4 1 
      create-hauling-trucks5 1
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]
     ask hauling-trucks3 [set color blue set size .8 set label-color blue setxy -23 16 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks4 [set color blue set size .8 set label-color blue setxy -16 -32 set goal patch -16 -17 face goal set shape "truck"]
     ask hauling-trucks5 [set color blue set size .8 set label-color blue setxy 17 -25 set goal patch 17 16 face goal set shape "truck left"]]   
    
     if timer-loop-sequence = 962 and clusters = 1 and ticks > 5671 [create-hauling-trucks1 1 [set color blue set size .8 set label-color blue set shape "truck" setxy 17 47 set goal patch 17 16 face goal]]   
    if timer-loop-sequence = 962 and clusters = 2 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]]    
    if timer-loop-sequence = 962 and clusters = 3 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1 create-hauling-trucks3 1 
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]
     ask hauling-trucks3 [set color blue set size .8 set label-color blue setxy -23 16 set goal patch 17 16 face goal set shape "truck"]]    
    if timer-loop-sequence = 962 and clusters = 4 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1 create-hauling-trucks3 1 create-hauling-trucks4 1
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]
     ask hauling-trucks3 [set color blue set size .8 set label-color blue setxy -23 16 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks4 [set color blue set size .8 set label-color blue setxy -16 -11 set goal patch -16 -17 face goal set shape "truck"]]  
    if timer-loop-sequence = 962 and clusters = 5 and ticks > 5671 [create-hauling-trucks1 1 create-hauling-trucks2 1 create-hauling-trucks3 1 create-hauling-trucks4 1 
      create-hauling-trucks5 1
     ask hauling-trucks1 [set color blue set size .8 set label-color blue setxy 17 47 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks2 [set color blue set size .8 set label-color blue setxy 47 16 set goal patch 17 16 face goal set shape "truck left"]
     ask hauling-trucks3 [set color blue set size .8 set label-color blue setxy -23 16 set goal patch 17 16 face goal set shape "truck"]
     ask hauling-trucks4 [set color blue set size .8 set label-color blue setxy -16 -32 set goal patch -16 -17 face goal set shape "truck"]
     ask hauling-trucks5 [set color blue set size .8 set label-color blue setxy 17 -25 set goal patch 17 16 face goal set shape "truck left"]]   
  
  ;;;;;;;;;;;;Truck 1;;;;;;;;;;;;;;;;;;;;;   
 ask hauling-trucks1 
    [ ifelse patch-here = goal 
      [  ] 
      [ face goal  
    fd 5 ]]
 ask hauling-trucks1  [if timer-loop-sequence = 783.5 [set heading 360 set goal patch 17 -7 face goal]]
 ask hauling-trucks1  [if timer-loop-sequence = 786.5 [die]] 
 ask hauling-trucks1  [if timer-loop-sequence = 966.5 [set heading 360 set goal patch 17 -7 face goal]]
 ask hauling-trucks1  [if timer-loop-sequence = 969.5 [die]] 
 
 ;;;;;;;;;;;;Truck 2;;;;;;;;;;;;;;;;;;;;;   
 ask hauling-trucks2 
    [ ifelse patch-here = goal
    [  ]
    [ face goal
    fd 5]]
 ask hauling-trucks2  [if timer-loop-sequence = 785 [set heading 180 set goal patch 17 -8 face goal]]
 ask hauling-trucks2  [if timer-loop-sequence = 797 [die]]
 ask hauling-trucks2  [if timer-loop-sequence = 966.5 [set heading 180 set goal patch 17 -8 face goal]]
 ask hauling-trucks2  [if timer-loop-sequence = 974 [die]]
 
;;;;;;;;;;;;Truck 3;;;;;;;;;;;;;;;;;;;;;   
 ask hauling-trucks3 
    [ ifelse patch-here = goal
    [  ]
    [ face goal
    fd 5]]
 ask hauling-trucks3  [if timer-loop-sequence = 785 [set heading 180 set goal patch 17 -2 face goal]]
 ask hauling-trucks3  [if timer-loop-sequence = 797 [die]]
 ask hauling-trucks3  [if timer-loop-sequence = 968  [set heading 180 set goal patch 17 -2 face goal]]
 ask hauling-trucks3  [if timer-loop-sequence = 974 [die]]
 
 ;;;;;;;;;;;;Truck 4;;;;;;;;;;;;;;;;;;;;;     
 ask hauling-trucks4 
    [ ifelse patch-here = goal
    [  ]
    [ face goal
    fd 3]]
 ask hauling-trucks4  [if timer-loop-sequence = 783.5 [set heading 90 set goal patch 17 -17 face goal]]
 ask hauling-trucks4  [if timer-loop-sequence = 792.5  [set heading 90 set goal patch 17 -5 face goal]]
 ask hauling-trucks4  [if timer-loop-sequence = 794  [die]]
 ask hauling-trucks4  [if timer-loop-sequence = 966.5 [set heading 90 set goal patch 17 -17 face goal]]
 ask hauling-trucks4  [if timer-loop-sequence = 975.5  [set heading 90 set goal patch 17 -5 face goal]]
 ask hauling-trucks4  [if timer-loop-sequence = 975.5  [die]]
 
;;;;;;;;;;;;Truck 5;;;;;;;;;;;;;;;;;;;;;   
 ask hauling-trucks5 
    [ ifelse patch-here = goal
    [  ]
    [ face goal
    fd 3]]
 ask hauling-trucks5  [if timer-loop-sequence = 783.5  [set heading 180 set goal patch 17 -5 face goal]]
 ask hauling-trucks5  [if timer-loop-sequence = 788 [die]]
 ask hauling-trucks5  [if timer-loop-sequence = 966.5  [set heading 180 set goal patch 17 -5 face goal]]
 ask hauling-trucks5  [if timer-loop-sequence = 971 [die]] 

 ;;Setting up Clustering Interaction among Farm of Interest and Cow/Calf Farms during Winter;;;;;   
  if timer-loop-sequence >= 771.5  and clusters = 1 and ticks > 5489 [ask (farmhouse 258)  
   [create-link-with farmhouse 259] ask links with [color = 5] [set thickness .1 set color 13 set shape "simple"]]  
  if timer-loop-sequence >= 771.5 and clusters = 2 and ticks > 5489 [ask (farmhouse 258) 
   [create-link-with farmhouse 259 create-link-with farmhouse 260 ] 
   ask links with [color = 5] [set thickness .1 set color 13 set shape "simple"]]  
  if timer-loop-sequence >= 771.5 and clusters = 3 and ticks > 5489 [ask (farmhouse 258)  
   [create-link-with farmhouse 259 create-link-with farmhouse 260 create-link-with farmhouse 261] 
   ask links with [color = 5] [set thickness .1 set color 13 set shape "simple"]]    
  if timer-loop-sequence >= 771.5 and clusters = 4 and ticks > 5489 [ask (farmhouse 258)  
   [create-link-with farmhouse 259 create-link-with farmhouse 260 create-link-with farmhouse 261 create-link-with farmhouse 264] 
   ask links with [color = 5] [set thickness .1 set color 13 set shape "simple"]] 
  if timer-loop-sequence >= 771.5 and clusters = 5 and ticks > 5489 [ask (farmhouse 258)  
   [create-link-with farmhouse 259 create-link-with farmhouse 260 create-link-with farmhouse 261 create-link-with farmhouse 264 create-link-with farmhouse 265] 
   ask links with [color = 5] [set thickness .1 set color 13 set shape "simple"]]       
  if timer-loop-sequence = 1046 [ask links with [color = 13] [die]]  

 ;;;;;;;;;;;;;;;;;;;;;;;;Clustering with Hay Farm: Stocker Farms;;;;;;;;;;;;;;;;;;; 
  if ticks >= initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 and heads-nearby-11 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown  set shape "simple"]] 
  if ticks = initial-time-frame * 15 + 16 + 180 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 and heads-nearby-11 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 15 + 16 + 180 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 365 and heads-interest-11 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 15 + 16 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 and heads-nearby-12 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 16 + 17 + 180 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 and heads-nearby-12 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 16 + 17 + 180 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 365 and heads-interest-12 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 16 + 17 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 and heads-nearby-13 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 17 + 18 + 180 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 and heads-nearby-13 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 17 + 18 + 180 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 365 and heads-interest-13 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 17 + 18 + 364  [ask links with [color = blue] [die]] 
  
  if ticks >= initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 and heads-nearby-14 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 18 + 19 + 180 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 and heads-nearby-14 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 18 + 19 + 180 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 365 and heads-interest-14 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 18 + 19 + 364 [ask links with [color = blue] [die]]  
  
  if ticks >= initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 and heads-nearby-15 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 19 + 20 + 180 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 and heads-nearby-15 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 19 + 20 + 180 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 365 and heads-interest-15 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 19 + 20 + 364 [ask links with [color = blue] [die]] 
  
  if ticks >= initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 and heads-nearby-16 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 20 + 21 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 and heads-nearby-16 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 20 + 21 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 365 and heads-interest-16 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 20 + 21 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 and heads-nearby-17 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 21 + 22 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 and heads-nearby-17 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 21 + 22 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 365 and heads-interest-17 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 21 + 22 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 and heads-nearby-18 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 22 + 23 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 and heads-nearby-18 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 22 + 23 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 365 and heads-interest-18 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 22 + 23 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 and heads-nearby-19 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 23 + 24 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 and heads-nearby-19 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 23 + 24 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 365 and heads-interest-19 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 23 + 24 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 and heads-nearby-110 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 24 + 25 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 and heads-nearby-110 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 24 + 25 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 365 and heads-interest-110 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 24 + 25 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 and heads-nearby-111 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 25 + 26 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 and heads-nearby-111 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 25 + 26 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 365 and heads-interest-111 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 25 + 26 + 364 [ask links with [color = blue] [die]]
  
  if ticks >= initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 and heads-nearby-112 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 26 + 27 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 and heads-nearby-112 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 26 + 27 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 365 and heads-interest-112 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 26 + 27 + 364 [ask links with [color = blue] [die]]
  
 if ticks >= initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 and heads-nearby-113 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 27 + 28 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 and heads-nearby-113 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 27 + 28 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 365 and heads-interest-113 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 27 + 28 + 364 [ask links with [color = blue] [die]] 
  
  if ticks >= initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 and heads-nearby-114 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 28 + 29 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 and heads-nearby-114 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 28 + 29 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 365 and heads-interest-114 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 28 + 29 + 364 [ask links with [color = blue] [die]]  
  
  if ticks >= initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 and heads-nearby-115 < average-stocking-nearby [ask (farmhouse 263) 
   [create-link-with farmhouse 266
   ]
  ask link 263 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 29 + 30 + 183 [ask links with [color = brown] [die]]
  if ticks >= initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 and heads-nearby-115 < average-stocking-nearby [ask (farmhouse 262) 
   [create-link-with farmhouse 266
   ]
  ask link 262 266 [set thickness .1 set color brown set shape "simple"]] 
  if ticks = initial-time-frame * 29 + 30 + 183 [ask links with [color = brown] [die]]
  
  if ticks >= initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 365 and heads-interest-115 < average-stocking-stocker [ask (farmhouse 258) 
   [create-link-with farmhouse 266
   ]
  ask link 258 266 [set thickness .1 set color blue set shape "simple"]] 
  if ticks = initial-time-frame * 29 + 30 + 364 [ask links with [color = blue] [die]] 
  
  ;;;;;;;;;;;;;;;;;;;;;;Silage Transportation Interaction;;;;;;;;;;;;;;;;;;;;
  ;;;;Adjacent Stocker Farm (Left): Agent 262
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 15 + 16  and heads-nearby-11 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 16 + 17  and heads-nearby-12 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 17 + 18  and heads-nearby-13 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 18 + 19  and heads-nearby-14 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 19 + 20  and heads-nearby-15 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 20 + 21  and heads-nearby-16 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 21 + 22  and heads-nearby-17 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 22 + 23  and heads-nearby-18 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 23 + 24  and heads-nearby-19 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 24 + 25  and heads-nearby-110 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 25 + 26  and heads-nearby-111 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 26 + 27  and heads-nearby-112 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 27 + 28  and heads-nearby-113 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 28 + 29  and heads-nearby-114 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 29 + 30  and heads-nearby-115 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  
  ;;;;Farm of Interest (Center): Agent 258
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 180 and average-stocking-stocker > heads-interest-11 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 16 + 17  and ticks < initial-time-frame * 16 + 17 + 180 and  average-stocking-stocker > heads-interest-12 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 17 + 18  and ticks < initial-time-frame * 17 + 18 + 180 and average-stocking-stocker > heads-interest-13 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 18 + 19  and ticks < initial-time-frame * 18 + 19 + 180 and  average-stocking-stocker > heads-interest-14 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 19 + 20  and ticks < initial-time-frame * 19 + 20 + 180 and  average-stocking-stocker > heads-interest-15 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 20 + 21  and ticks < initial-time-frame * 20 + 21 + 180 and heads-interest-16 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 21 + 22  and ticks < initial-time-frame * 21 + 22 + 180 and heads-interest-17 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 22 + 23  and ticks < initial-time-frame * 22 + 23 + 180 and heads-interest-18 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 23 + 24  and ticks < initial-time-frame * 23 + 24 + 180 and heads-interest-19 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 24 + 25  and ticks < initial-time-frame * 24 + 25 + 180 and heads-interest-110 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 25 + 26  and ticks < initial-time-frame * 25 + 26 + 180 and heads-interest-111 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 26 + 27  and ticks < initial-time-frame * 26 + 27 + 180 and heads-interest-112 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 27 + 28  and ticks < initial-time-frame * 27 + 28 + 180 and heads-interest-113 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 28 + 29  and ticks < initial-time-frame * 28 + 29 + 180 and heads-interest-114 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 29 + 30  and ticks < initial-time-frame * 29 + 30 + 180 and heads-interest-115 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  
  ;;;;Adjacent Stocker Farm (Right): Agent 263
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 15 + 16  and heads-nearby-11 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 16 + 17  and heads-nearby-12 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 17 + 18  and heads-nearby-13 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 18 + 19  and heads-nearby-14 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 19 + 20  and heads-nearby-15 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 20 + 21  and heads-nearby-16 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 21 + 22  and heads-nearby-17 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 22 + 23  and heads-nearby-18 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 23 + 24  and heads-nearby-19 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 24 + 25  and heads-nearby-110 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 25 + 26  and heads-nearby-111 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 26 + 27  and heads-nearby-112 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 27 + 28  and heads-nearby-113 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 28 + 29  and heads-nearby-114 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 540 and timer-loop-sequence < 541 and ticks >= initial-time-frame * 29 + 30  and heads-nearby-115 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  
  ;;;;;;;;Silage Trucks Interaction
  ;;;;Adjacent Stocker Farm (Left): Agent 262
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 15 + 16  and heads-nearby-11 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 16 + 17  and heads-nearby-12 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 17 + 18  and heads-nearby-13 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 18 + 19  and heads-nearby-14 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 19 + 20  and heads-nearby-15 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 20 + 21  and heads-nearby-16 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 21 + 22  and heads-nearby-17 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 22 + 23  and heads-nearby-18 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 23 + 24  and heads-nearby-19 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 24 + 25  and heads-nearby-110 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 25 + 26  and heads-nearby-111 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 26 + 27  and heads-nearby-112 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 27 + 28  and heads-nearby-113 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 28 + 29  and heads-nearby-114 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 29 + 30  and heads-nearby-115 < average-stocking-nearby [create-silages-truck1 1 
  ask silages-truck1 [ set color 62 set size .7 set shape "silage truck" setxy -16 -39 set goal patch -16 -11 face goal]]
  
  ;;;;Farm of Interest (Center): Agent 258
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 15 + 16  and ticks < initial-time-frame * 15 + 16 + 180 and average-stocking-stocker > heads-interest-11 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 16 + 17  and ticks < initial-time-frame * 16 + 17 + 180 and average-stocking-stocker > heads-interest-12 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 17 + 18  and ticks < initial-time-frame * 17 + 18 + 180 and average-stocking-stocker > heads-interest-13 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 18 + 19  and ticks < initial-time-frame * 18 + 19 + 180 and average-stocking-stocker > heads-interest-14 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 19 + 20  and ticks < initial-time-frame * 19 + 20 + 180 and average-stocking-stocker > heads-interest-15 [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 20 + 21  and ticks < initial-time-frame * 20 + 21 + 180 and heads-interest-16 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 21 + 22  and ticks < initial-time-frame * 21 + 22 + 180 and heads-interest-17 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 22 + 23  and ticks < initial-time-frame * 22 + 23 + 180 and heads-interest-18 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 23 + 24  and ticks < initial-time-frame * 23 + 24 + 180 and heads-interest-19 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 24 + 25  and ticks < initial-time-frame * 24 + 25 + 180 and heads-interest-110 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 25 + 26  and ticks < initial-time-frame * 25 + 26 + 180 and heads-interest-111 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 26 + 27  and ticks < initial-time-frame * 26 + 27 + 180 and heads-interest-112 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 27 + 28  and ticks < initial-time-frame * 27 + 28 + 180 and heads-interest-113 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 28 + 29  and ticks < initial-time-frame * 28 + 29 + 180 and heads-interest-114 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 29 + 30  and ticks < initial-time-frame * 29 + 30 + 180 and heads-interest-115 < average-stocking-stocker [create-silages-truck 1 
  ask silages-truck [ set color 62 set size .7 set shape "silage truck" setxy 17 -45 set goal patch 17 -17 face goal]]
  
  ;;;;Adjacent Stocker Farm (Right): Agent 263
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 15 + 16  and heads-nearby-11 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 16 + 17  and heads-nearby-12 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 17 + 18  and heads-nearby-13 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 18 + 19  and heads-nearby-14 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 19 + 20  and heads-nearby-15 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 20 + 21  and heads-nearby-16 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 21 + 22  and heads-nearby-17 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 22 + 23  and heads-nearby-18 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 23 + 24  and heads-nearby-19 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 24 + 25  and heads-nearby-110 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 25 + 26  and heads-nearby-111 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 26 + 27  and heads-nearby-112 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 27 + 28  and heads-nearby-113 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 28 + 29  and heads-nearby-114 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  if timer-loop-sequence > 624 and timer-loop-sequence < 625 and ticks >= initial-time-frame * 29 + 30  and heads-nearby-115 < average-stocking-nearby [create-silages-truck2 1 
  ask silages-truck2 [ set color 62 set size .7 set shape "silage truck" setxy 17 -42 set goal patch 17 -17 face goal]]
  
  ask silages-truck 
    [ ifelse patch-here = goal 
      [  ] 
      [ face goal  
    fd 5 ]]
  ask silages-truck  [if timer-loop-sequence > 546 and timer-loop-sequence < 547 [set heading 360 face goal set goal patch 17 -4]]
  ask silages-truck  [if timer-loop-sequence > 553 and timer-loop-sequence <= 600 [die]] 
  ask silages-truck  [if timer-loop-sequence > 630 and timer-loop-sequence < 631 [set heading 360 face goal set goal patch 17 -4]]
  ask silages-truck  [if timer-loop-sequence > 637 and timer-loop-sequence <= 644 [die]] 
  
  ask silages-truck1 
    [ ifelse patch-here = goal 
      [  ] 
      [ face goal  
    fd 5 ]]
  ask silages-truck1  [if timer-loop-sequence > 549 and timer-loop-sequence < 550 [set heading 360 face goal set goal patch -16 -11]]
  ask silages-truck1  [if timer-loop-sequence > 552 and timer-loop-sequence <= 559 [die]] 
  ask silages-truck1  [if timer-loop-sequence > 630 and timer-loop-sequence < 631 [set heading 360 face goal set goal patch -16 -11]]
  ask silages-truck1  [if timer-loop-sequence > 633 and timer-loop-sequence <= 640 [die]] 
 
 ask silages-truck2 
    [ ifelse patch-here = goal 
      [  ] 
      [ face goal  
    fd 5 ]]
  ask silages-truck2  [if timer-loop-sequence > 549 and timer-loop-sequence < 550 [set heading 360 face goal set goal patch 48 -17]]
  ask silages-truck2  [if timer-loop-sequence > 561 and timer-loop-sequence <= 600 [die]] 
  ask silages-truck2  [if timer-loop-sequence > 630 and timer-loop-sequence < 631 [set heading 360 face goal set goal patch 48 -17]]
  ask silages-truck2  [if timer-loop-sequence > 642 and timer-loop-sequence <= 650 [die]] 
    
end

to farmers-cow-rotation
  ;;Stocking rate rotation from one to paddock to another by the farmer;;;;;
  ;;;;;;;Farmer of Interest;;;;;;;;;;;;;;;;;
  
   if timer-loop-sequence = 500 and ticks > 5490 [
   ask farmers0 [setxy 13 14 set goal patch 0 6 face goal set heading 180]] 
   ask farmers0 [if timer-loop-sequence = 548 and ticks > 5490 [setxy -15 15 set goal patch -2 6 face goal set heading 180]]
   ask farmers0 [if timer-loop-sequence = 593 and ticks > 5490 [setxy -15 -4 set goal patch -2 4 face goal set heading 180]]
   ask farmers0 [if timer-loop-sequence = 639.5 and ticks > 5490 [setxy 13 -4 set goal patch 0 4 face goal set heading 180]]
   ask farmers0 [if timer-loop-sequence = 683 and ticks > 5490 [setxy -14 6 set goal patch 0 2 face goal set heading 180]]
   ask farmers0 [if timer-loop-sequence = 728 and ticks > 5490 [setxy 0 6 set goal patch 13 14 face goal set heading 180]]
   ask farmers0 [if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [setxy 15 -4]]
   
   ;;;;;;;Farmer 2 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers1 [setxy -20 14 set goal patch -33 6 face goal set heading 180]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers1 [setxy -47 14 set goal patch -35 6 face goal set heading 180]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers1 [setxy -48 -4 set goal patch -35 4 face goal set heading 180]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers1 [setxy -20 4 set goal patch -33 -4 face goal set heading 180]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers1 [setxy -47 -15 set goal patch -35 -6 face goal set heading 180]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers1 [setxy -33 -15 set goal patch -20 -6 face goal set heading 180]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers1 [setxy -18 -11]]
 
   ;;;;;;;Farmer 3 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers2 [setxy 46 14 set goal patch 33 6 face goal]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers2 [setxy 31 14 set goal patch 19 6 face goal]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers2 [setxy 19 -4 set goal patch 31 4 face goal]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers2 [setxy 46 4 set goal patch 33 -4 face goal]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers2 [setxy 19 -6 set goal patch 31 -15 face goal]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers2 [setxy 33 -15 set goal patch 46 -6 face goal]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers2  [setxy 48 8]]
  
   ;;;;;;;Farmer 4 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers3 [setxy -20 -28 set goal patch -33 -38 face goal fd .1]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers3 [setxy -47 -48 set goal patch -35 -38 face goal fd .1]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers3 [setxy -48 -28 set goal patch -35 -37 face goal fd .1]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers3 [setxy -20 -36 set goal patch -33 -28 face goal fd .1]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers3 [setxy -47 -19 set goal patch -35 -27 face goal fd .1]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers3 [setxy -33 -26 set goal patch -20 -19 face goal fd .1]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers3 [setxy -17 -36]]
  
   ;;;;;;;Farmer 5 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers4 [setxy 49 21 set goal patch 39 -33 face goal fd .1]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers4 [setxy 48 -35 set goal patch 39 -35 face goal fd .1]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers4 [setxy 28 -48 set goal patch 37 -35 face goal fd .1]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers4 [setxy 37 -21 set goal patch 28 -33 face goal fd .1]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers4 [setxy 26 -48 set goal patch 19 -35 face goal fd .1]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers4 [setxy 26 -33 set goal patch 19 -21 face goal fd .1]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers4 [setxy 29 -19]]
  
   ;;;;;;;Farmer 6 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers5 [setxy -18 20 set goal patch -28 34 face goal fd .1]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers5 [setxy -18 35 set goal patch -27 47 face goal fd .1]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers5 [setxy -38 47 set goal patch -29 35 face goal fd .1]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers5 [setxy -29 20 set goal patch -38 33 face goal fd .1]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers5 [setxy -40 48 set goal patch -48 35 face goal fd .1]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers5 [setxy -40 33 set goal patch -48 20 face goal fd .1]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers5 [setxy -36 17]]
   
   ;;;;;;;Farmer 7 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers6 [setxy 47 18 set goal patch 33 24 face goal fd .1]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers6 [setxy 19 18 set goal patch 31 27 face goal fd .1]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers6 [setxy 46 29 set goal patch 33 38 face goal fd .1]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers6 [setxy 31 29 set goal patch 19 38 face goal fd .1]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers6 [setxy 19 40 set goal patch 31 47 face goal fd .1]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers6 [setxy 33 40 set goal patch 47 47 face goal fd .1]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers6 [setxy 48 35]]
   
    ;;;;;;;Farmer 8 Adjacent;;;;;;;;;
   if timer-loop-sequence = 500 and ticks > 5490 [ask farmers7 [setxy -15 46 set goal patch -7 33 face goal fd .1]]
   if timer-loop-sequence = 548 and ticks > 5490 [ask farmers7 [setxy -15 32 set goal patch -7 18 face goal fd .1]]
   if timer-loop-sequence = 593 and ticks > 5490 [ask farmers7 [setxy 4 18 set goal patch -5 31 face goal fd .1]]
   if timer-loop-sequence = 639.5 and ticks > 5490 [ask farmers7 [setxy 4 45 set goal patch 4 33 face goal fd .1]]
   if timer-loop-sequence = 683 and ticks > 5490 [ask farmers7 [setxy 6 18 set goal patch 15 31 face goal fd .1]]
   if timer-loop-sequence = 728 and ticks > 5490 [ask farmers7 [setxy 15 33 set goal patch 15 45 face goal fd .1]]
   if timer-loop-sequence >= 773 and timer-loop-sequence <= 1046 and ticks > 5490 [ask farmers7 [setxy 8 47]]
  
  
end
;;;;;;;;;;;;;;;;;;;;;;;Computing Distance in Miles;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to average-miles-distance-manure 
 
 if ticks = initial-time-frame * 15 + 16 + 185 and clusters > 0 [ask farmhouse 258 [set count-links count my-links]] ;; compute the number of links for this farm 
 if ticks = initial-time-frame * 15 + 16 + 185 and clusters > 0 [ask farmhouse 258 [set total-length sum [link-length] of my-links]];; setting the total distance variable  
 if ticks = initial-time-frame * 15 + 16 + 185 and clusters > 0 [ask farmhouse 258 [set average-miles (total-length / count-links) * distance-factor]] ;; setting average miles as variable

end

to move-cow-rotation-pasture-regrow
;;;;;;;;;;;;;;;;;;;Cow behavior;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;Cows on Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi11 [if ticks = initial-time-frame * 15 + 16 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi11 [if ticks = initial-time-frame * 15 + 16 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi11 [if ticks = initial-time-frame * 15 + 16 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi11 [if ticks = initial-time-frame * 15 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi11 [if ticks = initial-time-frame * 15 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi11 [if ticks = initial-time-frame * 15 + 16 + 180 [die]]
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi12 [if ticks = initial-time-frame * 16 + 17 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi12 [if ticks = initial-time-frame * 16 + 17 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi12 [if ticks = initial-time-frame * 16 + 17 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi12 [if ticks = initial-time-frame * 16 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi12 [if ticks = initial-time-frame * 16 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi12 [if ticks = initial-time-frame * 16 + 17 + 180 [die]]
    
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi13 [if ticks = initial-time-frame * 17 + 18 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi13 [if ticks = initial-time-frame * 17 + 18 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi13 [if ticks = initial-time-frame * 17 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi13 [if ticks = initial-time-frame * 17 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi13 [if ticks = initial-time-frame * 17 + 18 + 180 [die]] 
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi14 [if ticks = initial-time-frame * 18 + 19 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi14 [if ticks = initial-time-frame * 18 + 19 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi14 [if ticks = initial-time-frame * 18 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi14 [if ticks = initial-time-frame * 18 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi14 [if ticks = initial-time-frame * 18 + 19 + 180 [die]]  
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi15 [if ticks = initial-time-frame * 19 + 20 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi15 [if ticks = initial-time-frame * 19 + 20 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi15 [if ticks = initial-time-frame * 19 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi15 [if ticks = initial-time-frame * 19 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi15 [if ticks = initial-time-frame * 19 + 20 + 180 [die]]   
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi16 [if ticks = initial-time-frame * 20 + 21 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi16 [if ticks = initial-time-frame * 20 + 21 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi16 [if ticks = initial-time-frame * 20 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi16 [if ticks = initial-time-frame * 20 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi16 [if ticks = initial-time-frame * 20 + 21 + 180 [die]]    
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi17 [if ticks = initial-time-frame * 21 + 22 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi17 [if ticks = initial-time-frame * 21 + 22 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi17 [if ticks = initial-time-frame * 21 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi17 [if ticks = initial-time-frame * 21 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi17 [if ticks = initial-time-frame * 21 + 22 + 180 [die]]   
  
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi18 [if ticks = initial-time-frame * 22 + 23 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi18 [if ticks = initial-time-frame * 22 + 23 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi18 [if ticks = initial-time-frame * 22 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi18 [if ticks = initial-time-frame * 22 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi18 [if ticks = initial-time-frame * 22 + 23 + 180 [die]]   
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi19 [if ticks = initial-time-frame * 23 + 24 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi19 [if ticks = initial-time-frame * 23 + 24 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi19 [if ticks = initial-time-frame * 23 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi19 [if ticks = initial-time-frame * 23 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi19 [if ticks = initial-time-frame * 23 + 24 + 180 [die]]   
    
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi110 [if ticks = initial-time-frame * 24 + 25 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi110 [if ticks = initial-time-frame * 24 + 25 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi110 [if ticks = initial-time-frame * 24 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi110 [if ticks = initial-time-frame * 24 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi110 [if ticks = initial-time-frame * 24 + 25 + 180 [die]]  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi111 [if ticks = initial-time-frame * 25 + 26 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi111 [if ticks = initial-time-frame * 25 + 26 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi111 [if ticks = initial-time-frame * 25 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi111 [if ticks = initial-time-frame * 25 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi111 [if ticks = initial-time-frame * 25 + 26 + 180 [die]]  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi112 [if ticks = initial-time-frame * 26 + 27 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi112 [if ticks = initial-time-frame * 26 + 27 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi113 [if ticks = initial-time-frame * 26 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi113 [if ticks = initial-time-frame * 26 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi112 [if ticks = initial-time-frame * 26 + 27 + 180 [die]]  
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi113 [if ticks = initial-time-frame * 27 + 28 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi113 [if ticks = initial-time-frame * 27 + 28 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi113 [if ticks = initial-time-frame * 27 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi113 [if ticks = initial-time-frame * 27 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi113 [if ticks = initial-time-frame * 27 + 28 + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi114 [if ticks = initial-time-frame * 28 + 29 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi114 [if ticks = initial-time-frame * 28 + 29 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi114 [if ticks = initial-time-frame * 28 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi114 [if ticks = initial-time-frame * 28 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi114 [if ticks = initial-time-frame * 28 + 29 + 180 [die]]  
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask cowsi115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsi115 [if ticks = initial-time-frame * 29 + 30 + 30 [setxy (random -14 - 2) (random 10 + 6) 
     set heading 180 set goal patch -2 6 face goal]]
;; to third paddock
  ask cowsi115 [if ticks = initial-time-frame * 29 + 30 + 60 [setxy (random -14 - 2) (random 10 - 4) 
      set heading 180 set goal patch -2 4 face goal]]
;; to forth paddock
  ask cowsi115 [if ticks = initial-time-frame * 29 + 30 + 90 [setxy (random 14 + 0) (random 10 - 4) 
      set heading 180 set goal patch -1 4 face goal]]
;; to fifth paddock
  ask cowsi115 [if ticks = initial-time-frame * 29 + 16 + 120 [setxy (random -14 - 2) (random 10 + 6) 
      set heading 180 set goal patch -2 14 face goal]]
;; to sixth paddock
  ask cowsi115 [if ticks = initial-time-frame * 29 + 16 + 150 [setxy (random 14 + 0) (random 10 + 6) 
      set heading 90 set goal patch 14 14 face goal]]
;; to the cowhouse for winter season 
  ask cowsi115 [if ticks = initial-time-frame * 29 + 30 + 180 [die]]   
 
;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
;;;;;;;;;;;;;;;;;;;;Central Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
  ask cowsnlc11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlc11 [if ticks =  initial-time-frame * 15 + 16 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc11 [if ticks = initial-time-frame * 15 + 16 + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc11 [if ticks = initial-time-frame * 15 + 16 + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc11 [if ticks = initial-time-frame * 15 + 16 + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc11 [if ticks = initial-time-frame * 15 + 16 + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc11 [if ticks = initial-time-frame * 15 + 16 + 180 [die]] 
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlc12 [if ticks =  initial-time-frame * 16 + 17 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc12 [if ticks = initial-time-frame * 16 + 17  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc12 [if ticks = initial-time-frame * 16 + 17  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc12 [if ticks = initial-time-frame * 16 + 17  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc12 [if ticks = initial-time-frame * 16 + 17  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc12 [if ticks = initial-time-frame * 16 + 17  + 180 [die]] 
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc13 [if ticks =  initial-time-frame * 17 + 18 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc13 [if ticks = initial-time-frame * 17 + 18  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc13 [if ticks = initial-time-frame * 17 + 18  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc13 [if ticks = initial-time-frame * 17 + 18  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc13 [if ticks = initial-time-frame * 17 + 18  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold
  ask cowsnlc13 [if ticks = initial-time-frame * 17 + 18  + 180 [die]]   
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc14 [if ticks =  initial-time-frame * 18 + 19 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc14 [if ticks = initial-time-frame * 18 + 19  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc14 [if ticks = initial-time-frame * 18 + 19  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc14 [if ticks = initial-time-frame * 18 + 19  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc14 [if ticks = initial-time-frame * 18 + 19  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc14 [if ticks = initial-time-frame * 18 + 19  + 180 [die]]   
  
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc15 [if ticks =  initial-time-frame * 19 + 20 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc15 [if ticks = initial-time-frame * 19 + 20  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc15 [if ticks = initial-time-frame * 19 + 20  + 90 [setxy (random -15 - 20) (random 10 - 5)  
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc15 [if ticks = initial-time-frame * 19 + 20  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc15 [if ticks = initial-time-frame * 19 + 20  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc15 [if ticks = initial-time-frame * 19 + 20  + 180 [die]]    
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc16 [if ticks =  initial-time-frame * 20 + 21 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc16 [if ticks = initial-time-frame * 20 + 21  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc16 [if ticks = initial-time-frame * 20 + 21  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc16 [if ticks = initial-time-frame * 20 + 21  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc16 [if ticks = initial-time-frame * 20 + 21  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc16 [if ticks = initial-time-frame * 20 + 21  + 180 [die]]      
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc17 [if ticks =  initial-time-frame * 21 + 22 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc17 [if ticks = initial-time-frame * 21 + 22  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc17 [if ticks = initial-time-frame * 21 + 22  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc17 [if ticks = initial-time-frame * 21 + 22  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc17 [if ticks = initial-time-frame * 21 + 22  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc17 [if ticks = initial-time-frame * 21 + 22  + 180 [die]]  
  
  
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc18 [if ticks =  initial-time-frame * 22 + 23 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc18 [if ticks = initial-time-frame * 22 + 23  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc18 [if ticks = initial-time-frame * 22 + 23  + 90 [setxy (random -15 - 20) (random 10 - 5)  
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc18 [if ticks = initial-time-frame * 22 + 23  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc18 [if ticks = initial-time-frame * 22 + 23  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc18 [if ticks = initial-time-frame * 22 + 23  + 180 [die]]  
   
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc19 [if ticks =  initial-time-frame * 23 + 24 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc19 [if ticks = initial-time-frame * 23 + 24  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc19 [if ticks = initial-time-frame * 23 + 24  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc19 [if ticks = initial-time-frame * 23 + 24  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc19 [if ticks = initial-time-frame * 23 + 24  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc19 [if ticks = initial-time-frame * 23 + 24  + 180 [die]]   
  
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc110 [if ticks =  initial-time-frame * 24 + 25 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc110 [if ticks = initial-time-frame * 24 + 25  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc110 [if ticks = initial-time-frame * 24 + 25  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc110 [if ticks = initial-time-frame * 24 + 25  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc110 [if ticks = initial-time-frame * 24 + 25  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc110 [if ticks = initial-time-frame * 24 + 25  + 180 [die]]   
  
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc111 [if ticks =  initial-time-frame * 25 + 26 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc111 [if ticks = initial-time-frame * 25 + 26  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc111 [if ticks = initial-time-frame * 25 + 26  + 90 [setxy (random -15 - 20) (random 10 - 5) 
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc111 [if ticks = initial-time-frame * 25 + 26  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc111 [if ticks = initial-time-frame * 25 + 26  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc111 [if ticks = initial-time-frame * 25 + 26  + 180 [die]]  
  
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc112 [if ticks =  initial-time-frame * 26 + 27 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc112 [if ticks = initial-time-frame * 26 + 27  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc112 [if ticks = initial-time-frame * 26 + 27  + 90 [setxy (random -15 - 20) (random 10 - 5)  
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc112 [if ticks = initial-time-frame * 26 + 27  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc112 [if ticks = initial-time-frame * 26 + 27  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc112 [if ticks = initial-time-frame * 26 + 27  + 180 [die]]   
  
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc113 [if ticks =  initial-time-frame * 27 + 28 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc113 [if ticks = initial-time-frame * 27 + 28  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc113 [if ticks = initial-time-frame * 27 + 28  + 90 [setxy (random -15 - 20) (random 10 - 5)  
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc113 [if ticks = initial-time-frame * 27 + 28  + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc113 [if ticks = initial-time-frame * 27 + 28  + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; to the cowhouse for winter season 
  ask cowsnlc113 [if ticks = initial-time-frame * 27 + 28  + 180 [die]]   
  
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc114 [if ticks =  initial-time-frame * 28 + 29 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc114 [if ticks = initial-time-frame * 28 + 29  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc114 [if ticks = initial-time-frame * 28 + 29   + 90 [setxy (random -15 - 20) (random 10 - 5)  
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc114 [if ticks = initial-time-frame * 28 + 29   + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc114 [if ticks = initial-time-frame * 28 + 29   + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold 
  ask cowsnlc114 [if ticks = initial-time-frame * 28 + 29   + 180 [die]]     
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnlc115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
  ask cowsnlc115 [if ticks =  initial-time-frame * 29 + 30 + 30 [setxy (random -13 - 35) (random 10 + 6) 
     set heading 180 set goal patch -35 5 face goal]]
;; to third paddock
  ask cowsnlc115 [if ticks = initial-time-frame * 29 + 30  + 60 [setxy (random -13 - 35) (random 10 - 5) 
     set heading 180 set goal patch -35 4 face goal]]
;; to forth paddock
  ask cowsnlc115 [if ticks = initial-time-frame * 29 + 30   + 90 [setxy (random -15 - 20) (random 10 - 5)  
     set heading 180 set goal patch -34 -5 face goal]]
;; to fifth paddock
  ask cowsnlc115 [if ticks = initial-time-frame * 29 + 30   + 120 [setxy (random -13 - 35) (random -10 - 6) 
     set heading 180 set goal patch -35 -6 face goal]]
;; to sixth paddock
  ask cowsnlc115 [if ticks = initial-time-frame * 29 + 30   + 150 [setxy (random -15 - 20) (random 11 - 16) 
      set heading 90 set goal patch -19 -6 face goal]]
;; Steers Sold
  ask cowsnlc115 [if ticks = initial-time-frame * 29 + 30   + 180 [die]]    
  
;;;;;;;;;;;;;;;;;;;;Bottom Left;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;                     
  ask cowsnld11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld11 [if ticks =  initial-time-frame * 15 + 16  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld11 [if ticks = initial-time-frame * 15 + 16  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld11 [if ticks = initial-time-frame * 15 + 16 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld11 [if ticks = initial-time-frame * 15 + 16 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld11 [if ticks = initial-time-frame * 15 + 16  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld11 [if ticks = initial-time-frame * 15 + 16  + 180 [die]]  
 
;;;;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;  
  ask cowsnld12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld12 [if ticks =  initial-time-frame * 16 + 17  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld12 [if ticks = initial-time-frame * 16 + 17  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld12 [if ticks = initial-time-frame * 16 + 17 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld12 [if ticks = initial-time-frame * 16 + 17 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld12 [if ticks = initial-time-frame * 16 + 17  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld12 [if ticks = initial-time-frame * 16 + 17  + 180 [die]]    
  
 
;;;;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;  
  ask cowsnld13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld13 [if ticks =  initial-time-frame * 17 + 18  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld13 [if ticks = initial-time-frame * 17 + 18  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld13 [if ticks = initial-time-frame * 17 + 18 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld13 [if ticks = initial-time-frame * 17 + 18  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;;to the cowhouse for winter season 
 ask cowsnld13 [if ticks = initial-time-frame * 17 + 18  + 180 [die]]   
 
;;;;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;  
  ask cowsnld14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld14 [if ticks =  initial-time-frame * 18 + 19  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld14 [if ticks = initial-time-frame * 18 + 19  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld14 [if ticks = initial-time-frame * 18 + 19 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld14 [if ticks = initial-time-frame * 18 + 19  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld14 [if ticks = initial-time-frame * 18 + 19  + 180 [die]]   
 
;;;;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;  
  ask cowsnld15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld15 [if ticks =  initial-time-frame * 19 + 20  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld15 [if ticks = initial-time-frame * 19 + 20  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld15 [if ticks = initial-time-frame * 19 + 20 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld15 [if ticks = initial-time-frame * 19 + 20  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld15 [if ticks = initial-time-frame * 19 + 20  + 180 [die]]   
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;  
  ask cowsnld16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld16 [if ticks =  initial-time-frame * 20 + 21  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld16 [if ticks = initial-time-frame * 20 + 21  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld16 [if ticks = initial-time-frame * 20 + 21 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld16 [if ticks = initial-time-frame * 20 + 21  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld16 [if ticks = initial-time-frame * 20 + 21  + 180 [die]]
 
 
;;;;;;;;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;  
  ask cowsnld17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld17 [if ticks =  initial-time-frame * 21 + 22  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld17 [if ticks = initial-time-frame * 21 + 22  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld17 [if ticks = initial-time-frame * 21 + 22 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld17 [if ticks = initial-time-frame * 21 + 22  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld17 [if ticks = initial-time-frame * 21 + 22  + 180 [die]] 
 
 
;;;;;;;;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;  
  ask cowsnld18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld18 [if ticks =  initial-time-frame * 22 + 23  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld18 [if ticks = initial-time-frame * 22 + 23  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld18 [if ticks = initial-time-frame * 22 + 23 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld18 [if ticks = initial-time-frame * 22 + 23  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld18 [if ticks = initial-time-frame * 22 + 23  + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;  
  ask cowsnld19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld19 [if ticks =  initial-time-frame * 23 + 24  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld19 [if ticks = initial-time-frame * 23 + 24  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld19 [if ticks = initial-time-frame * 23 + 24 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld19 [if ticks = initial-time-frame * 23 + 24  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld19 [if ticks = initial-time-frame * 23 + 24  + 180 [die]]  
 
 
;;;;;;;;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;  
  ask cowsnld110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld110 [if ticks =  initial-time-frame * 24 + 25  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld110 [if ticks = initial-time-frame * 24 + 25  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld110 [if ticks = initial-time-frame * 24 + 25 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld110 [if ticks = initial-time-frame * 24 + 25  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld110 [if ticks = initial-time-frame * 24 + 25  + 180 [die]]   
 
 

;;;;;;;;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;  
  ask cowsnld111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld111 [if ticks =  initial-time-frame * 25 + 26  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld111 [if ticks = initial-time-frame * 25 + 26  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld111 [if ticks = initial-time-frame * 25 + 26 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld111 [if ticks = initial-time-frame * 25 + 26  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld111 [if ticks = initial-time-frame * 25 + 26  + 180 [die]]


 ;;;;;;;;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;  
  ask cowsnld112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld112 [if ticks =  initial-time-frame * 26 + 27  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld112 [if ticks = initial-time-frame * 26 + 27  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld112 [if ticks = initial-time-frame * 26 + 27 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld112 [if ticks = initial-time-frame * 26 + 27  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld112 [if ticks = initial-time-frame * 26 + 27  + 180 [die]]
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;  
  ask cowsnld113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld113 [if ticks =  initial-time-frame * 27 + 28  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld113 [if ticks = initial-time-frame * 27 + 28  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld113 [if ticks = initial-time-frame * 27 + 28 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld113 [if ticks = initial-time-frame * 27 + 28  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld113 [if ticks = initial-time-frame * 27 + 28  + 180 [die]]
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;  
  ask cowsnld114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld114 [if ticks =  initial-time-frame * 28 + 29  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld114 [if ticks = initial-time-frame * 28 + 29  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld114 [if ticks = initial-time-frame * 28 + 29 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld114 [if ticks = initial-time-frame * 28 + 29  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld114 [if ticks = initial-time-frame * 28 + 29  + 180 [die]]
 
 
;;;;;;;;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;  
  ask cowsnld115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
 
;; to second paddock
 ask cowsnld115 [if ticks =  initial-time-frame * 29 + 30  + 30 [setxy (random -14 - 35) (random 10 - 48) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to third paddock
 ask cowsnld115 [if ticks = initial-time-frame * 29 + 30  + 60 [setxy (random -14 - 35) (random 8 - 36) 
     set heading 180 set goal patch -35 -37 face goal]]
;; to forth paddock
 ask cowsnld115 [if ticks = initial-time-frame * 29 + 30 + 90 [setxy (random -15 - 19) (random 8 - 36) 
     set heading 180 set goal patch -34 -28 face goal]]
;; to fifth paddock
 ask cowsnld115 [if ticks = initial-time-frame * 29 + 30 + 120 [setxy (random -14 - 35) (random 10 - 27) 
     set heading 180 set goal patch -34 -27 face goal]]
;; to sixth paddock
 ask cowsnld115 [if ticks = initial-time-frame * 29 + 30  + 150 [setxy (random -15 - 19) (random 9 - 26) 
     set heading 90 set goal patch -19 -19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnld115 [if ticks = initial-time-frame * 29 + 30  + 180 [die]] 
 
 
 
;;;;;;;;;;;;;;;;;;;;Center Right;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc11 [if ticks = initial-time-frame * 15 + 16  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc11 [if ticks = initial-time-frame * 15 + 16  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc11 [if ticks = initial-time-frame * 15 + 16  + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc11 [if ticks = initial-time-frame * 15 + 16  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc11 [if ticks = initial-time-frame * 15 + 16  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc11 [if ticks = initial-time-frame * 15 + 16  + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc12 [if ticks = initial-time-frame * 16 + 17  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc12 [if ticks = initial-time-frame * 16 + 17  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc12 [if ticks = initial-time-frame * 16 + 17  + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc12 [if ticks = initial-time-frame * 16 + 17  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc12 [if ticks = initial-time-frame * 16 + 17  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc12 [if ticks = initial-time-frame * 16 + 17  + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc13 [if ticks = initial-time-frame * 17 + 18  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc13 [if ticks = initial-time-frame * 17 + 18  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc13 [if ticks = initial-time-frame * 17 + 18  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc13 [if ticks = initial-time-frame * 17 + 18  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc13 [if ticks = initial-time-frame * 17 + 18  + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc14 [if ticks = initial-time-frame * 18 + 19  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc14 [if ticks = initial-time-frame * 18 + 19  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc14 [if ticks = initial-time-frame * 18 + 19  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc14 [if ticks = initial-time-frame * 18 + 19  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc14 [if ticks = initial-time-frame * 18 + 19  + 180 [die]]  
 
 
  ;;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc15 [if ticks = initial-time-frame * 19 + 20  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc15 [if ticks = initial-time-frame * 19 + 20  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc15 [if ticks = initial-time-frame * 19 + 20  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc15 [if ticks = initial-time-frame * 19 + 20  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc15 [if ticks = initial-time-frame * 19 + 20  + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year6;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc16 [if ticks = initial-time-frame * 20 + 21  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc16 [if ticks = initial-time-frame * 20 + 21  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc16 [if ticks = initial-time-frame * 20 + 21  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc16 [if ticks = initial-time-frame * 20 + 21  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold
 ask cowsnrc16 [if ticks = initial-time-frame * 20 + 21  + 180 [die]]  
 
 
;;;;;;;;;;;;;;;;;;;;;Year7;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc17 [if ticks = initial-time-frame * 21 + 22  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc17 [if ticks = initial-time-frame * 21 + 22  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc17 [if ticks = initial-time-frame * 21 + 22  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc17 [if ticks = initial-time-frame * 21 + 22  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc17 [if ticks = initial-time-frame * 21 + 22  + 180 [die]]  
 
 
;;;;;;;;;;;;;;;;;;;;;Year8;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc18 [if ticks = initial-time-frame * 22 + 23  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc18 [if ticks = initial-time-frame * 22 + 23  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc18 [if ticks = initial-time-frame * 22 + 23  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc18 [if ticks = initial-time-frame * 22 + 23  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc18 [if ticks = initial-time-frame * 22 + 23  + 180 [die]] 
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year9;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc19 [if ticks = initial-time-frame * 23 + 24  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc19 [if ticks = initial-time-frame * 23 + 24  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc19 [if ticks = initial-time-frame * 23 + 24  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc19 [if ticks = initial-time-frame * 23 + 24  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc19 [if ticks = initial-time-frame * 23 + 24  + 180 [die]]
 

;;;;;;;;;;;;;;;;;;;;;Year10;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc110 [if ticks = initial-time-frame * 24 + 25  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc110 [if ticks = initial-time-frame * 24 + 25  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc110 [if ticks = initial-time-frame * 24 + 25  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc110 [if ticks = initial-time-frame * 24 + 25  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc110 [if ticks = initial-time-frame * 24 + 25  + 180 [die]] 
 
 
;;;;;;;;;;;;;;;;;;;;;Year11;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc111 [if ticks = initial-time-frame * 25 + 26  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc111 [if ticks = initial-time-frame * 25 + 26  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc111 [if ticks = initial-time-frame * 25 + 26  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc111 [if ticks = initial-time-frame * 25 + 26  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc111 [if ticks = initial-time-frame * 25 + 26  + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year12;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc112 [if ticks = initial-time-frame * 26 + 27  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc112 [if ticks = initial-time-frame * 26 + 27  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc112 [if ticks = initial-time-frame * 26 + 27  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc112 [if ticks = initial-time-frame * 26 + 27  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc112 [if ticks = initial-time-frame * 26 + 27 + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;;;;;;;Year13;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc113 [if ticks = initial-time-frame * 27 + 28  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc113 [if ticks = initial-time-frame * 27 + 28  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc113 [if ticks = initial-time-frame * 27 + 28  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc113 [if ticks = initial-time-frame * 27 + 28  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc113 [if ticks = initial-time-frame * 27 + 28 + 180 [die]]   
 
 
;;;;;;;;;;;;;;;;;;;;;Year14;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc114 [if ticks = initial-time-frame * 28 + 29  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc114 [if ticks = initial-time-frame * 28 + 29  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc114 [if ticks = initial-time-frame * 28 + 29  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc114 [if ticks = initial-time-frame * 28 + 29  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc114 [if ticks = initial-time-frame * 28 + 29 + 180 [die]]   
 

;;;;;;;;;;;;;;;;;;;;;Year15;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask cowsnrc115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnrc115 [if ticks = initial-time-frame * 29 + 30  + 30 [setxy (random 12 + 19) (random 10 + 6) 
     set heading 180 set goal patch 19 6 face goal]]
;; to third paddock
 ask cowsnrc115 [if ticks =  initial-time-frame * 29 + 30  + 60 [setxy (random 12 + 19) (random 9 - 4) 
     set heading 180 set goal patch 32 4 face goal]]
;; to forth paddock
 ask cowsnrc115 [if ticks =  initial-time-frame * 29 + 30 + 90 [setxy (random 13 + 34) (random 9 - 4) 
     set heading 180 set goal patch 32 -5 face goal]]
;; to fifth paddock
 ask cowsnrc115 [if ticks =  initial-time-frame * 29 + 30  + 120 [setxy (random 12 + 19) (random 10 - 15) 
     set heading 180 set goal patch 32 -15 face goal]]
;; to sixth paddock
 ask cowsnrc115 [if ticks =  initial-time-frame * 29 + 30  + 150 [setxy (random 14 + 33) (random 10 - 15) 
     set heading 90 set goal patch 47 -6 face goal]]
;; Steers sold 
 ask cowsnrc115 [if ticks =  initial-time-frame * 29 + 30 + 180 [die]]   


 ;;;;;;;;;;;;;;;;;;;;Upper Right;;;;;;;;;;;;;;; 
 ;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;; 
  ask cowsnru11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru11 [if ticks = initial-time-frame * 15 + 16  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru11 [if ticks = initial-time-frame * 15 + 16  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru11 [if ticks = initial-time-frame * 15 + 16  + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru11 [if ticks = initial-time-frame * 15 + 16  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru11 [if ticks = initial-time-frame * 15 + 16  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru11 [if ticks = initial-time-frame * 15 + 16  + 180 [die]]
 
;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;  
  ask cowsnru12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru12 [if ticks = initial-time-frame * 16 + 17  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru12 [if ticks = initial-time-frame * 16 + 17  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru12 [if ticks = initial-time-frame * 16 + 17 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru12 [if ticks = initial-time-frame * 16 + 17  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru12 [if ticks = initial-time-frame * 16 + 17  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru12 [if ticks = initial-time-frame * 16 + 17  + 180 [die]] 
 
 
;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;  
  ask cowsnru13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru13 [if ticks = initial-time-frame * 17 + 18  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru13 [if ticks = initial-time-frame * 17 + 18  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru13 [if ticks = initial-time-frame * 17 + 18  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru13 [if ticks = initial-time-frame * 17 + 18  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru13 [if ticks = initial-time-frame * 17 + 18  + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;  
  ask cowsnru14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru14 [if ticks = initial-time-frame * 18 + 19  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru14 [if ticks = initial-time-frame * 18 + 19  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru14 [if ticks = initial-time-frame * 18 + 19  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru14 [if ticks = initial-time-frame * 18 + 19  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru14 [if ticks = initial-time-frame * 18 + 19  + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;  
  ask cowsnru15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru15 [if ticks = initial-time-frame * 19 + 20  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru15 [if ticks = initial-time-frame * 19 + 20  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru15 [if ticks = initial-time-frame * 19 + 20  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru15 [if ticks = initial-time-frame * 19 + 20  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru15 [if ticks = initial-time-frame * 19 + 20  + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;  
  ask cowsnru16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru16 [if ticks = initial-time-frame * 20 + 21  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru16 [if ticks = initial-time-frame * 20 + 21  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru16 [if ticks = initial-time-frame * 20 + 21  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru16 [if ticks = initial-time-frame * 20 + 21  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru16 [if ticks = initial-time-frame * 20 + 21  + 180 [die]]


;;;;;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;  
  ask cowsnru17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru17 [if ticks = initial-time-frame * 21 + 22  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru17 [if ticks = initial-time-frame * 21 + 22  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru17 [if ticks = initial-time-frame * 21 + 22  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru17 [if ticks = initial-time-frame * 21 + 22  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru17 [if ticks = initial-time-frame * 21 + 22 + 180 [die]]


;;;;;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;  
  ask cowsnru18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru18 [if ticks = initial-time-frame * 22 + 23  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru18 [if ticks = initial-time-frame * 22 + 23  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru18 [if ticks = initial-time-frame * 22 + 23  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru18 [if ticks = initial-time-frame * 22 + 23  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru18 [if ticks = initial-time-frame * 22 + 23 + 180 [die]]


;;;;;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;  
  ask cowsnru19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru19 [if ticks = initial-time-frame * 23 + 24  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru19 [if ticks = initial-time-frame * 23 + 24  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru19 [if ticks = initial-time-frame * 23 + 24  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru19 [if ticks = initial-time-frame * 23 + 24  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru19 [if ticks = initial-time-frame * 23 + 24 + 180 [die]]


;;;;;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;  
  ask cowsnru110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru110 [if ticks = initial-time-frame * 24 + 25  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru110 [if ticks = initial-time-frame * 24 + 25  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru110 [if ticks = initial-time-frame * 24 + 25  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru110 [if ticks = initial-time-frame * 24 + 25  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru110 [if ticks = initial-time-frame * 24 + 25 + 180 [die]]

 
;;;;;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;  
  ask cowsnru111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru111 [if ticks = initial-time-frame * 25 + 26  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru111 [if ticks = initial-time-frame * 25 + 26  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru111 [if ticks = initial-time-frame * 25 + 26  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru111 [if ticks = initial-time-frame * 25 + 26  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru111 [if ticks = initial-time-frame * 25 + 26 + 180 [die]] 
 
 
 
;;;;;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;  
  ask cowsnru112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru112 [if ticks = initial-time-frame * 26 + 27  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru112 [if ticks = initial-time-frame * 26 + 27  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru112 [if ticks = initial-time-frame * 26 + 27  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru112 [if ticks = initial-time-frame * 26 + 27  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru112 [if ticks = initial-time-frame * 26 + 27 + 180 [die]] 
 
 
;;;;;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;  
  ask cowsnru113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru113 [if ticks = initial-time-frame * 27 + 28  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru113 [if ticks = initial-time-frame * 27 + 28  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru113 [if ticks = initial-time-frame * 27 + 28  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru113 [if ticks = initial-time-frame * 27 + 28  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru113 [if ticks = initial-time-frame * 27 + 28 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;  
  ask cowsnru114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru114 [if ticks = initial-time-frame * 28 + 29  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru114 [if ticks = initial-time-frame * 28 + 29  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru114 [if ticks = initial-time-frame * 28 + 29  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru114 [if ticks = initial-time-frame * 28 + 29  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru114 [if ticks = initial-time-frame * 28 + 29 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;  
  ask cowsnru115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnru115 [if ticks = initial-time-frame * 29 + 30  + 30 [setxy (random 12 + 19) (random 10 + 18) 
     set heading 180 set goal patch 32 28 face goal]]
;; to third paddock
 ask cowsnru115 [if ticks = initial-time-frame * 29 + 30  + 60 [setxy (random 13 + 34) (random 9 + 29) 
     set heading 180 set goal patch 32 39 face goal]] 
;; to forth paddock
 ask cowsnru115 [if ticks = initial-time-frame * 29 + 30 + 90 [setxy (random 12 + 20) (random 10 + 29) 
     set heading 180 set goal patch 18 39 face goal]]
;; to fifth paddock
 ask cowsnru115 [if ticks = initial-time-frame * 29 + 30  + 120 [setxy (random 12 + 19) (random 8 + 40) 
     set heading 180 set goal patch 32 48 face goal]]
;; to sixth paddock
 ask cowsnru115 [if ticks = initial-time-frame * 29 + 30  + 150 [setxy (random 13 + 33) (random 8 + 40) 
     set heading 90 set goal patch 47 48 face goal]]
;; to the cowhouse for winter season 
 ask cowsnru115 [if ticks = initial-time-frame * 29 + 30 + 180 [die]] 
 
 
;;;;;;;;;;;;;;;;;;;;Upper Center;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu11 [if ticks = initial-time-frame * 15 + 16 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu11 [if ticks = initial-time-frame * 15 + 16 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu11 [if ticks = initial-time-frame * 15 + 16 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu11 [if ticks = initial-time-frame * 15 + 16 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu11 [if ticks = initial-time-frame * 15 + 16 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu11 [if ticks = initial-time-frame * 15 + 16 + 180 [die]] 
 
 
;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu12 [if ticks = initial-time-frame * 16 + 17 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu12 [if ticks = initial-time-frame * 16 + 17 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu12 [if ticks = initial-time-frame * 16 + 17 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu12 [if ticks = initial-time-frame * 16 + 17 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu12 [if ticks = initial-time-frame * 16 + 17 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu12 [if ticks = initial-time-frame * 16 + 17 + 180 [die]]  
 
 
;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu13 [if ticks = initial-time-frame * 17 + 18 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu13 [if ticks = initial-time-frame * 17 + 18 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu13 [if ticks = initial-time-frame * 17 + 18 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu13 [if ticks = initial-time-frame * 17 + 18 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu13 [if ticks = initial-time-frame * 17 + 18 + 180 [die]]  
 
 
;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu14 [if ticks = initial-time-frame * 18 + 19 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu14 [if ticks = initial-time-frame * 18 + 19 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu14 [if ticks = initial-time-frame * 18 + 19 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu14 [if ticks = initial-time-frame * 18 + 19 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu14 [if ticks = initial-time-frame * 18 + 19 + 180 [die]]   
 

;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu15 [if ticks = initial-time-frame * 19 + 20 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu15 [if ticks = initial-time-frame * 19 + 20 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu15 [if ticks = initial-time-frame * 19 + 20 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu15 [if ticks = initial-time-frame * 19 + 20 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu15 [if ticks = initial-time-frame * 19 + 20 + 180 [die]]  
 
 
;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu16 [if ticks = initial-time-frame * 20 + 21 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu16 [if ticks = initial-time-frame * 20 + 21 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu16 [if ticks = initial-time-frame * 20 + 21 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu16 [if ticks = initial-time-frame * 20 + 21 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu16 [if ticks = initial-time-frame * 20 + 21 + 180 [die]] 
 
 
;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu17 [if ticks = initial-time-frame * 21 + 22 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu17 [if ticks = initial-time-frame * 21 + 22 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu17 [if ticks = initial-time-frame * 21 + 22 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu17 [if ticks = initial-time-frame * 21 + 22 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu17 [if ticks = initial-time-frame * 21 + 22 + 180 [die]] 
 
;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu18 [if ticks = initial-time-frame * 22 + 23 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu18 [if ticks = initial-time-frame * 22 + 23 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu18 [if ticks = initial-time-frame * 22 + 23 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu18 [if ticks = initial-time-frame * 22 + 23 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu18 [if ticks = initial-time-frame * 22 + 23 + 180 [die]]  
 
 
 ;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu19 [if ticks = initial-time-frame * 23 + 24 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu19 [if ticks = initial-time-frame * 23 + 24 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu19 [if ticks = initial-time-frame * 23 + 24 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu19 [if ticks = initial-time-frame * 23 + 24 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu19 [if ticks = initial-time-frame * 23 + 24 + 180 [die]]  
 
 ;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu110 [if ticks = initial-time-frame * 24 + 25 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu110 [if ticks = initial-time-frame * 24 + 25 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu110 [if ticks = initial-time-frame * 24 + 25 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu110 [if ticks = initial-time-frame * 24 + 25 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu110 [if ticks = initial-time-frame * 24 + 25 + 180 [die]] 
 
 
;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu111 [if ticks = initial-time-frame * 25 + 26 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu111 [if ticks = initial-time-frame * 25 + 26 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu111 [if ticks = initial-time-frame * 25 + 26 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu111 [if ticks = initial-time-frame * 25 + 26 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu111 [if ticks = initial-time-frame * 25 + 26 + 180 [die]]  
 
 
;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu112 [if ticks = initial-time-frame * 26 + 27 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu112 [if ticks = initial-time-frame * 26 + 27 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu112 [if ticks = initial-time-frame * 26 + 27 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu112 [if ticks = initial-time-frame * 26 + 27 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu112 [if ticks = initial-time-frame * 26 + 27 + 180 [die]] 


;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu113 [if ticks = initial-time-frame * 27 + 28 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu113 [if ticks = initial-time-frame * 27 + 28 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu113 [if ticks = initial-time-frame * 27 + 28 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu113 [if ticks = initial-time-frame * 27 + 28 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu113 [if ticks = initial-time-frame * 27 + 28 + 180 [die]] 


;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu114 [if ticks = initial-time-frame * 28 + 29 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu114 [if ticks = initial-time-frame * 28 + 29 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu114 [if ticks = initial-time-frame * 28 + 29 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu114 [if ticks = initial-time-frame * 28 + 29 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu114 [if ticks = initial-time-frame * 28 + 29 + 180 [die]]


;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;;;;;;;;  
 ask cowsncu115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsncu115 [if ticks = initial-time-frame * 29 + 30 + 30 [setxy (random -9 - 7) (random 15 + 18) 
     set heading 180 set goal patch -6 18 face goal]]
;; to third paddock
 ask cowsncu115 [if ticks = initial-time-frame * 29 + 30 + 60 [setxy (random -10 + 4) (random 15 + 18) 
     set heading 180 set goal patch -6 32 face goal]] 
;; to forth paddock
 ask cowsncu115 [if ticks = initial-time-frame * 29 + 30 + 90 [setxy (random -11 + 4) (random 13 + 33) 
     set heading 180 set goal patch 5 32 face goal]]
;; to fifth paddock
 ask cowsncu115 [if ticks = initial-time-frame * 29 + 30 + 120 [setxy (random -11 + 16) (random 15 + 18) 
     set heading 90 set goal patch 16 32 face goal]] 
;; to sixth paddock
 ask cowsncu115 [if ticks = initial-time-frame * 29 + 30 + 150 [setxy (random -11 + 16) (random 13 + 33) 
     set heading 180 set goal patch 5 46 face goal]]
;; to the cowhouse for winter season 
 ask cowsncu115 [if ticks = initial-time-frame * 29 + 30 + 180 [die]]


 ;;;;;;;;;;;;;;;;;;;;Upper Left;;;;;;;;;;;;;;;
 ;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu11 [if ticks = initial-time-frame * 15 + 16 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu11 [if ticks = initial-time-frame * 15 + 16 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu11 [if ticks = initial-time-frame * 15 + 16 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu11 [if ticks = initial-time-frame * 15 + 16 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu11 [if ticks = initial-time-frame * 15 + 16 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu11 [if ticks = initial-time-frame * 15 + 16 + 180 [die]] 
 
 ;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu12 [if ticks = initial-time-frame * 16 + 17 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu12 [if ticks = initial-time-frame * 16 + 17 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu12 [if ticks = initial-time-frame * 16 + 17 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu12 [if ticks = initial-time-frame * 16 + 17 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu12 [if ticks = initial-time-frame * 16 + 17 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu12 [if ticks = initial-time-frame * 16 + 17 + 180 [die]] 
 
 
 ;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu13 [if ticks = initial-time-frame * 17 + 18 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu13 [if ticks = initial-time-frame * 17 + 18 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu13 [if ticks = initial-time-frame * 17 + 18 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu13 [if ticks = initial-time-frame * 17 + 18 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu13 [if ticks = initial-time-frame * 17 + 18 + 180 [die]] 
 
 
;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu14 [if ticks = initial-time-frame * 18 + 19 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu14 [if ticks = initial-time-frame * 18 + 19 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu14 [if ticks = initial-time-frame * 18 + 19 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu14 [if ticks = initial-time-frame * 18 + 19 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu14 [if ticks = initial-time-frame * 18 + 19 + 180 [die]]  
 
 
;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu15 [if ticks = initial-time-frame * 19 + 20 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu15 [if ticks = initial-time-frame * 19 + 20 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu15 [if ticks = initial-time-frame * 19 + 20 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu15 [if ticks = initial-time-frame * 19 + 20 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu15 [if ticks = initial-time-frame * 19 + 20 + 180 [die]]  
 
 
;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu16 [if ticks = initial-time-frame * 20 + 21 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu16 [if ticks = initial-time-frame * 20 + 21 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu16 [if ticks = initial-time-frame * 20 + 21 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu16 [if ticks = initial-time-frame * 20 + 21 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu16 [if ticks = initial-time-frame * 20 + 21 + 180 [die]] 
 

;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu17 [if ticks = initial-time-frame * 21 + 22 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu17 [if ticks = initial-time-frame * 21 + 22 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu17 [if ticks = initial-time-frame * 21 + 22 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu17 [if ticks = initial-time-frame * 21 + 22 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu17 [if ticks = initial-time-frame * 21 + 22 + 180 [die]] 


;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu18 [if ticks = initial-time-frame * 22 + 23 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu18 [if ticks = initial-time-frame * 22 + 23 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu18 [if ticks = initial-time-frame * 22 + 23 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu18 [if ticks = initial-time-frame * 22 + 23 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu18 [if ticks = initial-time-frame * 22 + 23 + 180 [die]] 


;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu19 [if ticks = initial-time-frame * 23 + 24 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu19 [if ticks = initial-time-frame * 23 + 24 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu19 [if ticks = initial-time-frame * 23 + 24 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu19 [if ticks = initial-time-frame * 23 + 24 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu19 [if ticks = initial-time-frame * 23 + 24 + 180 [die]] 


;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu110 [if ticks = initial-time-frame * 24 + 25 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu110 [if ticks = initial-time-frame * 24 + 25 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu110 [if ticks = initial-time-frame * 24 + 25 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu110 [if ticks = initial-time-frame * 24 + 25 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu110 [if ticks = initial-time-frame * 24 + 25 + 180 [die]] 


;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu111 [if ticks = initial-time-frame * 25 + 26 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu111 [if ticks = initial-time-frame * 25 + 26 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu111 [if ticks = initial-time-frame * 25 + 26 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu111 [if ticks = initial-time-frame * 25 + 26 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu111 [if ticks = initial-time-frame * 25 + 26 + 180 [die]]

;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu112 [if ticks = initial-time-frame * 26 + 27 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu112 [if ticks = initial-time-frame * 26 + 27 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu112 [if ticks = initial-time-frame * 26 + 27 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu112 [if ticks = initial-time-frame * 26 + 27 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu112 [if ticks = initial-time-frame * 26 + 27 + 180 [die]]


;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu113 [if ticks = initial-time-frame * 27 + 28 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu113 [if ticks = initial-time-frame * 27 + 28 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu113 [if ticks = initial-time-frame * 27 + 28 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu113 [if ticks = initial-time-frame * 27 + 28 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu113 [if ticks = initial-time-frame * 27 + 28 + 180 [die]]


;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu114 [if ticks = initial-time-frame * 28 + 29 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu114 [if ticks = initial-time-frame * 28 + 29 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu114 [if ticks = initial-time-frame * 28 + 29 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu114 [if ticks = initial-time-frame * 28 + 29 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu114 [if ticks = initial-time-frame * 28 + 29 + 180 [die]]

;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;;;;;;;;  
ask cowsnlu115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
 ask cowsnlu115 [if ticks = initial-time-frame * 29 + 30 + 30 [setxy (random -11 - 18) (random 13 + 35) 
     set heading 180 set goal patch -28 48 face goal]]
;; to third paddock
 ask cowsnlu115 [if ticks = initial-time-frame * 29 + 30 + 60 [setxy (random -12 - 28) (random 14 + 35) 
     set heading 180 set goal patch -28 34 face goal]] 
;; to forth paddock
 ask cowsnlu115 [if ticks = initial-time-frame * 29 + 30 + 90 [setxy (random -12 - 28) (random 14 + 20) 
     set heading 180 set goal patch -39 34 face goal]]
;; to fifth paddock
 ask cowsnlu115 [if ticks = initial-time-frame * 29 + 30 + 120 [setxy (random -10 - 39) (random 14 + 35) 
     set heading 90 set goal patch -48 34 face goal]] 
;; to sixth paddock
 ask cowsnlu115 [if ticks = initial-time-frame * 29 + 30 + 150 [setxy (random -10 - 39) (random 14 + 20) 
     set heading 180 set goal patch -48 19 face goal]]
;; to the cowhouse for winter season 
 ask cowsnlu115 [if ticks = initial-time-frame * 29 + 30 + 180 [die]]


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Bottom Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd11
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd11 [if ticks = initial-time-frame * 15 + 16 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd11 [if ticks = initial-time-frame * 15 + 16 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd11 [if ticks = initial-time-frame * 15 + 16 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd11 [if ticks = initial-time-frame * 15 + 16 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd11 [if ticks = initial-time-frame * 15 + 16 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd11 [if ticks = initial-time-frame * 15 + 16 + 180 [die]]  
 
 
;;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd12
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd12 [if ticks = initial-time-frame * 16 + 17 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd12 [if ticks = initial-time-frame * 16 + 17 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd12 [if ticks = initial-time-frame * 16 + 17 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd12 [if ticks = initial-time-frame * 16 + 17 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd12 [if ticks = initial-time-frame * 16 + 17 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd12 [if ticks = initial-time-frame * 16 + 17 + 180 [die]] 
 
;;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd13
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd13 [if ticks = initial-time-frame * 17 + 18 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd13 [if ticks = initial-time-frame * 17 + 18 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd13 [if ticks = initial-time-frame * 17 + 18 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd13 [if ticks = initial-time-frame * 17 + 18 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd13 [if ticks = initial-time-frame * 17 + 18 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd13 [if ticks = initial-time-frame * 17 + 18 + 180 [die]] 
  
;;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd14
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd14 [if ticks = initial-time-frame * 18 + 19 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd14 [if ticks = initial-time-frame * 18 + 19 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd14 [if ticks = initial-time-frame * 18 + 19 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd14 [if ticks = initial-time-frame * 18 + 19 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd14 [if ticks = initial-time-frame * 18 + 19 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd14 [if ticks = initial-time-frame * 18 + 19 + 180 [die]]  
 
 
;;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd15
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd15 [if ticks = initial-time-frame * 19 + 20 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd15 [if ticks = initial-time-frame * 19 + 20 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd15 [if ticks = initial-time-frame * 19 + 20 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd15 [if ticks = initial-time-frame * 19 + 20 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd15 [if ticks = initial-time-frame * 19 + 20 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd15 [if ticks = initial-time-frame * 19 + 20 + 180 [die]]   
 
 
;;;;;;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd16
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd16 [if ticks = initial-time-frame * 20 + 21 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd16 [if ticks = initial-time-frame * 20 + 21 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd16 [if ticks = initial-time-frame * 20 + 21 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd16 [if ticks = initial-time-frame * 20 + 21 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd16 [if ticks = initial-time-frame * 20 + 21 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd16 [if ticks = initial-time-frame * 20 + 21 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd17
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd17 [if ticks = initial-time-frame * 21 + 22 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd17 [if ticks = initial-time-frame * 21 + 22 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd17 [if ticks = initial-time-frame * 21 + 22 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd17 [if ticks = initial-time-frame * 21 + 22 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd17 [if ticks = initial-time-frame * 21 + 22 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd17 [if ticks = initial-time-frame * 21 + 22 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd18
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd18 [if ticks = initial-time-frame * 22 + 23 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd18 [if ticks = initial-time-frame * 22 + 23 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd18 [if ticks = initial-time-frame * 22 + 23 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd18 [if ticks = initial-time-frame * 22 + 23 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd18 [if ticks = initial-time-frame * 22 + 23 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd18 [if ticks = initial-time-frame * 22 + 23 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd19
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd19 [if ticks = initial-time-frame * 23 + 24 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd19 [if ticks = initial-time-frame * 23 + 24 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd19 [if ticks = initial-time-frame * 23 + 24 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd19 [if ticks = initial-time-frame * 23 + 24 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd19 [if ticks = initial-time-frame * 23 + 24 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd19 [if ticks = initial-time-frame * 23 + 24 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd110
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd110 [if ticks = initial-time-frame * 24 + 25 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd110 [if ticks = initial-time-frame * 24 + 25 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd110 [if ticks = initial-time-frame * 24 + 25 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd110 [if ticks = initial-time-frame * 24 + 25 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd110 [if ticks = initial-time-frame * 24 + 25 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd110 [if ticks = initial-time-frame * 24 + 25 + 180 [die]] 

;;;;;;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd111
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd111 [if ticks = initial-time-frame * 25 + 26 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd111 [if ticks = initial-time-frame * 25 + 26 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd111 [if ticks = initial-time-frame * 25 + 26 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd111 [if ticks = initial-time-frame * 25 + 26 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd111 [if ticks = initial-time-frame * 25 + 26 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd111 [if ticks = initial-time-frame * 25 + 26 + 180 [die]]  
 
;;;;;;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd112
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd112 [if ticks = initial-time-frame * 26 + 27 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd112 [if ticks = initial-time-frame * 26 + 27 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd112 [if ticks = initial-time-frame * 26 + 27 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd112 [if ticks = initial-time-frame * 26 + 27 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd112 [if ticks = initial-time-frame * 26 + 27 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd112 [if ticks = initial-time-frame * 26 + 27 + 180 [die]] 


;;;;;;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd113
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd113 [if ticks = initial-time-frame * 27 + 28 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd113 [if ticks = initial-time-frame * 27 + 28 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd113 [if ticks = initial-time-frame * 27 + 28 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd113 [if ticks = initial-time-frame * 27 + 28 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd113 [if ticks = initial-time-frame * 27 + 28 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd113 [if ticks = initial-time-frame * 27 + 28 + 180 [die]]

;;;;;;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd114
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd114 [if ticks = initial-time-frame * 28 + 29 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd114 [if ticks = initial-time-frame * 28 + 29 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd114 [if ticks = initial-time-frame * 28 + 29 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd114 [if ticks = initial-time-frame * 28 + 29 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd114 [if ticks = initial-time-frame * 28 + 29 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd114 [if ticks = initial-time-frame * 28 + 29 + 180 [die]]


;;;;;;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;;;;;;
ask cowsnrd115
    [ ifelse patch-here = goal
    [  ;;if no goal continue grazing
    ]
    [ face goal
    jump 0.1
    ]
    ]
;; to second paddock
ask cowsnrd115 [if ticks = initial-time-frame * 29 + 30 + 30 [setxy (random 10 + 39) (random 12 - 45) 
     set heading 180 set goal patch 38 -49 face goal]]
;; to third paddock
ask cowsnrd115 [if ticks = initial-time-frame * 29 + 30 + 60 [setxy (random 12 + 27) (random 13 - 48) 
     set heading 180 set goal patch 38 -34 face goal]] 
;; to forth paddock
ask cowsnrd115 [if ticks = initial-time-frame * 29 + 30 + 90 [setxy (random -12 + 38) (random -12 - 21) 
     set heading 180 set goal patch 27 -34 face goal]] 
;; to fifth paddock
 ask cowsnrd115 [if ticks = initial-time-frame * 29 + 30 + 120 [setxy (random 8 + 19) (random 14 - 49) 
     set heading 90 set goal patch 18 -34 face goal]] 
;; to sixth paddock
 ask cowsnrd115 [if ticks = initial-time-frame * 29 + 30 + 150 [setxy (random 8 + 19) (random 14 - 34) 
     set heading 180 set goal patch 18 -20 face goal]]
;; to the cowhouse for winter season 
 ask cowsnrd115 [if ticks = initial-time-frame * 29 + 30 + 180 [die]]

;;;;;;;;;;;;;;;;;;;;Pasture Regrow through time;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;Pasture top right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 15 + 16 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 15 + 16 + 45 
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;Pasture top left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 15 + 16 + 60
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 15 + 16 + 76 
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture middle left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 15 + 16 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 15 + 16 + 116  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;Pasture middle right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 15 + 16 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 15 + 16 + 137   
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture bottom left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 15 + 16 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 15 + 16 + 172  
  [set pcolor 55]] 
  
;;;;;;;;;;Pasture bottom right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 15 + 16 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 15 + 16 + 195   
  [set pcolor max-pasture-grow]]   
  

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 16 + 17 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 16 + 17 + 45  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;Pasture top left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 16 + 17 + 60  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 16 + 17 + 76  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture middle left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 16 + 17 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 16 + 17 + 116  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;Pasture middle right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 16 + 17 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 16 + 17 + 137   
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture bottom left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 16 + 17 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 16 + 17 + 172  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture bottom right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 16 + 17 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 16 + 17 + 195   
  [set pcolor max-pasture-grow]]   


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 17 + 18 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 17 + 18 + 45  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;Pasture top left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 17 + 18 + 60  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 17 + 18 + 76  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture middle left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 17 + 18 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 17 + 18 + 116 
  [set pcolor max-pasture-grow]] 
  
;;;;;;;Pasture middle right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 17 + 18 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 17 + 18 + 137   
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture bottom left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 17 + 18 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 17 + 18 + 172  
  [set pcolor max-pasture-grow]] 
  
;;;;;;;;;;Pasture bottom right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 17 + 18 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 17 + 18 + 195   
  [set pcolor max-pasture-grow]]   


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 18 + 19 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 18 + 19 + 45  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 18 + 19 + 60  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 18 + 19 + 76  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 18 + 19 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 18 + 19 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 18 + 19 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 18 + 19 + 137   
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 18 + 19 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 18 + 19 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 18 + 19 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 18 + 19 + 195  
  [set pcolor max-pasture-grow]]   

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 19 + 20 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 19 + 20 + 45  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 19 + 20 + 60  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 19 + 20 + 76  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 19 + 20 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 19 + 20 + 116  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 19 + 20 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 19 + 20 + 137   
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 19 + 20 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 19 + 20 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 19 + 20 + 180  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 19 + 20 + 195  
  [set pcolor max-pasture-grow]]   


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 20 + 21 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 20 + 21 + 45  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 20 + 21 + 60  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 20 + 21 + 76  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 20 + 21 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 20 + 21 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 20 + 21 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 20 + 21 + 137  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 20 + 21 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 20 + 21 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 20 + 21 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 20 + 21 + 195 
  [set pcolor max-pasture-grow]]  

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 21 + 22 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 21 + 22 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 21 + 22 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 21 + 22 + 76  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 21 + 22 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 21 + 22 + 116  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 21 + 22 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 21 + 22 + 137   
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 21 + 22 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 21 + 22 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 21 + 22 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 21 + 22 + 195   
  [set pcolor max-pasture-grow]]  


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 22 + 23 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 22 + 23 + 45  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 22 + 23 + 60  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 22 + 23 + 76  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 22 + 23 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 22 + 23 + 116  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 22 + 23 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 22 + 23 + 137   
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 22 + 23 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 22 + 23 + 172 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 22 + 23 + 180   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 22 + 23 + 195   
  [set pcolor max-pasture-grow]]  


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 23 + 24 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 23 + 24 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 23 + 24 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 23 + 24 + 76  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 23 + 24 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 23 + 24 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 23 + 24 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 23 + 24 + 137  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 23 + 24 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 23 + 24 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 23 + 24 + 180 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 23 + 24 + 195  
  [set pcolor max-pasture-grow]] 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 24 + 25 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 24 + 25 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 24 + 25 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 24 + 25 + 76 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 24 + 25 + 90  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 24 + 25 + 116  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 24 + 25 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 24 + 25 + 137   
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 24 + 25 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 24 + 25 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 24 + 25 + 180  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 24 + 25 + 195  
  [set pcolor max-pasture-grow]] 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 25 + 26 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 25 + 26 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 25 + 26 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 25 + 26 + 76 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 25 + 26 + 90 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 25 + 26 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 25 + 26 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 25 + 26 + 137   
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 25 + 26 + 150   
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 25 + 26 + 172 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 25 + 26 + 180  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 25 + 26 + 195  
  [set pcolor max-pasture-grow]] 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 26 + 27 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 26 + 27 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 26 + 27 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 26 + 27 + 76 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 26 + 27 + 90
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 26 + 27 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 26 + 27 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 26 + 27 + 137  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 26 + 27 + 150  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 26 + 27 + 172 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 26 + 27 + 180 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 26 + 27 + 195  
  [set pcolor max-pasture-grow]] 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 27 + 28 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 27 + 28 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 27 + 28 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 27 + 28 + 76 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 27 + 28 + 90 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 27 + 28 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 27 + 28 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 27 + 28 + 137  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 27 + 28 + 150  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 27 + 28 + 172 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 27 + 28 + 180  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 27 + 28 + 195  
  [set pcolor max-pasture-grow]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 28 + 29 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 28 + 29 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 28 + 29 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 28 + 29 + 76 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 28 + 29 + 90 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 28 + 29 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 28 + 29 + 120 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 28 + 29 + 137 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 28 + 29 + 150 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 28 + 29 + 172 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 28 + 29 + 180 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 28 + 29 + 195  
  [set pcolor max-pasture-grow]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 29 + 30 + 30 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 29 + 30 + 45 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 29 + 30 + 60 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 29 + 30 + 76 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 29 + 30 + 90 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 29 + 30 + 116 
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 29 + 30 + 120  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 29 + 30 + 137  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 29 + 30 + 150  
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 29 + 30 + 172  
  [set pcolor max-pasture-grow]] 
  
  ask patches with [pcolor = pasture-consumed] [if ticks = initial-time-frame * 29 + 30 + 180 
  [set pcolor regrow-pasture]] 
  ask patches with [pcolor = regrow-pasture] [if ticks = initial-time-frame * 29 + 30 + 195 
  [set pcolor max-pasture-grow]]

end

;;;;;;;;;;;;;;;;;;Setting up Seasonal Changes due to Changes in Temperature;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to season
ask trees [if pounds-per-head >= 500 and pounds-per-head < 746 and ticks > 5489 [set color summer]]
ask trees [if pounds-per-head >= 746 and pounds-per-head < 816 and ticks > 5489 [set color seasonal-transition]]
ask trees [if pounds-per-head >= 816 and pounds-per-head < 923 and ticks > 5489 [set color winter]]
ask trees [if pounds-per-head >= 923 and pounds-per-head < 1019 and ticks > 5489 [set color seasonal-transition]]
ask trees [if pounds-per-head >= 1019 and pounds-per-head <= 1046 and ticks > 5489 [set color summer]] 
end 

;;;;;;;;;;;;;;;;;;;;;;;;;;Grazing Season;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to graze
  
  ;;;;;;;;;;Cows on Farm of Interest;;;;;;;;;;;
  ask cowsi11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
 ask cowsi18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsi113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsi115 [
    if pcolor = green [
      set pcolor eat-pasture] 
  ]
  
  ;;;;;;;;;;Cows on Nearby Farms;;;;;;;;;;;
  ;;;;;;;;;;;;;Central Left;;;;;;;;;;;;;;;;
  ask cowsnlc11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
 ask cowsnlc19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlc115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
 
 ;;;;;;;;;;;;;;;;;Upper Central;;;;;;;;;;;;
  ask cowsncu11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsncu115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  
 ;;;;;;;;;Central Right;;;;;;;; 
  ask cowsnrc11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrc15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrc19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrc110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrc114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrc115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  
 ;;;;;;;;;;Upper Left;;;;;;;;;;;;;;;;; 
  ask cowsnlu11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnlu114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnlu115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  
 ;;;;;;;;;;;Upper Right;;;;;;;; 
 
  ask cowsnru11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnru115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  
;;;;;;;;;;;;Bottom Right;;;;;;;;;;;;;;;  
  ask cowsnrd11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnrd114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  ask cowsnrd115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ] 
  
 ;;;;;;;;;;;Bottom Left;;;;;;;;;;;   
  ask cowsnld11 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld12 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld13 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld14 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld15 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld16 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld17 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld18 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
 ask cowsnld19 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld110 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld111 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld112 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld113 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld114 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]
  ask cowsnld115 [
    if pcolor = green [
      set pcolor eat-pasture]
    ]  
end

;;;;;;;;;;;;;;;;Setting up County Data;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to read-file ;;read all data from text file
  
  if County-WV = "Barbour" and ticks = 0 [file-open "Barbour.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
 if County-WV = "Berkeley" and ticks = 0 [file-open "Berkeley.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Boone" and ticks = 0 [file-open "Boone.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
   if County-WV = "Braxton" and ticks = 0 [file-open "Braxton.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Brooke" and ticks = 0 [file-open "Brooke.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Cabell" and ticks = 0 [file-open "Cabell.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close  
   
  if County-WV = "Calhoun" and ticks = 0 [file-open "Calhoun.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Clay" and ticks = 0 [file-open "Clay.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
   if County-WV = "Doddridge" and ticks = 0 [file-open "Doddridge.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
   if County-WV = "Fayette" and ticks = 0 [file-open "Fayette.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Gilmer" and ticks = 0 [file-open "Gilmer.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Grant" and ticks = 0 [file-open "Grant.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
   if County-WV = "Greenbrier" and ticks = 0 [file-open "Greenbrier.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Hampshire" and ticks = 0 [file-open "Hampshire.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Hancock" and ticks = 0 [file-open "Hancock.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

   if County-WV = "Hardy" and ticks = 0 [file-open "Hardy.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

   if County-WV = "Harrison" and ticks = 0 [file-open "Harrison.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Jackson" and ticks = 0 [file-open "Jackson.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Jefferson" and ticks = 0 [file-open "Jefferson.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Kanawha" and ticks = 0 [file-open "Kanawha.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Lewis" and ticks = 0 [file-open "Lewis.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Lincoln" and ticks = 0 [file-open "Lincoln.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Logan" and ticks = 0 [file-open "Logan.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close  
  
  if County-WV = "Marion" and ticks = 0 [file-open "Marion.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Marshall" and ticks = 0 [file-open "Marshall.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Mason" and ticks = 0 [file-open "Mason.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "McDowell" and ticks = 0 [file-open "McDowell.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Mercer" and ticks = 0 [file-open "Mercer.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Mineral" and ticks = 0 [file-open "Mineral.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Mingo" and ticks = 0 [file-open "Mingo.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Monongalia" and ticks = 0 [file-open "Monongalia.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Monroe" and ticks = 0 [file-open "Monroe.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Morgan" and ticks = 0 [file-open "Morgan.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Nicholas" and ticks = 0 [file-open "Nicholas.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Ohio" and ticks = 0 [file-open "Ohio.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Pendleton" and ticks = 0 [file-open "Pendleton.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Pocahontas" and ticks = 0 [file-open "Pocahontas.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Preston" and ticks = 0 [file-open "Preston.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close

  if County-WV = "Putnam" and ticks = 0 [file-open "Putnam.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Raleigh" and ticks = 0 [file-open "Raleigh.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Randolph" and ticks = 0 [file-open "Randolph.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Ritchie" and ticks = 0 [file-open "Ritchie.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Roane" and ticks = 0 [file-open "Roane.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close 
  
  if County-WV = "Summers" and ticks = 0 [file-open "Summers.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Tucker" and ticks = 0 [file-open "Tucker.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Tyler" and ticks = 0 [file-open "Tyler.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Upshur" and ticks = 0 [file-open "Upshur.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Wayne" and ticks = 0 [file-open "Wayne.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Webster" and ticks = 0 [file-open "Webster.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Wetzel" and ticks = 0 [file-open "Wetzel.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Wirt" and ticks = 0 [file-open "Wirt.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Wood" and ticks = 0 [file-open "Wood.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
  
  if County-WV = "Wyoming" and ticks = 0 [file-open "Wyoming.txt"
  while [not file-at-end?][
   set new-rainfall file-read 
   set new-Tmax file-read
   set new-Tmin file-read
   set new-Tave file-read
   set latitude item 0 file-read
   set slope1 item 0 file-read
   set initial-time-frame 363 
  ]]
  file-close
 
  ask farmhouse 258
  [
  if not empty? new-rainfall
  [ 
  set rainfall first new-rainfall
  set new-rainfall but-first new-rainfall]]
  
  ;;;;;;;;;;;;;;;;;;For Stochastic precipitation
  set new-rainfall-stoc new-rainfall
   if ticks >= 0 and ticks <= 5489 [ask farmhouse 258
  [
  if not empty? new-rainfall-stoc
  [ 
  set Lag-rainfall (list item 0 new-rainfall-stoc item 1 new-rainfall-stoc item 2 new-rainfall-stoc item 3 new-rainfall-stoc); item 4 new-rainfall-stoc item 5 new-rainfall-stoc item 6 new-rainfall-stoc)  
                      
  if length lag-rainfall < 4 [set lag-rainfall (list 0 0 0 0)]
  
  set new-rainfall-stoc but-first new-rainfall-stoc]]]
  set rainfall-mean  mean lag-rainfall
  set rainfall-std standard-deviation lag-rainfall
  set rainfall-stoc random-normal rainfall-mean rainfall-std 
  if rainfall-stoc <= 0 [set rainfall-stoc 0]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ask farmhouse 258
  [
  if not empty? new-Tmax
  [ ;;the next value from the created list to update data in the system
  set Tmax first new-Tmax
    ;; this removes that value and places the second value first (updating data) 
  set new-Tmax but-first new-Tmax]]
  
  ask farmhouse 258
  [
  if not empty? new-Tmin
  [ 
  set Tmin first new-Tmin
  set new-Tmin but-first new-Tmin]]
  
  ask farmhouse 258
  [
  if not empty? new-Tave
  [ 
  set Tave first new-Tave
  set new-Tave but-first new-Tave]] 
 
 ;;;;Pasture Growth Variables: Synchornizing with System Dynamic Modeler;;;
set RYE 4
set ASW-max (2 * RYE - 4)
set evotrans-vs-panevap .79
set lower-critical-temp 40
set lower-optimum-temp 50
set upper-optimum-temp 70
set upper-critical-temp 90
set ASW-above .5
set min-day-length 9.15
set max-day-length 14.85

ifelse Tave < upper-critical-temp [set RGR-Temp (upper-critical-temp - Tave) * (1 / (upper-critical-temp - upper-optimum-temp))] [set RGR-Temp 0]
if Tave < upper-optimum-temp [set RGR-Temp 1]
if Tave < lower-optimum-temp [set RGR-Temp (Tave - lower-critical-temp) * (1 / (lower-optimum-temp - lower-critical-temp))] 
if Tave < lower-critical-temp [set RGR-Temp 0] 

;;;;;;;;;;;;;;Setting up Daily Solar Radiation for Estimating Evapotranspiration;;;;;;;;
set day ticks ;; day is used for equation adjustment
set Lat-Radians PI * Latitude / 180;; ok
set DEC 0.41015 * SIN (((0.01721 * (day + 1) - 1.389) * 180) / pi)
set DL (24 * ACOS (0 - TAN (((Lat-Radians) * 180) / pi) * TAN (((DEC) * 180) / pi))) / 180
ifelse DL < min-day-length [set RGR-DL 0] [set RGR-DL (DL - min-day-length) / (max-day-length - min-day-length)]
set H (PI * (DL / 2)) / 12;;ok
set D (day + 1) - 80 ;;ok
ifelse D > 186 [set lambda D - 186] [set lambda (180 * D) / 186]  
set r (1 - 0.01672 ^ 2) / (1 + 0.01672 * COS (PI * (77.5 + lambda) / 180))
set sp 889.23 / r ^ 2 * COS (((Lat-Radians) * 180) / pi) * COS (((DEC) * 180) / pi) * (SIN (((H) * 180) / pi) - H * COS (((H) * 180) / pi))
set Pan-Evap (-0.2345 - 0.0326 * rainfall + 0.002188 * Tave + 0.0002088 * SP + 0.004202 * (Tmax - Tmin))   
ifelse Pan-Evap < 0 [set Pan-Evapd 0] [set Pan-Evapd Pan-Evap]

;;;;;;;;;Pasture Growth Stochastic;;;;;;;;;;;;;;;;;;;;;
set Pan-Evap-stoc (-0.2345 - 0.0326 * rainfall-stoc + 0.002188 * Tave + 0.0002088 * SP + 0.004202 * (Tmax - Tmin))    
ifelse Pan-Evap-stoc < 0 [set Pan-Evapd-stoc 0] [set Pan-Evapd-stoc Pan-Evap-stoc]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

if (day + 1) = 1 [set ASW ASW-Max]
if ticks >= 0 and ticks < 366 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 366 and ticks < 732 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 732 and ticks < 1098 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 1098 and ticks < 1464 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 1464 and ticks < 1830 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 1830 and ticks < 2196  [set Lag-ASW fput ASW (list ASW)]
if ticks >= 2196 and ticks < 2562 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 2562 and ticks < 2928 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 2928 and ticks < 3294 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 3294 and ticks < 3660[set Lag-ASW fput ASW (list ASW)]
if ticks >= 3660 and ticks < 4026 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 4026 and ticks < 4392 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 4392 and ticks < 4758 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 4758 and ticks < 5124 [set Lag-ASW fput ASW (list ASW)]
if ticks >= 5124 and ticks < 5490 [set Lag-ASW fput ASW (list ASW)]

if ticks >= 0 and ticks < 5490 [set previous-ASW item 0 Lag-ASW]
if ticks >= 5490 [set previous-asw 0]

ifelse (day + 1) > 1 and previous-ASW + rainfall - previous-Eff-ET > ASW-max [set ASW ASW-max] [set ASW previous-ASW + rainfall - previous-Eff-ET]
if ASW-pct <= 0 [set Eff-ET 0] 
if ticks >= 0 and ticks < 366 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 

;;;Stochastic: Variables with "stoc" at the end are associated with stochastic simulation;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
if (day + 1) = 1 [set ASW-stoc ASW-Max]
if ticks >= 0 and ticks < 366 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)] 
if ticks >= 366 and ticks < 732 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 732 and ticks < 1098 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 1098 and ticks < 1464 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 1464 and ticks < 1830 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 1830 and ticks < 2196  [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 2196 and ticks < 2562 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 2562 and ticks < 2928 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 2928 and ticks < 3294 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 3294 and ticks < 3660[set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 3660 and ticks < 4026 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 4026 and ticks < 4392 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 4392 and ticks < 4758 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 4758 and ticks < 5124 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]
if ticks >= 5124 and ticks < 5490 [set Lag-ASW-stoc fput ASW-stoc (list ASW-stoc)]

if ticks >= 0 and ticks < 5490 [set previous-ASW-stoc item 0 Lag-ASW-stoc]
if ticks >= 5490 [set previous-ASW-stoc 0]

ifelse (day + 1) > 1 and previous-ASW-stoc + rainfall-stoc - previous-Eff-ET-stoc > ASW-max [set ASW-stoc ASW-max] [set ASW-stoc previous-ASW-stoc + rainfall-stoc - previous-Eff-ET-stoc];;ok
if ASW-pct-stoc <= 0 [set Eff-ET-stoc 0]
if ticks >= 0 and ticks < 366 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


if ticks >= 366 and ticks < 732   [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 732 and ticks < 1098  [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 1098 and ticks < 1464 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 1464 and ticks < 1830 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 1830 and ticks < 2196 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 2196 and ticks < 2562 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 2562 and ticks < 2928 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 2928 and ticks < 3294 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 3294 and ticks < 3660 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 3660 and ticks < 4026 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 4026 and ticks < 4392 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 4392 and ticks < 4758 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 4758 and ticks < 5124 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)] 
if ticks >= 5124 and ticks < 5490 [set Lag-Eff-ET fput EFF-ET (list EFF-ET)]
 
if ticks >= 0 and ticks < 5490 [set previous-Eff-ET item 0 Lag-Eff-ET]
if ticks >= 5490 [set previous-Eff-ET 0] 

if ASW-pct > 0 [set Eff-ET (Pan-Evapd * evotrans-vs-panevap * RGR-H2O)]

set ASW-pct ASW / ASW-max
let asw-pct1 asw-pct ^ 2
let asw-pct2 asw-pct ^ 3
 
ifelse ASW-pct > ASW-above [set RGR-H2O 1] [set RGR-H2O (12 * ASW-pct1 - 16 * ASW-pct2)] 

;;;;;;;;;;;;;;;;;;;;;;Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
if ticks >= 366 and ticks < 732   [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 732 and ticks < 1098  [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 1098 and ticks < 1464 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 1464 and ticks < 1830 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 1830 and ticks < 2196 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 2196 and ticks < 2562 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 2562 and ticks < 2928 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 2928 and ticks < 3294 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 3294 and ticks < 3660 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 3660 and ticks < 4026 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 4026 and ticks < 4392 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 4392 and ticks < 4758 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 4758 and ticks < 5124 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 
if ticks >= 5124 and ticks < 5490 [set Lag-Eff-ET-stoc fput EFF-ET-stoc (list EFF-ET-stoc)] 

if ticks >= 0 and ticks < 5490 [set previous-Eff-ET-stoc item 0 Lag-Eff-ET-stoc]
if ticks >= 5490 [set previous-Eff-ET-stoc 0]

if ASW-pct-stoc > 0 [set Eff-ET-stoc (Pan-Evapd-stoc * evotrans-vs-panevap * RGR-H2O-stoc)]

set ASW-pct-stoc ASW-stoc / ASW-max
let asw-pct1-stoc asw-pct-stoc ^ 2
let asw-pct2-stoc asw-pct-stoc ^ 3
 
ifelse ASW-pct-stoc > ASW-above [set RGR-H2O-stoc 1] [set RGR-H2O-stoc (12 * ASW-pct1 - 16 * ASW-pct2)] 
if RGR-H2O-Stoc < 0 [set RGR-H2O-Stoc 0]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


if day + 1 = 1 [set Rel-Cum-Growth 0]
if day + 1 = 1 [set Lag-Rel-Cum-Growth fput Rel-Cum-Growth (list Rel-Cum-Growth)] 
set previous-Rel-Cum-Growth item 0 Lag-Rel-Cum-Growth 
if day + 1 = 2 [set Rel-Cum-Growth previous-Rel-Cum-Growth + RGR-Env]
if ticks + 1 > 2 and ticks <= 366 [set Lag-Rel-Cum-Growth fput Rel-Cum-Growth (list Rel-Cum-Growth)] 
set previous-Rel-Cum-Growth item 0 Lag-Rel-Cum-Growth 
if day + 1 > 2 [set Rel-Cum-Growth previous-Rel-Cum-Growth + RGR-Env]

;;;;;;;;Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;
if day + 1 = 1 [set Rel-Cum-Growth-stoc 0]
if day + 1 = 1 [set Lag-Rel-Cum-Growth-stoc fput Rel-Cum-Growth-stoc (list Rel-Cum-Growth-stoc)] 
set previous-Rel-Cum-Growth-stoc item 0 Lag-Rel-Cum-Growth-stoc 
if day + 1 = 2 [set Rel-Cum-Growth-stoc previous-Rel-Cum-Growth-stoc + RGR-Env-stoc]

if ticks + 1 > 2 and ticks <= 366 [set Lag-Rel-Cum-Growth-stoc fput Rel-Cum-Growth-stoc (list Rel-Cum-Growth-stoc)] 
set previous-Rel-Cum-Growth-stoc item 0 Lag-Rel-Cum-Growth-stoc 
if day + 1 > 2 [set Rel-Cum-Growth-stoc previous-Rel-Cum-Growth-stoc + RGR-Env-stoc]

end


to regress-data
 ;;;;;;;;;;;;;;;Forcasting Electricity Price;;;;;;;;;;;;;;;;;;;;;;; 
 if ticks = 0 [file-open "price electricity for projection3.txt"
 while [not file-at-end?][
 set actual-electricity-price file-read 
 set lag-electricity-price file-read
 set last-lag-electricity file-read
 ]]
 file-close  
 let regress-electricity-price-results matrix:regress matrix:from-column-list (list actual-electricity-price lag-electricity-price)
 let electricity-coefficients item 0 regress-electricity-price-results 
 let electricity-data-fitting item 1 regress-electricity-price-results
 set const-electricity item 0 electricity-coefficients
 set price-electricity-coef item 1 electricity-coefficients
 
 set R-2-electricity item 0 electricity-data-fitting
 set electricity-price-2013 const-electricity + price-electricity-coef * item 0 last-lag-electricity
 set electricity-price-2014 const-electricity + price-electricity-coef * electricity-price-2013
 set electricity-price-2015 const-electricity + price-electricity-coef * electricity-price-2014
 set electricity-price-2016 const-electricity + price-electricity-coef * electricity-price-2015
 set electricity-price-2017 const-electricity + price-electricity-coef * electricity-price-2016
 set electricity-price-2018 const-electricity + price-electricity-coef * electricity-price-2017
 set electricity-price-2019 const-electricity + price-electricity-coef * electricity-price-2018
 set electricity-price-2020 const-electricity + price-electricity-coef * electricity-price-2019
 set electricity-price-2021 const-electricity + price-electricity-coef * electricity-price-2020
 set electricity-price-2022 const-electricity + price-electricity-coef * electricity-price-2021
 set electricity-price-2023 const-electricity + price-electricity-coef * electricity-price-2022
 set electricity-price-2024 const-electricity + price-electricity-coef * electricity-price-2023
 set electricity-price-2025 const-electricity + price-electricity-coef * electricity-price-2024
 set electricity-price-2026 const-electricity + price-electricity-coef * electricity-price-2025
 set electricity-price-2027 const-electricity + price-electricity-coef * electricity-price-2026
 

;;;;;;;;;;;;;;;Estimating Costs of Anaerobic Digestor;;;;;;;;;;;;;;;;;;;;;;; 
 if ticks = 0 [file-open "anaerobic digester costs2.txt"
 while [not file-at-end?][
 set log-cost file-read 
 set log-heads file-read
 ]]
 file-close  
 let regress-anaerobic-costs-results matrix:regress matrix:from-column-list (list log-cost log-heads)
 let anaerobic-coefficients item 0 regress-anaerobic-costs-results 
 let anaerobic-data-fitting item 1 regress-anaerobic-costs-results
 set const-anaerobic item 0 anaerobic-coefficients
 set heads-coef item 1 anaerobic-coefficients
 set R-2-anaerobic item 0 anaerobic-data-fitting
 set beta exp const-anaerobic
 set alpha heads-coef


 ;;;;;;;;;Extract Manure Beef Price and Cost Data;;;;;;;;;;;;;;;;;;;;;;; 
 if ticks = 0 [file-open "manure beef carbon paddock price cost data.txt"
 while [not file-at-end?][
 set beef-selling-price-list file-read 
 set beef-purchasing-price-list file-read
 set beef-other-costs-list file-read
 set beef-other-costs-specialized-list file-read
 set pasture-silage-production-diversified-list file-read
 set pasture-production-specialized-list file-read
 set pasture-cost-list file-read
 set manure-transportation-cost-list file-read
 set manure-cost-list file-read
 set manure-base-charge-list file-read
 set carbon-market-initial-list file-read
 set paddock-costs-list file-read 
 
 ]]
 file-close  
 set Beef-Sold-Price-2013 item 0 beef-selling-price-list  
 set Beef-Sold-Price-2014 item 1 beef-selling-price-list 
 set Beef-Sold-Price-2015 item 2 beef-selling-price-list  
 set Beef-Sold-Price-2016 item 3 beef-selling-price-list 
 set Beef-Sold-Price-2017 item 4 beef-selling-price-list  
 set Beef-Sold-Price-2018 item 5 beef-selling-price-list 
 set Beef-Sold-Price-2019 item 6 beef-selling-price-list  
 set Beef-Sold-Price-2020 item 7 beef-selling-price-list 
 set Beef-Sold-Price-2021 item 8 beef-selling-price-list 
 set Beef-Sold-Price-2022 item 9 beef-selling-price-list  
 set Beef-Sold-Price-2023 item 10 beef-selling-price-list 
 set Beef-Sold-Price-2024 item 11 beef-selling-price-list  
 set Beef-Sold-Price-2025 item 12 beef-selling-price-list 
 set Beef-Sold-Price-2026 item 13 beef-selling-price-list  
 set Beef-Sold-Price-2027 item 14 beef-selling-price-list 
 
 set Steer-Purchase-Price-2013 item 0 beef-purchasing-price-list 
 set Steer-Purchase-Price-2014 item 1 beef-purchasing-price-list
 set Steer-Purchase-Price-2015 item 2 beef-purchasing-price-list 
 set Steer-Purchase-Price-2016 item 3 beef-purchasing-price-list
 set Steer-Purchase-Price-2017 item 4 beef-purchasing-price-list 
 set Steer-Purchase-Price-2018 item 5 beef-purchasing-price-list
 set Steer-Purchase-Price-2019 item 6 beef-purchasing-price-list 
 set Steer-Purchase-Price-2020 item 7 beef-purchasing-price-list
 set Steer-Purchase-Price-2021 item 8 beef-purchasing-price-list
 set Steer-Purchase-Price-2022 item 9 beef-purchasing-price-list 
 set Steer-Purchase-Price-2023 item 10 beef-purchasing-price-list
 set Steer-Purchase-Price-2024 item 11 beef-purchasing-price-list 
 set Steer-Purchase-Price-2025 item 12 beef-purchasing-price-list
 set Steer-Purchase-Price-2026 item 13 beef-purchasing-price-list 
 set Steer-Purchase-Price-2027 item 14 beef-purchasing-price-list
 
 set Other-Var-Costs-Beef-2013 item 0 beef-other-costs-list  
 set Other-Var-Costs-Beef-2014 item 1 beef-other-costs-list 
 set Other-Var-Costs-Beef-2015 item 2 beef-other-costs-list  
 set Other-Var-Costs-Beef-2016 item 3 beef-other-costs-list 
 set Other-Var-Costs-Beef-2017 item 4 beef-other-costs-list  
 set Other-Var-Costs-Beef-2018 item 5 beef-other-costs-list 
 set Other-Var-Costs-Beef-2019 item 6 beef-other-costs-list  
 set Other-Var-Costs-Beef-2020 item 7 beef-other-costs-list 
 set Other-Var-Costs-Beef-2021 item 8 beef-other-costs-list 
 set Other-Var-Costs-Beef-2022 item 9 beef-other-costs-list  
 set Other-Var-Costs-Beef-2023 item 10 beef-other-costs-list 
 set Other-Var-Costs-Beef-2024 item 11 beef-other-costs-list  
 set Other-Var-Costs-Beef-2025 item 12 beef-other-costs-list 
 set Other-Var-Costs-Beef-2026 item 13 beef-other-costs-list  
 set Other-Var-Costs-Beef-2027 item 14 beef-other-costs-list 
 
 set Other-Var-Costs-Beef-specialized-2013 item 0 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2014 item 1 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2015 item 2 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2016 item 3 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2017 item 4 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2018 item 5 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2019 item 6 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2020 item 7 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2021 item 8 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2022 item 9 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2023 item 10 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2024 item 11 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2025 item 12 beef-other-costs-specialized-list 
 set Other-Var-Costs-Beef-specialized-2026 item 13 beef-other-costs-specialized-list  
 set Other-Var-Costs-Beef-specialized-2027 item 14 beef-other-costs-specialized-list 
 
 set pasture-silage-production-diversified-2013 item 0 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2014 item 1 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2015 item 2 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2016 item 3 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2017 item 4 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2018 item 5 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2019 item 6 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2020 item 7 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2021 item 8 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2022 item 9 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2023 item 10 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2024 item 11 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2025 item 12 pasture-silage-production-diversified-list
 set pasture-silage-production-diversified-2026 item 13 pasture-silage-production-diversified-list 
 set pasture-silage-production-diversified-2027 item 14 pasture-silage-production-diversified-list
 
 set pasture-production-specialized-2013 item 0 pasture-production-specialized-list 
 set pasture-production-specialized-2014 item 1 pasture-production-specialized-list
 set pasture-production-specialized-2015 item 2 pasture-production-specialized-list 
 set pasture-production-specialized-2016 item 3 pasture-production-specialized-list
 set pasture-production-specialized-2017 item 4 pasture-production-specialized-list 
 set pasture-production-specialized-2018 item 5 pasture-production-specialized-list
 set pasture-production-specialized-2019 item 6 pasture-production-specialized-list 
 set pasture-production-specialized-2020 item 7 pasture-production-specialized-list
 set pasture-production-specialized-2021 item 8 pasture-production-specialized-list
 set pasture-production-specialized-2022 item 9 pasture-production-specialized-list 
 set pasture-production-specialized-2023 item 10 pasture-production-specialized-list
 set pasture-production-specialized-2024 item 11 pasture-production-specialized-list 
 set pasture-production-specialized-2025 item 12 pasture-production-specialized-list
 set pasture-production-specialized-2026 item 13 pasture-production-specialized-list 
 set pasture-production-specialized-2027 item 14 pasture-production-specialized-list
 
 set cost-pasture-2013 item 0 pasture-cost-list
 set cost-pasture-2014 item 1 pasture-cost-list
 set cost-pasture-2015 item 2 pasture-cost-list
 set cost-pasture-2016 item 3 pasture-cost-list
 set cost-pasture-2017 item 4 pasture-cost-list
 set cost-pasture-2018 item 5 pasture-cost-list
 set cost-pasture-2019 item 6 pasture-cost-list
 set cost-pasture-2020 item 7 pasture-cost-list
 set cost-pasture-2021 item 8 pasture-cost-list
 set cost-pasture-2022 item 9 pasture-cost-list
 set cost-pasture-2023 item 10 pasture-cost-list
 set cost-pasture-2024 item 11 pasture-cost-list
 set cost-pasture-2025 item 12 pasture-cost-list
 set cost-pasture-2026 item 13 pasture-cost-list
 set cost-pasture-2027 item 14 pasture-cost-list
 
 set manure-trans-cost-2013 item 0 manure-transportation-cost-list
 set manure-trans-cost-2014 item 1 manure-transportation-cost-list
 set manure-trans-cost-2015 item 2 manure-transportation-cost-list
 set manure-trans-cost-2016 item 3 manure-transportation-cost-list
 set manure-trans-cost-2017 item 4 manure-transportation-cost-list
 set manure-trans-cost-2018 item 5 manure-transportation-cost-list
 set manure-trans-cost-2019 item 6 manure-transportation-cost-list
 set manure-trans-cost-2020 item 7 manure-transportation-cost-list
 set manure-trans-cost-2021 item 8 manure-transportation-cost-list
 set manure-trans-cost-2022 item 9 manure-transportation-cost-list
 set manure-trans-cost-2023 item 10 manure-transportation-cost-list
 set manure-trans-cost-2024 item 11 manure-transportation-cost-list
 set manure-trans-cost-2025 item 12 manure-transportation-cost-list
 set manure-trans-cost-2026 item 13 manure-transportation-cost-list
 set manure-trans-cost-2027 item 14 manure-transportation-cost-list
 
 set manure-cost-2013 item 0 manure-cost-list
 set manure-cost-2014 item 1 manure-cost-list
 set manure-cost-2015 item 2 manure-cost-list
 set manure-cost-2016 item 3 manure-cost-list
 set manure-cost-2017 item 4 manure-cost-list
 set manure-cost-2018 item 5 manure-cost-list
 set manure-cost-2019 item 6 manure-cost-list
 set manure-cost-2020 item 7 manure-cost-list
 set manure-cost-2021 item 8 manure-cost-list
 set manure-cost-2022 item 9 manure-cost-list
 set manure-cost-2023 item 10 manure-cost-list
 set manure-cost-2024 item 11 manure-cost-list
 set manure-cost-2025 item 12 manure-cost-list
 set manure-cost-2026 item 13 manure-cost-list
 set manure-cost-2027 item 14 manure-cost-list
 
 set manure-base-charge-2013 item 0 manure-base-charge-list
 set manure-base-charge-2014 item 1 manure-base-charge-list
 set manure-base-charge-2015 item 2 manure-base-charge-list
 set manure-base-charge-2016 item 3 manure-base-charge-list
 set manure-base-charge-2017 item 4 manure-base-charge-list
 set manure-base-charge-2018 item 5 manure-base-charge-list
 set manure-base-charge-2019 item 6 manure-base-charge-list
 set manure-base-charge-2020 item 7 manure-base-charge-list
 set manure-base-charge-2021 item 8 manure-base-charge-list
 set manure-base-charge-2022 item 9 manure-base-charge-list
 set manure-base-charge-2023 item 10 manure-base-charge-list
 set manure-base-charge-2024 item 11 manure-base-charge-list
 set manure-base-charge-2025 item 12 manure-base-charge-list
 set manure-base-charge-2026 item 13 manure-base-charge-list
 set manure-base-charge-2027 item 14 manure-base-charge-list
 
 set paddock-costs item 0 paddock-costs-list

 set carbon-market-initial item 0 carbon-market-initial-list
end 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Display Labels;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

to display-labels
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;POUNDS PER HEAD LABELS;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsi11 [ set label "" ]
  if show-weight? [ask one-of cowsi11  [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsnlc11 [ set label "" ]
  if show-weight? [ask one-of cowsnlc11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsnrc11 [ set label "" ]
  if show-weight? [ask one-of cowsnrc11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsnld11 [ set label "" ]
  if show-weight? [ask one-of cowsnld11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsnrd11 [ set label "" ]
  if show-weight? [ask one-of cowsnrd11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsnlu11 [ set label "" ]
  if show-weight? [ask one-of cowsnlu11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsnru11 [ set label "" ]
  if show-weight? [ask one-of cowsnru11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ask cowsncu11 [ set label "" ]
  if show-weight? [ask one-of cowsncu11 [if ticks > initial-time-frame * 15 + 15 and ticks < initial-time-frame * 15 + 16 + 180 [ set label round pounds-per-head ]]]]  
  
  
   ;;;;;;;;;;;;;;;;Year 2;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsi12 [ set label "" ]
  if show-weight? [ask one-of cowsi12  [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsnlc12 [ set label "" ]
  if show-weight? [ask one-of cowsnlc12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsnrc12 [ set label "" ]
  if show-weight? [ask one-of cowsnrc12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsnld12 [ set label "" ]
  if show-weight? [ask one-of cowsnld12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsnrd12 [ set label "" ]
  if show-weight? [ask one-of cowsnrd12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsnlu12 [ set label "" ]
  if show-weight? [ask one-of cowsnlu12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsnru12 [ set label "" ]
  if show-weight? [ask one-of cowsnru12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ask cowsncu12 [ set label "" ]
  if show-weight? [ask one-of cowsncu12 [if ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 3;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsi13 [ set label "" ]
  if show-weight? [ask one-of cowsi13  [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsnlc13 [ set label "" ]
  if show-weight? [ask one-of cowsnlc13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsnrc13 [ set label "" ]
  if show-weight? [ask one-of cowsnrc13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsnld13 [ set label "" ]
  if show-weight? [ask one-of cowsnld13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsnrd13 [ set label "" ]
  if show-weight? [ask one-of cowsnrd13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsnlu13 [ set label "" ]
  if show-weight? [ask one-of cowsnlu13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsnru13 [ set label "" ]
  if show-weight? [ask one-of cowsnru13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ask cowsncu13 [ set label "" ]
  if show-weight? [ask one-of cowsncu13 [if ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 4;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsi14 [ set label "" ]
  if show-weight? [ask one-of cowsi14  [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsnlc14 [ set label "" ]
  if show-weight? [ask one-of cowsnlc14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsnrc14 [ set label "" ]
  if show-weight? [ask one-of cowsnrc14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsnld14 [ set label "" ]
  if show-weight? [ask one-of cowsnld14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsnrd14 [ set label "" ]
  if show-weight? [ask one-of cowsnrd14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsnlu14 [ set label "" ]
  if show-weight? [ask one-of cowsnlu14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsnru14 [ set label "" ]
  if show-weight? [ask one-of cowsnru14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ask cowsncu14 [ set label "" ]
  if show-weight? [ask one-of cowsncu14 [if ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 5;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsi15 [ set label "" ]
  if show-weight? [ask one-of cowsi15  [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsnlc15 [ set label "" ]
  if show-weight? [ask one-of cowsnlc15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsnrc15 [ set label "" ]
  if show-weight? [ask one-of cowsnrc15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsnld15 [ set label "" ]
  if show-weight? [ask one-of cowsnld15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsnrd15 [ set label "" ]
  if show-weight? [ask one-of cowsnrd15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsnlu15 [ set label "" ]
  if show-weight? [ask one-of cowsnlu15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsnru15 [ set label "" ]
  if show-weight? [ask one-of cowsnru15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ask cowsncu15 [ set label "" ]
  if show-weight? [ask one-of cowsncu15 [if ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 6;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsi16 [ set label "" ]
  if show-weight? [ask one-of cowsi16  [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsnlc16 [ set label "" ]
  if show-weight? [ask one-of cowsnlc16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsnrc16 [ set label "" ]
  if show-weight? [ask one-of cowsnrc16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsnld16 [ set label "" ]
  if show-weight? [ask one-of cowsnld16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsnrd16 [ set label "" ]
  if show-weight? [ask one-of cowsnrd16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsnlu16 [ set label "" ]
  if show-weight? [ask one-of cowsnlu16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsnru16 [ set label "" ]
  if show-weight? [ask one-of cowsnru16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ask cowsncu16 [ set label "" ]
  if show-weight? [ask one-of cowsncu16 [if ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 7;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsi17 [ set label "" ]
  if show-weight? [ask one-of cowsi17  [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsnlc17 [ set label "" ]
  if show-weight? [ask one-of cowsnlc17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsnrc17 [ set label "" ]
  if show-weight? [ask one-of cowsnrc17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsnld17 [ set label "" ]
  if show-weight? [ask one-of cowsnld17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsnrd17 [ set label "" ]
  if show-weight? [ask one-of cowsnrd17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsnlu17 [ set label "" ]
  if show-weight? [ask one-of cowsnlu17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsnru17 [ set label "" ]
  if show-weight? [ask one-of cowsnru17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ask cowsncu17 [ set label "" ]
  if show-weight? [ask one-of cowsncu17 [if ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 8;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsi18 [ set label "" ]
  if show-weight? [ask one-of cowsi18  [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsnlc18 [ set label "" ]
  if show-weight? [ask one-of cowsnlc18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsnrc18 [ set label "" ]
  if show-weight? [ask one-of cowsnrc18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsnld18 [ set label "" ]
  if show-weight? [ask one-of cowsnld18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsnrd18 [ set label "" ]
  if show-weight? [ask one-of cowsnrd18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsnlu18 [ set label "" ]
  if show-weight? [ask one-of cowsnlu18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsnru18 [ set label "" ]
  if show-weight? [ask one-of cowsnru18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ask cowsncu18 [ set label "" ]
  if show-weight? [ask one-of cowsncu18 [if ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 180 [ set label round pounds-per-head ]]]] 
  
  
  ;;;;;;;;;;;;;;;;Year 9;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsi19 [ set label "" ]
  if show-weight? [ask one-of cowsi19  [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsnlc19 [ set label "" ]
  if show-weight? [ask one-of cowsnlc19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsnrc19 [ set label "" ]
  if show-weight? [ask one-of cowsnrc19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsnld19 [ set label "" ]
  if show-weight? [ask one-of cowsnld19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsnrd19 [ set label "" ]
  if show-weight? [ask one-of cowsnrd19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsnlu19 [ set label "" ]
  if show-weight? [ask one-of cowsnlu19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsnru19 [ set label "" ]
  if show-weight? [ask one-of cowsnru19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ask cowsncu19 [ set label "" ]
  if show-weight? [ask one-of cowsncu19 [if ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 10;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsi110 [ set label "" ]
  if show-weight? [ask one-of cowsi110  [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsnlc110 [ set label "" ]
  if show-weight? [ask one-of cowsnlc110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsnrc110 [ set label "" ]
  if show-weight? [ask one-of cowsnrc110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsnld110 [ set label "" ]
  if show-weight? [ask one-of cowsnld110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsnrd110 [ set label "" ]
  if show-weight? [ask one-of cowsnrd110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsnlu110 [ set label "" ]
  if show-weight? [ask one-of cowsnlu110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsnru110 [ set label "" ]
  if show-weight? [ask one-of cowsnru110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ask cowsncu110 [ set label "" ]
  if show-weight? [ask one-of cowsncu110 [if ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 180 [ set label round pounds-per-head ]]]]
  
  
  ;;;;;;;;;;;;;;;;Year 11;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsi111 [ set label "" ]
  if show-weight? [ask one-of cowsi111  [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsnlc111 [ set label "" ]
  if show-weight? [ask one-of cowsnlc111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsnrc111 [ set label "" ]
  if show-weight? [ask one-of cowsnrc111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsnld111 [ set label "" ]
  if show-weight? [ask one-of cowsnld111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsnrd111 [ set label "" ]
  if show-weight? [ask one-of cowsnrd111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsnlu111 [ set label "" ]
  if show-weight? [ask one-of cowsnlu111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsnru111 [ set label "" ]
  if show-weight? [ask one-of cowsnru111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ask cowsncu111 [ set label "" ]
  if show-weight? [ask one-of cowsncu111 [if ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 180 [ set label round pounds-per-head ]]]] 
  
  
  ;;;;;;;;;;;;;;;;Year 12;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsi112 [ set label "" ]
  if show-weight? [ask one-of cowsi112  [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsnlc112 [ set label "" ]
  if show-weight? [ask one-of cowsnlc112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsnrc112 [ set label "" ]
  if show-weight? [ask one-of cowsnrc112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsnld112 [ set label "" ]
  if show-weight? [ask one-of cowsnld112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsnrd112 [ set label "" ]
  if show-weight? [ask one-of cowsnrd112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsnlu112 [ set label "" ]
  if show-weight? [ask one-of cowsnlu112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsnru112 [ set label "" ]
  if show-weight? [ask one-of cowsnru112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ask cowsncu112 [ set label "" ]
  if show-weight? [ask one-of cowsncu112 [if ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 180 [ set label round pounds-per-head ]]]] 
 
 
  ;;;;;;;;;;;;;;;;Year 13;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsi113 [ set label "" ]
  if show-weight? [ask one-of cowsi113  [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsnlc113 [ set label "" ]
  if show-weight? [ask one-of cowsnlc113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsnrc113 [ set label "" ]
  if show-weight? [ask one-of cowsnrc113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsnld113 [ set label "" ]
  if show-weight? [ask one-of cowsnld113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsnrd113 [ set label "" ]
  if show-weight? [ask one-of cowsnrd113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsnlu113 [ set label "" ]
  if show-weight? [ask one-of cowsnlu113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsnru113 [ set label "" ]
  if show-weight? [ask one-of cowsnru113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ask cowsncu113 [ set label "" ]
  if show-weight? [ask one-of cowsncu113 [if ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 180 [ set label round pounds-per-head ]]]]
 
 
  ;;;;;;;;;;;;;;;;Year 14;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsi114 [ set label "" ]
  if show-weight? [ask one-of cowsi114  [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsnlc114 [ set label "" ]
  if show-weight? [ask one-of cowsnlc114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsnrc114 [ set label "" ]
  if show-weight? [ask one-of cowsnrc114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsnld114 [ set label "" ]
  if show-weight? [ask one-of cowsnld114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsnrd114 [ set label "" ]
  if show-weight? [ask one-of cowsnrd114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsnlu114 [ set label "" ]
  if show-weight? [ask one-of cowsnlu114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsnru114 [ set label "" ]
  if show-weight? [ask one-of cowsnru114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ask cowsncu114 [ set label "" ]
  if show-weight? [ask one-of cowsncu114 [if ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 180 [ set label round pounds-per-head ]]]]
 
 
  ;;;;;;;;;;;;;;;;Year 15;;;;;;;;;;;;Show Pounds per head;;;;;;;;;;;;;;;;;;;
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsi115 [ set label "" ]
  if show-weight? [ask one-of cowsi115  [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsnlc115 [ set label "" ]
  if show-weight? [ask one-of cowsnlc115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsnrc115 [ set label "" ]
  if show-weight? [ask one-of cowsnrc115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsnld115 [ set label "" ]
  if show-weight? [ask one-of cowsnld115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
 
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsnrd115 [ set label "" ]
  if show-weight? [ask one-of cowsnrd115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsnlu115 [ set label "" ]
  if show-weight? [ask one-of cowsnlu115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsnru115 [ set label "" ]
  if show-weight? [ask one-of cowsnru115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
  
  if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ask cowsncu115 [ set label "" ]
  if show-weight? [ask one-of cowsncu115 [if ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 180 [ set label round pounds-per-head ]]]]
 
 
  ;;;;Show in the Farm of Interest, if it is profitable or not at the end of the Planning Horizon;;;;;;;;;;;;;;;;;;
 ifelse ticks = initial-time-frame * 29 + 30 + 364 and NPV11 < 0 [ask farmhouse 258 [set label "Not Profitable"]] 
     [update-profitability-label1515]   
        
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ELECTRICITY LABELS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;Show Electricity Generation over Space;;;;;;;;;;;;;;;
  ifelse ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 [ask digestor 292[set label round (generation * heads-interest-11 * .001) + round (generation2 * heads-nearby-11-cow-calf * clusters * .001)]] 
    [update-electricity-label11];   
       
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;MANURE LABELS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
   ;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;Show Manure Production over Space;;;;;;;;;;;;;;;;;
    ifelse ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-11 / 2000) + round (TMP2 * heads-nearby-11-cow-calf * clusters / 2000)]]  
    [update-manure-label11]; 
   
 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;CARBON OFFSET LABELS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;    
  ;;;;;;;;;;;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;Show Carbon Offset over Space;;;;;;;;;;;;;;;;;;
  ifelse ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-11) + round (carbon-offset2 * heads-nearby-11-cow-calf * clusters)]]  
    [update-carbon-label11]; 
   
    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;CO2 EQUIVALENT BASELINE LABELS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ;;;;;;;;;;;;;Year 1;;;;;;;;;;;;;;;;Show CO2 Equivalent Baseline over Space;;;;;;;;;;;;;;;;;;
  
   ifelse ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-11) + round (co2equivalent-baseline2 * heads-nearby-11-cow-calf * clusters)]] 
    [update-lagoon-label11]  
     
end 

;;;;;;;;;;;Updating Lagoon Labels;;;;;;;;;;;;;;;;;;;;;;;;;
to update-lagoon-label11
   ifelse ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label02] 
end  
    
to update-lagoon-label02
   ifelse ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
   [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-12) + round (co2equivalent-baseline2 * heads-nearby-12-cow-calf * clusters)]] 
    [update-lagoon-label22] 
end    

to update-lagoon-label22
  ifelse ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label03]
end 

to update-lagoon-label03
  ifelse ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-13) + round (co2equivalent-baseline2 * heads-nearby-13-cow-calf * clusters)]] 
    [update-lagoon-label33]
end 

to update-lagoon-label33
  ifelse ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label04]
end 

to update-lagoon-label04
  ifelse ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-14) + round (co2equivalent-baseline2 * heads-nearby-14-cow-calf * clusters)]] 
    [update-lagoon-label44]
end 

to update-lagoon-label44
  ifelse ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label05]
end 

to update-lagoon-label05
  ifelse ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-15) + round (co2equivalent-baseline2 * heads-nearby-15-cow-calf * clusters)]] 
    [update-lagoon-label55] 
end 

to update-lagoon-label55
  ifelse ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294 [set label " "]]
    [update-lagoon-label06]
end 

to update-lagoon-label06
  ifelse ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
 [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-16) + round (co2equivalent-baseline2 * heads-nearby-16-cow-calf * clusters)]] 
    [update-lagoon-label66] 
end 

to update-lagoon-label66
  ifelse ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 181  [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label07]
end 

to update-lagoon-label07
  ifelse ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
 [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-17) + round (co2equivalent-baseline2 * heads-nearby-17-cow-calf * clusters)]] 
    [update-lagoon-label77]               
end 

to update-lagoon-label77
  ifelse ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 181  [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label08]
end 

to update-lagoon-label08
  ifelse ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-18) + round (co2equivalent-baseline2 * heads-nearby-18-cow-calf * clusters)]] 
    [update-lagoon-label88]               
end 

to update-lagoon-label88
  ifelse ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 181  [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label09]
end 

to update-lagoon-label09
  ifelse ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-19) + round (co2equivalent-baseline2 * heads-nearby-19-cow-calf * clusters)]] 
    [update-lagoon-label99]
end 

to update-lagoon-label99
  ifelse ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label010]
end 

to update-lagoon-label010
  ifelse ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-110) + round (co2equivalent-baseline2 * heads-nearby-110-cow-calf * clusters)]] 
    [update-lagoon-label011]
end 

to update-lagoon-label011
  ifelse ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label1111]
end 

to update-lagoon-label1111
  ifelse ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
 [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-111) + round (co2equivalent-baseline2 * heads-nearby-111-cow-calf * clusters)]] 
    [update-lagoon-label012]
end 

to update-lagoon-label012
  ifelse ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label1212]
end 

to update-lagoon-label1212
  ifelse ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-112) + round (co2equivalent-baseline2 * heads-nearby-112-cow-calf * clusters)]] 
    [update-lagoon-label013]
end 

to update-lagoon-label013
  ifelse ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 181  [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label1313]
end 

to update-lagoon-label1313
  ifelse ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-113) + round (co2equivalent-baseline2 * heads-nearby-113-cow-calf * clusters)]] 
    [update-lagoon-label014]
end 

to update-lagoon-label014
  ifelse ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label1414]
end 

to update-lagoon-label1414
  ifelse ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-114) + round (co2equivalent-baseline2 * heads-nearby-114-cow-calf * clusters)]] 
    [update-lagoon-label015]
end 

to update-lagoon-label015
  ifelse ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 181 [ask manure-lagoon 294 [ set label "" ] ask manure-lagoon 294[set label " "]]
    [update-lagoon-label1515]
end 

to update-lagoon-label1515
  if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
  [ask manure-lagoon 294 [set label round (co2equivalent-baseline * heads-interest-115) + round (co2equivalent-baseline2 * heads-nearby-115-cow-calf * clusters)]] 
end    

;;;;;;;;;;;Updating Carbon Offset Labels;;;;;;;;;;;;;;;;;;;;;;;;;
to update-carbon-label11
   ifelse ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label02] 
end  
    
to update-carbon-label02
   ifelse ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
   [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-12) + round (carbon-offset2 * heads-nearby-12-cow-calf * clusters)]]
    [update-carbon-label22] 
end    

to update-carbon-label22
  ifelse ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label03]
end 

to update-carbon-label03
  ifelse ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-13) + round (carbon-offset2 * heads-nearby-13-cow-calf * clusters)]]
    [update-carbon-label33]
end 

to update-carbon-label33
  ifelse ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label04]
end 

to update-carbon-label04
  ifelse ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-14) + round (carbon-offset2 * heads-nearby-14-cow-calf * clusters)]]
    [update-carbon-label44]
end 

to update-carbon-label44
  ifelse ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label05]
end 

to update-carbon-label05
  ifelse ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-15) + round (carbon-offset2 * heads-nearby-15-cow-calf * clusters)]]
    [update-carbon-label55] 
end 

to update-carbon-label55
  ifelse ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label06]
end 

to update-carbon-label06
  ifelse ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-16) + round (carbon-offset2 * heads-nearby-16-cow-calf * clusters)]]
    [update-carbon-label66] 
end 

to update-carbon-label66
  ifelse ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 181  [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label07]
end 

to update-carbon-label07
  ifelse ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-17) + round (carbon-offset2 * heads-nearby-17-cow-calf * clusters)]]
    [update-carbon-label77]               
end 

to update-carbon-label77
  ifelse ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 181  [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label08]
end 

to update-carbon-label08
  ifelse ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-18) + round (carbon-offset2 * heads-nearby-18-cow-calf * clusters)]]
    [update-carbon-label88]               
end 

to update-carbon-label88
  ifelse ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 181  [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label09]
end 

to update-carbon-label09
  ifelse ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-19) + round (carbon-offset2 * heads-nearby-19-cow-calf * clusters)]]
    [update-carbon-label99]
end 

to update-carbon-label99
  ifelse ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label010]
end 

to update-carbon-label010
  ifelse ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-110) + round (carbon-offset2 * heads-nearby-110-cow-calf * clusters)]]
    [update-carbon-label011]
end 

to update-carbon-label011
  ifelse ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label1111]
end 

to update-carbon-label1111
  ifelse ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-111) + round (carbon-offset2 * heads-nearby-111-cow-calf * clusters)]]
    [update-carbon-label012]
end 

to update-carbon-label012
  ifelse ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label1212]
end 

to update-carbon-label1212
  ifelse ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-112) + round (carbon-offset2 * heads-nearby-112-cow-calf * clusters)]]
    [update-carbon-label013]
end 

to update-carbon-label013
  ifelse ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 181  [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label1313]
end 

to update-carbon-label1313
  ifelse ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-113) + round (carbon-offset2 * heads-nearby-113-cow-calf * clusters)]]
    [update-carbon-label014]
end 

to update-carbon-label014
  ifelse ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label1414]
end 

to update-carbon-label1414
  ifelse ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-114) + round (carbon-offset2 * heads-nearby-114-cow-calf * clusters)]]
    [update-carbon-label015]
end 

to update-carbon-label015
  ifelse ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 181 [ask carbon-offset-counter 293 [ set label "" ] ask carbon-offset-counter 293[set label " "]]
    [update-carbon-label1515]
end 

to update-carbon-label1515
  if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
  [ask carbon-offset-counter 293 [set label round (carbon-offset * heads-interest-115) + round (carbon-offset2 * heads-nearby-115-cow-calf * clusters)]]
end    

;;;;;;;;;;;Updating Manure Labels;;;;;;;;;;;;;;;;;;;;;;;;;
to update-manure-label11
   ifelse ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label02] 
end  
    
to update-manure-label02
   ifelse ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-12 / 2000) + round (TMP2 * heads-nearby-12-cow-calf * clusters / 2000)]]
    [update-manure-label22] 
end    

to update-manure-label22
  ifelse ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label03]
end 

to update-manure-label03
  ifelse ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-13 / 2000) + round (TMP2 * heads-nearby-13-cow-calf * clusters / 2000)]]
    [update-manure-label33]
end 

to update-manure-label33
  ifelse ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label04]
end 

to update-manure-label04
  ifelse ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-14 / 2000) + round (TMP2 * heads-nearby-14-cow-calf * clusters / 2000)]]
    [update-manure-label44]
end 

to update-manure-label44
  ifelse ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label05]
end 

to update-manure-label05
  ifelse ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-15 / 2000) + round (TMP2 * heads-nearby-15-cow-calf * clusters / 2000)]]
    [update-manure-label55] 
end 

to update-manure-label55
  ifelse ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label06]
end 

to update-manure-label06
  ifelse ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-16 / 2000) + round (TMP2 * heads-nearby-16-cow-calf * clusters / 2000)]]
    [update-manure-label66] 
end 

to update-manure-label66
  ifelse ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 181  [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label07]
end 

to update-manure-label07
  ifelse ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-17 / 2000) + round (TMP2 * heads-nearby-17-cow-calf * clusters / 2000)]]
    [update-manure-label77]               
end 

to update-manure-label77
  ifelse ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 181  [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label08]
end 

to update-manure-label08
  ifelse ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-18 / 2000) + round (TMP2 * heads-nearby-18-cow-calf * clusters / 2000)]]
    [update-manure-label88]               
end 

to update-manure-label88
  ifelse ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 181  [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label09]
end 

to update-manure-label09
  ifelse ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-19 / 2000) + round (TMP2 * heads-nearby-19-cow-calf * clusters / 2000)]]
    [update-manure-label99]
end 

to update-manure-label99
  ifelse ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label010]
end 

to update-manure-label010
  ifelse ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-110 / 2000) + round (TMP2 * heads-nearby-110-cow-calf * clusters / 2000)]]
    [update-manure-label011]
end 

to update-manure-label011
  ifelse ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label1111]
end 

to update-manure-label1111
  ifelse ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-111 / 2000) + round (TMP2 * heads-nearby-111-cow-calf * clusters / 2000)]]
    [update-manure-label012]
end 

to update-manure-label012
  ifelse ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label1212]
end 

to update-manure-label1212
  ifelse ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-112 / 2000) + round (TMP2 * heads-nearby-112-cow-calf * clusters / 2000)]]
    [update-manure-label013]
end 

to update-manure-label013
  ifelse ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 181  [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label1313]
end 

to update-manure-label1313
  ifelse ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-113 / 2000) + round (TMP2 * heads-nearby-113-cow-calf * clusters / 2000)]]
    [update-manure-label014]
end 

to update-manure-label014
  ifelse ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label1414]
end 

to update-manure-label1414
  ifelse ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-114 / 2000) + round (TMP2 * heads-nearby-114-cow-calf * clusters / 2000)]]
    [update-manure-label015]
end 

to update-manure-label015
  ifelse ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 181 [ask manure-storage 291[ set label "" ] ask manure-storage 291[set label " "]]
    [update-manure-label1515]
end 

to update-manure-label1515
  if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 [ask manure-storage 291 [set label round (TMP * heads-interest-115 / 2000) + round (TMP2 * heads-nearby-115-cow-calf * clusters / 2000)]]
end    

;;;;;;;;;;;Updating Electricity Labels;;;;;;;;;;;;;;;;;;;;;;;;;
to update-electricity-label11
   ifelse ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label02] 
end 
    
to update-electricity-label02
   ifelse ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 [ask digestor 292[set label round (generation * heads-interest-12 * .001) + round (generation2 * heads-nearby-12-cow-calf * clusters * .001)]]
    [update-electricity-label22] 
end    

to update-electricity-label22
  ifelse ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label03]
end 

to update-electricity-label03
  ifelse ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 [ask digestor 292[set label round (generation * heads-interest-13 * .001) + round (generation2 * heads-nearby-13-cow-calf * clusters * .001)]]
    [update-electricity-label33]
end 

to update-electricity-label33
  ifelse ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label04]
end 

to update-electricity-label04
  ifelse ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 [ask digestor 292[set label round (generation * heads-interest-14 * .001) + round (generation2 * heads-nearby-14-cow-calf * clusters * .001)]]
    [update-electricity-label44]
end 

to update-electricity-label44
  ifelse ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label05]
end 

to update-electricity-label05
  ifelse ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 [ask digestor 292[set label round (generation * heads-interest-15 * .001) + round (generation2 * heads-nearby-15-cow-calf * clusters * .001)]]
    [update-electricity-label55] 
end 

to update-electricity-label55
  ifelse ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label06]
end 

to update-electricity-label06
  ifelse ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 [ask digestor 292[set label round (generation * heads-interest-16 * .001) + round (generation2 * heads-nearby-16-cow-calf * clusters * .001)]]
    [update-electricity-label66] 
end 

to update-electricity-label66
  ifelse ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 181  [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label07]
end 

to update-electricity-label07
  ifelse ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 [ask digestor 292[set label round (generation * heads-interest-17 * .001) + round (generation2 * heads-nearby-17-cow-calf * clusters * .001)]]
    [update-electricity-label77]               
end 

to update-electricity-label77
  ifelse ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 181  [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label08]
end 

to update-electricity-label08
  ifelse ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 [ask digestor 292[set label round (generation * heads-interest-18 * .001) + round (generation2 * heads-nearby-18-cow-calf * clusters * .001)]]
    [update-electricity-label88]               
end 

to update-electricity-label88
  ifelse ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 181  [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label09]
end 

to update-electricity-label09
  ifelse ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 [ask digestor 292[set label round (generation * heads-interest-19 * .001) + round (generation2 * heads-nearby-19-cow-calf * clusters * .001)]]
    [update-electricity-label99]
end 

to update-electricity-label99
  ifelse ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label010]
end 

to update-electricity-label010
  ifelse ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 [ask digestor 292[set label round (generation * heads-interest-110 * .001) + round (generation2 * heads-nearby-110-cow-calf * clusters * .001)]]
    [update-electricity-label011]
end 

to update-electricity-label011
  ifelse ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label1111]
end 

to update-electricity-label1111
  ifelse ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 [ask digestor 292[set label round (generation * heads-interest-111 * .001) + round (generation2 * heads-nearby-111-cow-calf * clusters * .001)]]
    [update-electricity-label012]
end 

to update-electricity-label012
  ifelse ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label1212]
end 

to update-electricity-label1212
  ifelse ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 [ask digestor 292[set label round (generation * heads-interest-112 * .001) + round (generation2 * heads-nearby-112-cow-calf * clusters * .001)]]
    [update-electricity-label013]
end 

to update-electricity-label013
  ifelse ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 181  [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label1313]
end 

to update-electricity-label1313
  ifelse ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 [ask digestor 292[set label round (generation * heads-interest-113 * .001) + round (generation2 * heads-nearby-113-cow-calf * clusters * .001)]]
    [update-electricity-label014]
end 

to update-electricity-label014
  ifelse ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label1414]
end 

to update-electricity-label1414
  ifelse ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 [ask digestor 292[set label round (generation * heads-interest-114 * .001) + round (generation2 * heads-nearby-114-cow-calf * clusters * .001)]]
    [update-electricity-label015]
end 

to update-electricity-label015
  ifelse ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 181 [ask digestor 292[ set label "" ] ask digestor 292[set label " "]]
    [update-electricity-label1515]
end 

to update-electricity-label1515
  if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 [ask digestor 292[set label round (generation * heads-interest-115 * .001) + round (generation2 * heads-nearby-115-cow-calf * clusters * .001)]]
end    
 
  ;;;;;;;;;;;;;;;;;;Updating Profitability Labels;;;;;;;;;;;;;;; 
to update-profitability-label1515
    if ticks = initial-time-frame * 29 + 30 + 364 and NPV11 >= 0 [ask farmhouse 258 [set label "Profitable"]]
  end 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Results to be exported and accessed in MS-Excel;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to write-to-file
    file-open "netlogoresults.csv"
    set initial-time-frame 365 
    let spacer ","

    if ticks = initial-time-frame * 15 + 16 [
    ask farmhouse 258
    [file-print (word ("County") (spacer) ("Year") (spacer)  ("Cluster Members in the System") (spacer) ("Carbon Price") (spacer) ("Det.: Annual Stocking Rate per Farm") (spacer) ("Det.: Beef Production in Kgs.") (spacer) ("Det.: Electricity Production in MWh ")
         (spacer) ("Det.: Carbon Offset in Tons") (spacer) ("Det.: CO2E Baseline in Tons") (spacer) ("Det.: Capital Investment for Anaerobic Digester") (spacer) ("Percentage: Cost Share Program") (spacer) ("Det.: Net Revenue per Year (excluding fixed costs)") 
         (spacer) ("Det.: NPV 15 Yrs") (spacer) ("Stoc.: Annual Stocking Rate per Farm") (spacer) ("Stoc.: Beef Production in Kgs.") (spacer) ("Stoc.: Electricity Production in MWh") (spacer) ("Stoc.: Carbon Offset in Tons") (spacer) ("Stoc.: CO2E Baseline in Tons") 
         (spacer) ("Stoc.: Capital Investment for Anaerobic Digester") (spacer) ("Stoc.: Net Revenue per Year (excluding fixed costs)") (spacer) ("Stoc.: NPV 15 Yrs") (spacer) ("Det. Specialized: Net Revenue per Year (excluding fixed costs)") (spacer) ("Stoc. Specialized: NPV per Year ") 
         (spacer) ("Det. Specialized: NPV 15 Yrs") (spacer) ("Stoc. Specialized: NPV 15 Yrs") (spacer) ("Det.: Pasture Growth in Tons/Acre") (spacer) ("Stoc.: Pasture Growth in Tons/Acre") (spacer) ("Det. Diversified: Additional Steers for Minimum Supply") 
         (spacer) ("Stoc. Diversified: Additional Steers for Minimum Supply") (spacer) ("Det. Specialized: Additional Steers for Minimum Supply") (spacer) ("Stoc. Specialized: Additional Steers for Minimum Supply")
         (spacer) ("Det.: Annual Stocking Rate Cow/Calf per Farm") (spacer) ("Stoc.: Annual Stocking Rate Cow/Calf per Farm"))]]
          
    
    if ticks = initial-time-frame * 15 + 16 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-11) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value1) (spacer) (" ")
        (spacer) ( round heads-interest-11-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value1-stoc) (spacer) (" ")  (spacer) (round NPV-Beef1) (spacer) (round NPV-Beef-Stoc1) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-1 / 93) (spacer) (total-pasture-1-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-11-cow-calf) (spacer) (heads-nearby-11-stoc-cow-calf))]] 
        
    
   if ticks = initial-time-frame * 16 + 17 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-12) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value2) (spacer) (" ")
        (spacer) ( round heads-interest-12-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value2-stoc) (spacer) (" ") (spacer) (round NPV-Beef2) (spacer) (round NPV-Beef-Stoc2) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-2 / 93) (spacer) (total-pasture-2-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-12-cow-calf) (spacer) (heads-nearby-12-stoc-cow-calf))]] 
        
    
   if ticks = initial-time-frame * 17 + 18 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-13) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value3) (spacer) (" ")
        (spacer) ( round heads-interest-13-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value3-stoc) (spacer) (" ") (spacer) (round NPV-Beef3) (spacer) (round NPV-Beef-Stoc3) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-3 / 93) (spacer) (total-pasture-3-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-13-cow-calf) (spacer) (heads-nearby-13-stoc-cow-calf))]] 
    
   if ticks = initial-time-frame * 18 + 19 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-14) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value4) (spacer) (" ")
        (spacer) ( round heads-interest-14-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value4-stoc) (spacer) (" ") (spacer) (round NPV-Beef4) (spacer) (round NPV-Beef-Stoc4) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-4 / 93) (spacer) (total-pasture-4-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-14-cow-calf) (spacer) (heads-nearby-14-stoc-cow-calf))]] 
   
   if ticks = initial-time-frame * 19 + 20 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-15) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value5) (spacer) (" ")
        (spacer) ( round heads-interest-15-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value5-stoc) (spacer) (" ") (spacer) (round NPV-Beef5) (spacer) (round NPV-Beef-Stoc5) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-5 / 93) (spacer) (total-pasture-5-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-15-cow-calf) (spacer) (heads-nearby-15-stoc-cow-calf))]] 
    
   if ticks = initial-time-frame * 20 + 21 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-16) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value6) (spacer) (" ")
        (spacer) (round heads-interest-16-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value6-stoc) (spacer) (" ") (spacer) (round NPV-Beef6) (spacer) (round NPV-Beef-Stoc6) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-6 / 93) (spacer) (total-pasture-6-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-16-cow-calf) (spacer) (heads-nearby-16-stoc-cow-calf))]]  
   
   if ticks = initial-time-frame * 21 + 22 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-17) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value7) (spacer) (" ")
        (spacer) ( round heads-interest-17-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value7-stoc) (spacer) (" ") (spacer) (round NPV-Beef7) (spacer) (round NPV-Beef-Stoc7) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-7 / 93) (spacer) (total-pasture-7-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-17-cow-calf) (spacer) (heads-nearby-17-stoc-cow-calf))]] 
    
   if ticks = initial-time-frame * 22 + 23 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-18) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value8) (spacer) (" ")
        (spacer) ( round heads-interest-18-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value8-stoc) (spacer) (" ") (spacer) (round NPV-Beef8) (spacer) (round NPV-Beef-Stoc8) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-8 / 93) (spacer) (total-pasture-8-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-18-cow-calf) (spacer) (heads-nearby-18-stoc-cow-calf))]] 
    
   if ticks = initial-time-frame * 23 + 24 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-19) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value9) (spacer) (" ")
        (spacer) ( round heads-interest-19-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value9-stoc) (spacer) (" ") (spacer) (round NPV-Beef9) (spacer) (round NPV-Beef-Stoc9) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-9 / 93) (spacer) (total-pasture-9-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-19-cow-calf) (spacer) (heads-nearby-19-stoc-cow-calf))]] 
    
   if ticks = initial-time-frame * 24 + 25 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-110) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value10) (spacer) (" ")
        (spacer) (round  heads-interest-110-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value10-stoc) (spacer) (" ") (spacer) (round NPV-Beef10) (spacer) (round NPV-Beef-Stoc10) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-10 / 93) (spacer) (total-pasture-10-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-110-cow-calf) (spacer) (heads-nearby-110-stoc-cow-calf))]] 
   
   if ticks = initial-time-frame * 25 + 26 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) (round heads-interest-111) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value11) (spacer) (" ")
        (spacer) ( round heads-interest-111-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value11-stoc) (spacer) (" ") (spacer) (round NPV-Beef11) (spacer) (round NPV-Beef-Stoc11) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-11 / 93) (spacer) (total-pasture-11-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-111-cow-calf) (spacer) (heads-nearby-111-stoc-cow-calf))]]  
    
   if ticks = initial-time-frame * 26 + 27 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-112) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value12) (spacer) (" ")
        (spacer) ( round heads-interest-112-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value12-stoc) (spacer) (" ") (spacer) (round NPV-Beef12) (spacer) (round NPV-Beef-Stoc12) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-12 / 93) (spacer) (total-pasture-12-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-112-cow-calf) (spacer) (heads-nearby-112-stoc-cow-calf))]] 
   
   if ticks = initial-time-frame * 27 + 28 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-113) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value13) (spacer) (" ")
        (spacer) ( round heads-interest-113-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value13-stoc) (spacer) (" ") (spacer) (round NPV-Beef13) (spacer) (round NPV-Beef-Stoc13) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-13 / 93) (spacer) (total-pasture-13-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-113-cow-calf) (spacer) (heads-nearby-113-stoc-cow-calf))]] 
   
   if ticks = initial-time-frame * 28 + 29 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-114) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value14) (spacer) (" ")
        (spacer) ( round heads-interest-114-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value14-stoc) (spacer) (" ") (spacer) (round NPV-Beef14) (spacer) (round NPV-Beef-Stoc14) (spacer) (" ") (spacer) (" ") (spacer) (total-pasture-14 / 93) (spacer) (total-pasture-14-stoc / 93)
        (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-114-cow-calf) (spacer) (heads-nearby-114-stoc-cow-calf))]] 
    
   if ticks = initial-time-frame * 29 + 30 + 364 [
    ask farmhouse 258
    [file-print (word (County-WV) (spacer) (Year) (spacer) (Clusters) (spacer) ( carbon-prices-list) (spacer) ( round heads-interest-115) (spacer) (round Total-Beef) (spacer) (round Total-Electricity) 
        (spacer) (round Total-Carbon-Offset) (spacer) (round Total-CO2Equivalent-Baseline) (spacer) (round digester-capital-investment) (spacer) (Cost-Share-Program) (spacer) (round Value15) (spacer) (round NPV11)
        (spacer) ( round heads-interest-115-stoc) (spacer) (round Total-Beef-stoc) (spacer) (round Total-Electricity-stoc) (spacer) (round Total-Carbon-Offset-stoc) (spacer) (round Total-CO2Equivalent-Baseline-stoc) (spacer) (round digester-capital-investment-stoc) 
        (spacer) (round Value15-stoc) (spacer) (round NPV11-stoc) (spacer) (round NPV-Beef15) (spacer) (round NPV-Beef-Stoc15) (spacer) (round NPV11-BEEF) (spacer) (round NPV11-BEEF-STOC) (spacer) (total-pasture-15 / 93) 
        (spacer) (total-pasture-15-stoc / 93) (spacer) (heads-risk-interest) (spacer) (heads-risk) (spacer) (heads-risk-interestb) (spacer) (heads-riskb) (spacer) (heads-nearby-115-cow-calf) (spacer) (heads-nearby-115-stoc-cow-calf))]] 
     
    file-close
 if ticks = initial-time-frame * 29 + 30 + 364 and NPV11 >= 0 [ user-message "The diversified enterprise is expected to be profitable under the selected scenario; however, its profitability must be compared against the specilized business."]
 if ticks = initial-time-frame * 29 + 30 + 364 and NPV11  < 0 [ user-message "The diversified enterprise is expected to be unprofitable under the selected scenario."]
end

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;System Dynamics Integration;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to setup-system-dymanics ;; invoke procedure established in step-system dynamics
  clear-plot
  tick  
  system-dynamics-setup
  read-file
  system-dynamics-do-plot
end

to step-system-dynamics
 
  repeat ( 1 / dt ) [ system-dynamics-go ]  ;;each agent's iteration equals: DT=1
  ask cows [set weight Pounds-per-Head]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;initial stocking rate based on optimal;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  set initial-time-frame 365
  ;;;;;;;;;;;;;;;;;;;;;;Cows on farm of interest Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsi11 heads-interest-11  
  [
    set color black
    set size .25  ;; for scaling purposes in the interactive world 
    set label-color blue  
     set shape "cow2" 
    if ticks <= initial-time-frame * 15 + 16 + 30  [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows] 
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17  [create-cowsi12 heads-interest-12  
  [
    set color black
    set size .25  
    set label-color blue
    set shape "cow2"       
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
 ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18  [create-cowsi13 heads-interest-13 
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"      
    if ticks <= initial-time-frame * 17 + 18  + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19  [create-cowsi14 heads-interest-14  
  [
    set color black
    set size .25   
    set label-color blue
     set shape "cow2"    
    if ticks <= initial-time-frame * 18 + 19  + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows] 
   ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20  [create-cowsi15 heads-interest-15  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"        
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
   ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21  [create-cowsi16 heads-interest-16  
  [
    set color black
    set size .25  
    set label-color blue
    set shape "cow2"        
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
   ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22  [create-cowsi17 heads-interest-17  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"   
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
   ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23  [create-cowsi18 heads-interest-18  
  [
    set color black
    set size .25  
    set label-color blue
    set shape "cow2"       
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24  [create-cowsi19 heads-interest-19  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"   
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25  [create-cowsi110 heads-interest-110  
  [
    set color black
    set size .25  
    set label-color blue
    set shape "cow2"   
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows] 
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26  [create-cowsi111 heads-interest-111  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"       
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27  [create-cowsi112 heads-interest-112  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"   
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28  [create-cowsi113 heads-interest-113  
  [
    set color black
    set size .25  
    set label-color blue
    set shape "cow2"   
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29  [create-cowsi114 heads-interest-114  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"   
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;farm of interest Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 29 + 30  [create-cowsi115 heads-interest-115  
  [
    set color black
    set size .25   
    set label-color blue
    set shape "cow2"       
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy (random 14 + 0) (random 10 + 6) 
      set goal patch -1 6 face goal
      ] 
    ] ] [update-cows] 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Central Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsnlc11 heads-nearby-11  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsnlc12 heads-nearby-12  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsnlc13 heads-nearby-13
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]       
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsnlc14 heads-nearby-14  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]      
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsnlc15 heads-nearby-15  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]        
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsnlc16 heads-nearby-16 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsnlc17 heads-nearby-17  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsnlc18 heads-nearby-18  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]     
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsnlc19 heads-nearby-19  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsnlc110 heads-nearby-110  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsnlc111 heads-nearby-111 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsnlc112 heads-nearby-112  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]      
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsnlc113 heads-nearby-113  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]      
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsnlc114 heads-nearby-114  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]      
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsnlc115 heads-nearby-115  
   [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy (random -15 - 20) (random 10 + 6) 
      set goal patch -34 5 face goal
      ]
     ]] [update-cows]  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Bottom Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsnld11 heads-nearby-11-cow-calf * 2  
  [
    set color black
    set size .25  ;; setting it as .3 for scaling 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsnld12 heads-nearby-12-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsnld13 heads-nearby-13-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsnld14 heads-nearby-14-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsnld15 heads-nearby-15-cow-calf * 2  
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsnld16 heads-nearby-16-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsnld17 heads-nearby-17-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsnld18 heads-nearby-18-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsnld19 heads-nearby-19-cow-calf * 2 
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random -14 - 20) (random -12 - 37) 
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsnld110 heads-nearby-110-cow-calf * 2 
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy (random -14 - 20) (random -12 - 37) 
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsnld111 heads-nearby-111-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy (random -14 - 20) (random -12 - 37) 
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsnld112 heads-nearby-112-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsnld113 heads-nearby-113-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsnld114 heads-nearby-114-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy (random -14 - 20) (random -12 - 37)  
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsnld115 heads-nearby-115-cow-calf * 2 
   [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy (random -14 - 20) (random -12 - 37)   
      set goal patch -34 -38 face goal
      ]
     ]] [update-cows]  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Center Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsnrc11 heads-nearby-11  
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy (random 13 + 34) (random 10 + 6)  
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsnrc12 heads-nearby-12  
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsnrc13 heads-nearby-13  
  [
    set color black
    set size .25  ;
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsnrc14 heads-nearby-14  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsnrc15 heads-nearby-15 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsnrc16 heads-nearby-16  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsnrc17 heads-nearby-17  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsnrc18 heads-nearby-18  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy (random 13 + 34) (random 10 + 6)  
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsnrc19 heads-nearby-19  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random 13 + 34) (random 10 + 6)  
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsnrc110 heads-nearby-110  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy (random 13 + 34) (random 10 + 6)  
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsnrc111 heads-nearby-111  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy (random 13 + 34) (random 10 + 6)  
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsnrc112 heads-nearby-112  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsnrc113 heads-nearby-113  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random 13 + 34) (random 10 + 6)   
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsnrc114 heads-nearby-114  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy (random 13 + 34) (random 10 + 6)  
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsnrc115 heads-nearby-115  
   [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy (random 13 + 34) (random 10 + 6) 
      set goal patch 32 5 face goal
      ]
     ]] [update-cows]  
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Up Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsnru11 heads-nearby-11-cow-calf * 2 
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsnru12 heads-nearby-12-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsnru13 heads-nearby-13-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsnru14 heads-nearby-14-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]   
     
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsnru15 heads-nearby-15-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsnru16 heads-nearby-16-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsnru17 heads-nearby-17-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsnru18 heads-nearby-18-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsnru19 heads-nearby-19-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows] 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsnru110 heads-nearby-110-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsnru111 heads-nearby-111-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsnru112 heads-nearby-112-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsnru113 heads-nearby-113-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random 13 + 34) (random 10 + 18)    
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsnru114 heads-nearby-114-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy (random 13 + 34) (random 10 + 18)   
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsnru115 heads-nearby-115-cow-calf * 2  
   [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy (random 13 + 34) (random 10 + 18)  
      set goal patch 32 28 face goal
      ]
     ]] [update-cows]  
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Up Center (Farm of Inetrest);;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsncu11 heads-nearby-11-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsncu12 heads-nearby-12-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsncu13 heads-nearby-13-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy (random -7 - 8) (random 13 + 33)     
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsncu14 heads-nearby-14-cow-calf * 2 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy (random -7 - 8) (random 13 + 33)     
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsncu15 heads-nearby-15-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsncu16 heads-nearby-16-cow-calf * 2  
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy (random -7 - 8) (random 13 + 33)     
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsncu17 heads-nearby-17-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]    
 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsncu18 heads-nearby-18-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsncu19 heads-nearby-19-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random -7 - 8) (random 13 + 33)   
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsncu110 heads-nearby-110-cow-calf * 2  
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsncu111 heads-nearby-111-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsncu112 heads-nearby-112-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy (random -7 - 8) (random 13 + 33)     
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsncu113 heads-nearby-113-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random -7 - 8) (random 13 + 33)     
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsncu114 heads-nearby-114-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy (random -7 - 8) (random 13 + 33)    
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsncu115 heads-nearby-115-cow-calf * 2  
   [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy (random -7 - 8) (random 13 + 33)  
      set goal patch -6 32 face goal
      ]
     ]] [update-cows]  
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Up Left;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 15 + 16 [create-cowsnlu11 heads-nearby-11-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy  (random -11 - 18) (random 14 + 20)    
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsnlu12 heads-nearby-12-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy  (random -11 - 18) (random 14 + 20)    
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsnlu13 heads-nearby-13-cow-calf * 2 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy  (random -11 - 18) (random 14 + 20)      
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsnlu14 heads-nearby-14-cow-calf * 2 
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy  (random -11 - 18) (random 14 + 20)      
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsnlu15 heads-nearby-15-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy  (random -11 - 18) (random 14 + 20)     
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsnlu16 heads-nearby-16-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy  (random -11 - 18) (random 14 + 20)      
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsnlu17 heads-nearby-17-cow-calf * 2  
  [
    set color black
    set size .25 
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy  (random -11 - 18) (random 14 + 20)     
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsnlu18 heads-nearby-18-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy  (random -11 - 18) (random 14 + 20)   
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsnlu19 heads-nearby-19-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy  (random -11 - 18) (random 14 + 20)    
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsnlu110 heads-nearby-110-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy  (random -11 - 18) (random 14 + 20)    
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsnlu111 heads-nearby-111-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy  (random -11 - 18) (random 14 + 20)     
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsnlu112 heads-nearby-112-cow-calf * 2 
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy  (random -11 - 18) (random 14 + 20)      
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsnlu113 heads-nearby-113-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy  (random -11 - 18) (random 14 + 20)      
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsnlu114 heads-nearby-114-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy  (random -11 - 18) (random 14 + 20)     
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsnlu115 heads-nearby-115-cow-calf * 2  
   [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy  (random -11 - 18) (random 14 + 20)   
      set goal patch -28 34 face goal
      ]
     ]] [update-cows]  
     
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Bottom Right;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
 ifelse ticks = initial-time-frame * 15 + 16 [create-cowsnrd11 heads-nearby-11-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 15 + 16 + 30 [setxy  (random 10 + 40) (random -12 - 21)    
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows] 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 16 + 17 [create-cowsnrd12 heads-nearby-12-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 16 + 17 + 30 [setxy  (random 10 + 40) (random -12 - 21)    
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 17 + 18 [create-cowsnrd13 heads-nearby-13-cow-calf * 2 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2" 
     ;;initial position ;; first paddock  
    if ticks <= initial-time-frame * 17 + 18 + 30 [setxy  (random 10 + 40) (random -12 - 21)      
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 18 + 19 [create-cowsnrd14 heads-nearby-14-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 18 + 19 + 30 [setxy  (random 10 + 40) (random -12 - 21)       
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 19 + 20 [create-cowsnrd15 heads-nearby-15-cow-calf * 2 
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 19 + 20 + 30 [setxy  (random 10 + 40) (random -12 - 21)     
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 20 + 21 [create-cowsnrd16 heads-nearby-16-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 20 + 21 + 30 [setxy  (random 10 + 40) (random -12 - 21)       
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 21 + 22 [create-cowsnrd17 heads-nearby-17-cow-calf * 2 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 21 + 22 + 30 [setxy  (random 10 + 40) (random -12 - 21)      
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 22 + 23 [create-cowsnrd18 heads-nearby-18-cow-calf * 2 
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 22 + 23 + 30 [setxy  (random 10 + 40) (random -12 - 21)   
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 23 + 24 [create-cowsnrd19 heads-nearby-19-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 23 + 24 + 30 [setxy (random 10 + 40) (random -12 - 21)     
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 24 + 25 [create-cowsnrd110 heads-nearby-110-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 24 + 25 + 30 [setxy  (random 10 + 40) (random -12 - 21)     
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]    
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 25 + 26 [create-cowsnrd111 heads-nearby-111-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 25 + 26 + 30 [setxy  (random 10 + 40) (random -12 - 21)      
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]   
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 26 + 27 [create-cowsnrd112 heads-nearby-112-cow-calf * 2  
  [
    set color black
    set size .25   
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 26 + 27 + 30 [setxy  (random 10 + 40) (random -12 - 21)       
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 27 + 28 [create-cowsnrd113 heads-nearby-113-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 27 + 28 + 30 [setxy (random 10 + 40) (random -12 - 21)       
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ifelse ticks = initial-time-frame * 28 + 29 [create-cowsnrd114 heads-nearby-114-cow-calf * 2  
  [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"   
    if ticks <= initial-time-frame * 28 + 29 + 30 [setxy  (random 10 + 40) (random -12 - 21)      
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Cows on Nearby Farms Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ifelse ticks = initial-time-frame * 29 + 30 [create-cowsnrd115 heads-nearby-115-cow-calf * 2  
   [
    set color black
    set size .25  
    set label-color blue  
    set shape "cow2"  
    if ticks <= initial-time-frame * 29 + 30 + 30 [setxy  (random 10 + 40) (random -12 - 21)    
      set goal patch 38 -34 face goal
      ]
     ]] [update-cows]  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;Deterministic: Synchronizing the Base Stocking Rate with System Dynamics;;;;;;
  set pasture-limit 2950
  set cow-intake 26
  set cow-pounds 1000
  
  ;;;;;;;;;;;;;;;;;;Setting up for Cow/Calf and Stocker Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;Stochastic: Synchronizing the Base Stocking Rate with System Dynamics;;;;;;;;;
  set Annual-Forage-Intake Accumulated-Daily-Intake 
  set Total-Pasture Acc-PGR-Acre * num-acres-list
  set stocking-rate Total-Pasture / Annual-Forage-Intake
  if Acc-PGR-Acre - Annual-Forage-Intake <= pasture-limit [set base-stocking-rate stocking-rate]
  
  set Annual-Forage-Intake-cow-calf Accumulated-Daily-Intake + (cow-intake * 365)
  set stocking-rate-cow-calf Total-Pasture / Annual-Forage-Intake-cow-calf
  if Acc-PGR-Acre - Annual-Forage-Intake-cow-calf <= pasture-limit [set base-stocking-rate-cow-calf stocking-rate-cow-calf]
  
  ;;;;;;Stochastic: Synchronizing the Base Stocking Rate with System Dynamics;;;;;;;;;
  set Total-Pasture-Stoc Acc-PGR-Acre-Stoc * num-acres-list
  set stocking-rate-stoc Total-Pasture-Stoc / Annual-Forage-Intake
  
  set stocking-rate-stoc-cow-calf Total-Pasture-Stoc / Annual-Forage-Intake-cow-calf
  
  if Acc-PGR-Acre-Stoc - Annual-Forage-Intake <= pasture-limit [set base-stocking-rate-stoc stocking-rate-stoc]
  
  if Acc-PGR-Acre-Stoc - Annual-Forage-Intake-cow-calf <= pasture-limit [set base-stocking-rate-stoc-cow-calf stocking-rate-stoc-cow-calf]
 
  set initial-time-frame 365 
  set dist. 50;;Helper to measure distances between farm locations;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;Determining  Optimal Stocking Rate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame [ask farmhouse 258 [set optimal-stocking-interest-1  (base-stocking-rate * slope-interest  )]]
  if ticks = initial-time-frame [ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [set optimal-stocking-nearby-1  (base-stocking-rate * slope1 ) ]]]
  if ticks = initial-time-frame [ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [set optimal-stocking-nearby-1-cow-calf  (base-stocking-rate-cow-calf * slope1 ) ]]]
 
                                                        
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ask farmhouse 258 [if ticks = initial-time-frame [output-print "Determinitic: Optimal Stocking Rate for Year 1:"]]
  ask farmhouse 258  [if ticks = initial-time-frame [output-print "Farm of Interest"]]
  ask farmhouse 258  [if ticks = initial-time-frame [output-print round optimal-stocking-interest-1]] 
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame [output-print round optimal-stocking-nearby-1]] ]
  ask farmhouse 258 [if ticks = initial-time-frame [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame [output-print round optimal-stocking-nearby-1-cow-calf]] ]
  if ticks mod (initial-time-frame + 1) = 0 [repeat 1 [step-system-dynamics] set pounds-per-head initial-weight set accumulated-daily-intake 0 set methane 0 set generation 0 set timer-loop-sequence 500]  
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 2 + 1 [output-print "Deterministic: Optimal Stocking Rate for Year 2:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 2 + 1 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1 [output-print round optimal-stocking-interest-1]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 2 + 1  [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1  [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 2 + 1 [output-print round optimal-stocking-nearby-1]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1  [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 2 + 1 [output-print round optimal-stocking-nearby-1-cow-calf]] ]
  if ticks = initial-time-frame * 2 + 1  [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 3 + 2 [output-print "Deterministic: Optimal Stocking Rate for Year 3:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 3 + 2 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [output-print  round optimal-stocking-interest-1]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 3 + 2 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 3 + 2 [output-print round optimal-stocking-nearby-1]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 3 + 2 [output-print round optimal-stocking-nearby-1-cow-calf]] ]
  if ticks = initial-time-frame * 3 + 2 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 4 + 3 [output-print "Deterministic: Optimal Stocking Rate for Year 4:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 4 + 3 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [output-print round optimal-stocking-interest-1]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 4 + 3 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 4 + 3 [output-print round optimal-stocking-nearby-1]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 4 + 3 [output-print round optimal-stocking-nearby-1-cow-calf]] ]
  if ticks = initial-time-frame * 4 + 3 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 5 + 4 [output-print "Deterministic: Optimal Stocking Rate for Year 5:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 5 + 4 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [output-print round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 5 + 4 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 5 + 4 [output-print round optimal-stocking-nearby-1]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 5 + 4 [output-print round optimal-stocking-nearby-1-cow-calf]] ]
  if ticks = initial-time-frame * 5 + 4 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 6 + 5 [output-print "Deterministic: Optimal Stocking Rate for Year 6:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 6 + 5 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [output-print round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 6 + 5 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 6 + 5 [output-print round optimal-stocking-nearby-1 ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 6 + 5 [output-print round optimal-stocking-nearby-1-cow-calf ]] ]
  if ticks = initial-time-frame * 6 + 5 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6  [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 7 + 6 [output-print "Deterministic: Optimal Stocking Rate for Year 7:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 7 + 6 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6 [output-print round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 7 + 6 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 7 + 6 [output-print round optimal-stocking-nearby-1 ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6 [output-print "Adjacent Cow/ Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 7 + 6 [output-print round optimal-stocking-nearby-1-cow-calf ]] ]
  if ticks = initial-time-frame * 7 + 6 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7  [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 8 + 7 [output-print "Deterministic: Optimal Stocking Rate for Year 8:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 8 + 7 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7 [output-print round optimal-stocking-interest-1]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 8 + 7 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 8 + 7 [output-print round optimal-stocking-nearby-1  ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 8 + 7 [output-print round optimal-stocking-nearby-1-cow-calf  ]] ]
  if ticks = initial-time-frame * 8 + 7 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8  [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 9 + 8 [output-print "Deterministic: Optimal Stocking Rate for Year 9:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 9 + 8  [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8 [output-print round optimal-stocking-interest-1 ]]
  
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 9 + 8[ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 9 + 8 [output-print round optimal-stocking-nearby-1 ]] ] 
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 9 + 8 [output-print round optimal-stocking-nearby-1-cow-calf ]] ] 
  if ticks = initial-time-frame * 9 + 8[ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9  [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 10 + 9 [output-print "Deterministic: Optimal Stocking Rate for Year 10:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 10 + 9  [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9 [output-print  round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 10 + 9 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34]  [ if ticks = initial-time-frame * 10 + 9 [output-print round optimal-stocking-nearby-1 ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3]  [ if ticks = initial-time-frame * 10 + 9 [output-print round optimal-stocking-nearby-1-cow-calf  ]] ]  
  if ticks = initial-time-frame * 10 + 9 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10  [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 11 + 10 [output-print "Deterministic: Optimal Stocking Rate for Year 11:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 11 + 10  [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10 [output-print  round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 11 + 10 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 11 + 10 [output-print  round optimal-stocking-nearby-1 ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 11 + 10 [output-print  round optimal-stocking-nearby-1-cow-calf  ]]] 
  if ticks = initial-time-frame * 11 + 10 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 12 + 11 [output-print "Deterministic: Optimal Stocking Rate for Year 12:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 12 + 11 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [output-print round optimal-stocking-interest-1]]
 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 12 + 11 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 12 + 11 [output-print round optimal-stocking-nearby-1 ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 12 + 11 [output-print round optimal-stocking-nearby-1-cow-calf ]] ]  
  if ticks = initial-time-frame * 12 + 11 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 13 + 12 [output-print "Deterministic: Optimal Stocking Rate for Year 13:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 13 + 12 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [output-print  round optimal-stocking-interest-1]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 13 + 12 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 13 + 12 [output-print round optimal-stocking-nearby-1 ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 13 + 12 [output-print round optimal-stocking-nearby-1-cow-calf  ]] ]  
  if ticks = initial-time-frame * 13 + 12 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 14 + 13 [output-print "Deterministic: Optimal Stocking Rate for Year 14:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 14 + 13 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [output-print  round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 14 + 13 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 14 + 13  [output-print round optimal-stocking-nearby-1]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 14 + 13  [output-print round optimal-stocking-nearby-1-cow-calf]] ]  
  if ticks = initial-time-frame * 14 + 13 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14  [set optimal-stocking-interest-1  ((base-stocking-rate + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 15 + 14 [output-print "Deterministic: Optimal Stocking Rate for Year 15:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 15 + 14 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14 [output-print round optimal-stocking-interest-1 ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 15 + 14 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1  ((base-stocking-rate + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 15 + 14 [output-print  round optimal-stocking-nearby-1]] ] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 15 + 14 [output-print  round optimal-stocking-nearby-1-cow-calf]] ] 
  if ticks = initial-time-frame * 15 + 14 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-cow-calf  ((base-stocking-rate-cow-calf + 0.27904743) * slope1) ]]]
 
  set initial-time-frame 365;;; Redifining the Initial Time
  
  ;;;;;;;;;;;;;;;;;;;;;Determining  Optimal Stocking Rate Under Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame [ask farmhouse 258 [set optimal-stocking-interest-1-stoc  (base-stocking-rate-stoc * slope-interest)]]
  if ticks = initial-time-frame [ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [set optimal-stocking-nearby-1-stoc  (base-stocking-rate-stoc * slope1) ]]]
  if ticks = initial-time-frame [ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  (base-stocking-rate-stoc-cow-calf * slope1) ]]]                                                     
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ask farmhouse 258 [if ticks = initial-time-frame [output-print "Stochastic: Optimal Stocking Rate for Year 1:"]]
  ask farmhouse 258  [if ticks = initial-time-frame [output-print "Farm of Interest"]]
  ask farmhouse 258  [if ticks = initial-time-frame [output-print round optimal-stocking-interest-1-stoc]] 
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ask farmhouse 258 [if ticks = initial-time-frame [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame [output-print round optimal-stocking-nearby-1-stoc]] ]
  ask farmhouse 258 [if ticks = initial-time-frame [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame [output-print round optimal-stocking-nearby-1-stoc-cow-calf]] ]
  
  if ticks mod (initial-time-frame + 1) = 0 [repeat 1 [step-system-dynamics] set pounds-per-head initial-weight set accumulated-daily-intake 0 set methane 0 set generation 0 set timer-loop-sequence 0]  
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;    
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Farm of Interest;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 2 + 1 [output-print "Stochastic: Optimal Stocking Rate for Year 2:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 2 + 1 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1 [output-print round optimal-stocking-interest-1-stoc]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 2 + 1  [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1  [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 2 + 1 [output-print round optimal-stocking-nearby-1-stoc]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 2 + 1  [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 2 + 1 [output-print round optimal-stocking-nearby-1-stoc-cow-calf]] ]
  if ticks = initial-time-frame * 2 + 1  [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 3 + 2 [output-print "Stochastic: Optimal Stocking Rate for Year 3:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 3 + 2 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [output-print  round optimal-stocking-interest-1-stoc]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 3 + 2 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 3 + 2 [output-print round optimal-stocking-nearby-1-stoc]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 3 + 2 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 3 + 2 [output-print round optimal-stocking-nearby-1-stoc-cow-calf]] ]
  if ticks = initial-time-frame * 3 + 2 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 4;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 4 + 3 [output-print "Stochastic: Optimal Stocking Rate for Year 4:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 4 + 3 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [output-print round optimal-stocking-interest-1-stoc]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 4 + 3 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 4 + 3 [output-print round optimal-stocking-nearby-1-stoc]] ]
   ask farmhouse 258 [if ticks = initial-time-frame * 4 + 3 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 4 + 3 [output-print round optimal-stocking-nearby-1-stoc-cow-calf]] ]
  if ticks = initial-time-frame * 4 + 3 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 5 + 4 [output-print "Stochastic: Optimal Stocking Rate for Year 5:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 5 + 4 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [output-print round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 5 + 4 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 5 + 4 [output-print round optimal-stocking-nearby-1-stoc]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 5 + 4 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 5 + 4 [output-print round optimal-stocking-nearby-1-stoc-cow-calf]] ]
  if ticks = initial-time-frame * 5 + 4 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 6 + 5 [output-print "Stochastic: Optimal Stocking Rate for Year 6:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 6 + 5 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [output-print round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 6 + 5 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 6 + 5 [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 6 + 5 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 6 + 5 [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ]
  if ticks = initial-time-frame * 6 + 5 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6  [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 7 + 6 [output-print "Stochastic: Optimal Stocking Rate for Year 7:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 7 + 6 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6 [output-print round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 7 + 6 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 7 + 6 [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 7 + 6 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 7 + 6 [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ]
  if ticks = initial-time-frame * 7 + 6 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7  [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 8 + 7 [output-print "Stochastic: Optimal Stocking Rate for Year 8:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 8 + 7 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7 [output-print round optimal-stocking-interest-1-stoc]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 8 + 7 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 8 + 7 [output-print round optimal-stocking-nearby-1-stoc  ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 8 + 7 [output-print "Adjacent Cow/ Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 8 + 7 [output-print round optimal-stocking-nearby-1-stoc-cow-calf  ]] ]
  if ticks = initial-time-frame * 8 + 7 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8  [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 9 + 8 [output-print "Stochastic: Optimal Stocking Rate for Year 9:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 9 + 8  [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8 [output-print round optimal-stocking-interest-1-stoc ]]
  
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 9 + 8[ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 9 + 8 [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 9 + 8 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 9 + 8 [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ] 
  if ticks = initial-time-frame * 9 + 8[ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 10;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9  [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 10 + 9 [output-print "Stochastic: Optimal Stocking Rate for Year 10:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 10 + 9  [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9 [output-print  round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 10 + 9 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34]  [ if ticks = initial-time-frame * 10 + 9 [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 10 + 9 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3]  [ if ticks = initial-time-frame * 10 + 9 [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ] 
  if ticks = initial-time-frame * 10 + 9 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10  [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 11 + 10 [output-print "Stochastic: Optimal Stocking Rate for Year 11:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 11 + 10  [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10 [output-print  round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 11 + 10 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 11 + 10 [output-print  round optimal-stocking-nearby-1-stoc ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 11 + 10 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 11 + 10 [output-print  round optimal-stocking-nearby-1-stoc-cow-calf ]]]  
  if ticks = initial-time-frame * 11 + 10 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 12 + 11 [output-print "Stochastic: Optimal Stocking Rate for Year 12:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 12 + 11 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [output-print round optimal-stocking-interest-1-stoc]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 12 + 11 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 12 + 11 [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 12 + 11 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 12 + 11 [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ] 
  if ticks = initial-time-frame * 12 + 11 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 13;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 13 + 12 [output-print "Stochastic: Optimal Stocking Rate for Year 13:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 13 + 12 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [output-print  round optimal-stocking-interest-1-stoc]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 13 + 12 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 13 + 12 [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 13 + 12 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 13 + 12 [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ]  
  if ticks = initial-time-frame * 13 + 12 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 14;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 14 + 13 [output-print "Stochastic: Optimal Stocking Rate for Year 14:"] 
  ask farmhouse 258  [if ticks = initial-time-frame * 14 + 13 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [output-print  round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 14 + 13 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 34] [ if ticks = initial-time-frame * 14 + 13  [output-print round optimal-stocking-nearby-1-stoc ]] ]
  ask farmhouse 258 [if ticks = initial-time-frame * 14 + 13 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 14 + 13  [output-print round optimal-stocking-nearby-1-stoc-cow-calf ]] ] 
  if ticks = initial-time-frame * 14 + 13 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Optimal Stocking Rate Year 15;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14  [set optimal-stocking-interest-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope-interest)]] 
  if ticks = initial-time-frame * 15 + 14 [output-print "Stochastic: Optimal Stocking Rate for Year 15:"]
  ask farmhouse 258  [if ticks = initial-time-frame * 15 + 14 [output-print "Farm of Interest"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14 [output-print round optimal-stocking-interest-1-stoc ]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate: Nearby Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 15 + 14 [ask patch 15 0 [ask one-of farmhouses with [color = 34] [set optimal-stocking-nearby-1-stoc  ((base-stocking-rate-stoc + 0.27904743) * slope1) ]]]
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14 [output-print "Adjacent Stocker Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 15 + 14 [output-print  round optimal-stocking-nearby-1-stoc ]] ] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 14 [output-print "Adjacent Cow/Calf Farms"]]
  ask patch 15 0 [ask one-of farmhouses with [distance myself <= dist. and color = 3] [ if ticks = initial-time-frame * 15 + 14 [output-print  round optimal-stocking-nearby-1-stoc-cow-calf ]] ] 
  if ticks = initial-time-frame * 15 + 14 [ask patch 15 0 [ask one-of farmhouses with [color = 3] [set optimal-stocking-nearby-1-stoc-cow-calf  ((base-stocking-rate-stoc-cow-calf + 0.27904743) * slope1) ]]]
  
  ;;;Redefining the Stocking Rate (Deterministic) on Farm of Interest (Stocker) for Value Availability throughout the Planning Horizon
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  if ticks = initial-time-frame  [set heads-interest-11 round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 2 + 1 [set heads-interest-12  round optimal-stocking-interest-1] 
  if ticks = initial-time-frame * 3 + 2  [set heads-interest-13  round optimal-stocking-interest-1] 
  if ticks = initial-time-frame * 4 + 3 [set heads-interest-14  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 5 + 4 [set heads-interest-15  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 6 + 5 [set heads-interest-16  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 7 + 6 [ set heads-interest-17  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 8 + 7 [ set heads-interest-18  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 9 + 8 [ set heads-interest-19  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 10 + 9 [ set heads-interest-110  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 11 + 10 [ set heads-interest-111  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 12 + 11 [ set heads-interest-112  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 13 + 12 [ set heads-interest-113  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 14 + 13 [ set heads-interest-114  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 15 + 14 [ set heads-interest-115  round optimal-stocking-interest-1]
  
  ;;;Redefining the Stocking Rate (Deterministic) on Farm of Interest for Value Availability throughout the Planning Horizon (Specialized)
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  if ticks = initial-time-frame  [set heads-interest-11b round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 2 + 1 [set heads-interest-12b  round optimal-stocking-interest-1] 
  if ticks = initial-time-frame * 3 + 2  [set heads-interest-13b  round optimal-stocking-interest-1] 
  if ticks = initial-time-frame * 4 + 3 [set heads-interest-14b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 5 + 4 [set heads-interest-15b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 6 + 5 [set heads-interest-16b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 7 + 6 [ set heads-interest-17b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 8 + 7 [ set heads-interest-18b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 9 + 8 [ set heads-interest-19b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 10 + 9 [ set heads-interest-110b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 11 + 10 [ set heads-interest-111b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 12 + 11 [ set heads-interest-112b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 13 + 12 [ set heads-interest-113b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 14 + 13 [ set heads-interest-114b  round optimal-stocking-interest-1]
  if ticks = initial-time-frame * 15 + 14 [ set heads-interest-115b  round optimal-stocking-interest-1]
  
  ;;;;;;;;;;Redefining the Stocking Rate (Deterministic) on Nearby Farms (Stockers) for Value Availability throughout the Planning Horizon;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame [set heads-nearby-11 round optimal-stocking-nearby-1] 
  if ticks = initial-time-frame * 2 + 1 [set heads-nearby-12  round optimal-stocking-nearby-1] 
  if ticks = initial-time-frame * 3 + 2  [set heads-nearby-13  round optimal-stocking-nearby-1] 
  if ticks = initial-time-frame * 4 + 3 [ set heads-nearby-14  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 5 + 4 [ set heads-nearby-15  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 6 + 5 [ set heads-nearby-16  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 7 + 6 [ set heads-nearby-17 round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 8 + 7 [ set heads-nearby-18  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 9 + 8 [ set heads-nearby-19  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 10 + 9 [ set heads-nearby-110  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 11 + 10 [ set heads-nearby-111  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 12 + 11 [ set heads-nearby-112  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 13 + 12 [ set heads-nearby-113  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 14 + 13 [ set heads-nearby-114  round optimal-stocking-nearby-1]
  if ticks = initial-time-frame * 15 + 14 [ set heads-nearby-115  round optimal-stocking-nearby-1]
  
  ;;;;;;;;;Redefining the Stocking Rate (Stochastic) on Farm of Interest (Stocker) for Value Availability throughout the Planning Horizon;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  if ticks = initial-time-frame  [set heads-interest-11-stoc round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 2 + 1 [set heads-interest-12-stoc  round optimal-stocking-interest-1-stoc] 
  if ticks = initial-time-frame * 3 + 2  [set heads-interest-13-stoc  round optimal-stocking-interest-1-stoc] 
  if ticks = initial-time-frame * 4 + 3 [set heads-interest-14-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 5 + 4 [set heads-interest-15-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 6 + 5 [set heads-interest-16-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 7 + 6 [ set heads-interest-17-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 8 + 7 [ set heads-interest-18-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 9 + 8 [ set heads-interest-19-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 10 + 9 [ set heads-interest-110-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 11 + 10 [ set heads-interest-111-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 12 + 11 [ set heads-interest-112-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 13 + 12 [ set heads-interest-113-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 14 + 13 [ set heads-interest-114-stoc  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 15 + 14 [ set heads-interest-115-stoc  round optimal-stocking-interest-1-stoc]
  
  ;;;;;;;;;Redefining the Stocking Rate (Stochastic) on Farm of Interest for Value Availability throughout the Planning Horizon (Specialized);;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  if ticks = initial-time-frame  [set heads-interest-11-stocb round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 2 + 1 [set heads-interest-12-stocb  round optimal-stocking-interest-1-stoc] 
  if ticks = initial-time-frame * 3 + 2  [set heads-interest-13-stocb  round optimal-stocking-interest-1-stoc] 
  if ticks = initial-time-frame * 4 + 3 [set heads-interest-14-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 5 + 4 [set heads-interest-15-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 6 + 5 [set heads-interest-16-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 7 + 6 [ set heads-interest-17-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 8 + 7 [ set heads-interest-18-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 9 + 8 [ set heads-interest-19-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 10 + 9 [ set heads-interest-110-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 11 + 10 [ set heads-interest-111-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 12 + 11 [ set heads-interest-112-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 13 + 12 [ set heads-interest-113-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 14 + 13 [ set heads-interest-114-stocb  round optimal-stocking-interest-1-stoc]
  if ticks = initial-time-frame * 15 + 14 [ set heads-interest-115-stocb  round optimal-stocking-interest-1-stoc]
  
  ;;;;;;;;;;Redefining the Stocking Rate (Stochastic) on Nearby Stocker Farms for Value Availability throughout the Planning Horizon;;;;;;;;;
  if ticks = initial-time-frame [set heads-nearby-11-stoc round optimal-stocking-nearby-1-stoc] 
  if ticks = initial-time-frame * 2 + 1 [set heads-nearby-12-stoc  round optimal-stocking-nearby-1-stoc] 
  if ticks = initial-time-frame * 3 + 2  [set heads-nearby-13-stoc  round optimal-stocking-nearby-1-stoc] 
  if ticks = initial-time-frame * 4 + 3 [ set heads-nearby-14-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 5 + 4 [ set heads-nearby-15-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 6 + 5 [ set heads-nearby-16-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 7 + 6 [ set heads-nearby-17-stoc round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 8 + 7 [ set heads-nearby-18-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 9 + 8 [ set heads-nearby-19-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 10 + 9 [ set heads-nearby-110-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 11 + 10 [ set heads-nearby-111-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 12 + 11 [ set heads-nearby-112-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 13 + 12 [ set heads-nearby-113-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 14 + 13 [ set heads-nearby-114-stoc  round optimal-stocking-nearby-1-stoc]
  if ticks = initial-time-frame * 15 + 14 [ set heads-nearby-115-stoc  round optimal-stocking-nearby-1-stoc]
  
  ;;;;;;;;;;Redefining the Stocking Rate (Deterministic) on Nearby Cow/Calf Farms for Value Availability throughout the Planning Horizon;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame [set heads-nearby-11-cow-calf round optimal-stocking-nearby-1-cow-calf] 
  if ticks = initial-time-frame * 2 + 1 [set heads-nearby-12-cow-calf  round optimal-stocking-nearby-1-cow-calf] 
  if ticks = initial-time-frame * 3 + 2  [set heads-nearby-13-cow-calf  round optimal-stocking-nearby-1-cow-calf] 
  if ticks = initial-time-frame * 4 + 3 [ set heads-nearby-14-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 5 + 4 [ set heads-nearby-15-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 6 + 5 [ set heads-nearby-16-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 7 + 6 [ set heads-nearby-17-cow-calf round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 8 + 7 [ set heads-nearby-18-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 9 + 8 [ set heads-nearby-19-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 10 + 9 [ set heads-nearby-110-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 11 + 10 [ set heads-nearby-111-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 12 + 11 [ set heads-nearby-112-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 13 + 12 [ set heads-nearby-113-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 14 + 13 [ set heads-nearby-114-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  if ticks = initial-time-frame * 15 + 14 [ set heads-nearby-115-cow-calf  round optimal-stocking-nearby-1-cow-calf]
  
  ;;;;;;;;;;Redefining the Stocking Rate (Stochastic) on Cow/Calf Nearby Farms for Value Availability throughout the Planning Horizon;;;;;;;;
  if ticks = initial-time-frame [set heads-nearby-11-stoc-cow-calf round optimal-stocking-nearby-1-stoc-cow-calf] 
  if ticks = initial-time-frame * 2 + 1 [set heads-nearby-12-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf] 
  if ticks = initial-time-frame * 3 + 2  [set heads-nearby-13-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf] 
  if ticks = initial-time-frame * 4 + 3 [ set heads-nearby-14-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 5 + 4 [ set heads-nearby-15-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 6 + 5 [ set heads-nearby-16-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 7 + 6 [ set heads-nearby-17-stoc-cow-calf round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 8 + 7 [ set heads-nearby-18-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 9 + 8 [ set heads-nearby-19-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 10 + 9 [ set heads-nearby-110-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 11 + 10 [ set heads-nearby-111-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 12 + 11 [ set heads-nearby-112-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 13 + 12 [ set heads-nearby-113-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 14 + 13 [ set heads-nearby-114-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf]
  if ticks = initial-time-frame * 15 + 14 [ set heads-nearby-115-stoc-cow-calf  round optimal-stocking-nearby-1-stoc-cow-calf] 
  
  
  ;;;;;;;;;;;;;;;;;;;Deterministic: Setting up Pasture Available for the System Interaction;;;;;;;;;;;;;;;;;;;;;;;
if ticks = initial-time-frame  [set total-pasture-1 round total-pasture / 2000]
if ticks = initial-time-frame * 2 + 1 [set total-pasture-2 round total-pasture / 2000]
if ticks = initial-time-frame * 3 + 2  [set total-pasture-3 round total-pasture / 2000]
if ticks = initial-time-frame * 4 + 3 [set total-pasture-4 round total-pasture / 2000]
if ticks = initial-time-frame * 5 + 4 [set total-pasture-5 round total-pasture / 2000]
if ticks = initial-time-frame * 6 + 5 [set total-pasture-6 round total-pasture / 2000]
if ticks = initial-time-frame * 7 + 6 [set total-pasture-7 round total-pasture / 2000]
if ticks = initial-time-frame * 8 + 7 [set total-pasture-8 round total-pasture / 2000]
if ticks = initial-time-frame * 9 + 8 [set total-pasture-9 round total-pasture / 2000]
if ticks = initial-time-frame * 10 + 9 [set total-pasture-10 round total-pasture / 2000]
if ticks = initial-time-frame * 11 + 10 [set total-pasture-11 round total-pasture / 2000]
if ticks = initial-time-frame * 12 + 11 [set total-pasture-12 round total-pasture / 2000]
if ticks = initial-time-frame * 13 + 12 [set total-pasture-13 round total-pasture / 2000]
if ticks = initial-time-frame * 14 + 13 [set total-pasture-14 round total-pasture / 2000]
if ticks = initial-time-frame * 15 + 14 [set total-pasture-15 round total-pasture / 2000]

;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Pasture Available for the System Interaction;;;;;;;;;;;;;;;;;;;;;;;
if ticks = initial-time-frame  [set total-pasture-1-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 2 + 1 [set total-pasture-2-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 3 + 2  [set total-pasture-3-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 4 + 3 [set total-pasture-4-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 5 + 4 [set total-pasture-5-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 6 + 5 [set total-pasture-6-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 7 + 6 [set total-pasture-7-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 8 + 7 [set total-pasture-8-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 9 + 8 [set total-pasture-9-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 10 + 9 [set total-pasture-10-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 11 + 10 [set total-pasture-11-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 12 + 11 [set total-pasture-12-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 13 + 12 [set total-pasture-13-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 14 + 13 [set total-pasture-14-stoc round total-pasture-stoc / 2000]
if ticks = initial-time-frame * 15 + 14 [set total-pasture-15-stoc round total-pasture-stoc / 2000]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Average Stocking Rate for Stocker and Cow-Calf Farms;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;Deterministic:
    ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 [set average-stocking-stocker round (heads-interest-11 + heads-interest-12 + heads-interest-13 + heads-interest-14 + heads-interest-15 
        + heads-interest-16 + heads-interest-17 + heads-interest-18 + heads-interest-19 + heads-interest-110 + heads-interest-111 + heads-interest-112 + heads-interest-113 + heads-interest-114 + heads-interest-115) / 15]] 
;;;;Stochastic:    
    ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 [set average-stocking-stocker-stoc round (heads-interest-11-stoc + heads-interest-12-stoc + heads-interest-13-stoc + heads-interest-14-stoc + heads-interest-15-stoc 
        + heads-interest-16-stoc + heads-interest-17-stoc + heads-interest-18-stoc + heads-interest-19-stoc + heads-interest-110-stoc + heads-interest-111-stoc + heads-interest-112-stoc + heads-interest-113-stoc 
        + heads-interest-114-stoc + heads-interest-115-stoc) / 15]] 
;;;;;Deterministic:    
    ask farmhouse 262 [if ticks = initial-time-frame * 15 + 16 [set average-stocking-nearby round (heads-nearby-11 + heads-nearby-12 + heads-nearby-13 + heads-nearby-14 + heads-nearby-15 + heads-nearby-16 + heads-nearby-17 + heads-nearby-18 
        + heads-nearby-19 + heads-nearby-110 + heads-nearby-111 + heads-nearby-112 + heads-nearby-113 + heads-nearby-114 + heads-nearby-115) / 15]] 
;;;;;Stochastic:     
    ask farmhouse 262 [if ticks = initial-time-frame * 15 + 16 [set average-stocking-stocker-stoc-nearby round (heads-nearby-11-stoc + heads-nearby-12-stoc + heads-nearby-13-stoc + heads-nearby-14-stoc + heads-nearby-15-stoc + heads-nearby-16-stoc 
        + heads-nearby-17-stoc + heads-nearby-18-stoc + heads-nearby-19-stoc + heads-nearby-110-stoc + heads-nearby-111-stoc + heads-nearby-112-stoc + heads-nearby-113-stoc + heads-nearby-114-stoc + heads-nearby-115-stoc) / 15]]  
;;;;Deterministic:
    ask farmhouse 260 [if ticks = initial-time-frame * 15 + 16 [set average-stocking-nearby-cow-calf round (heads-nearby-11-cow-calf + heads-nearby-12-cow-calf + heads-nearby-13-cow-calf + heads-nearby-14-cow-calf + heads-nearby-15-cow-calf 
        + heads-nearby-16-cow-calf + heads-nearby-17-cow-calf + heads-nearby-18-cow-calf + heads-nearby-19-cow-calf + heads-nearby-110-cow-calf + heads-nearby-111-cow-calf + heads-nearby-112-cow-calf + heads-nearby-113-cow-calf + heads-nearby-114-cow-calf 
        + heads-nearby-115-cow-calf) / 15]] 
;;;;Stochastic;  
    ask farmhouse 260 [if ticks = initial-time-frame * 15 + 16 [set average-stocking-nearby-cow-calf-stoc round (heads-nearby-11-stoc-cow-calf + heads-nearby-12-stoc-cow-calf + heads-nearby-13-stoc-cow-calf + heads-nearby-14-stoc-cow-calf + heads-nearby-15-stoc-cow-calf 
        + heads-nearby-16-stoc-cow-calf + heads-nearby-17-stoc-cow-calf + heads-nearby-18-stoc-cow-calf + heads-nearby-19-stoc-cow-calf + heads-nearby-110-stoc-cow-calf + heads-nearby-111-stoc-cow-calf + heads-nearby-112-stoc-cow-calf + heads-nearby-113-stoc-cow-calf 
        + heads-nearby-114-stoc-cow-calf + heads-nearby-115-stoc-cow-calf) / 15]] 
  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Economic Variables;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Deterministic: Capital Investment: Anaerobic Digester and Its Components;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set spatial-stocking-clustering average-stocking-stocker + (average-stocking-nearby-cow-calf * clusters)]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set digester-capital-investment  (spatial-stocking-clustering ^ alpha) * beta]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print "Digester Capital Investment"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print digester-capital-investment]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stochastic: Capital Investment: Anaerobic Digester and Its Components;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set spatial-stocking-clustering-stoc average-stocking-stocker-stoc + (average-stocking-nearby-cow-calf-stoc * clusters)]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set digester-capital-investment-stoc  (spatial-stocking-clustering-stoc ^ alpha) * beta]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print "Digester Capital Investment-stoc"]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print digester-capital-investment-stoc]]
  

 ;;;;;;;;;;;;;;;;;;;;;;Setting up Electricity Prices;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set price-electricity electricity-price-2013]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set price-electricity electricity-price-2014]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set price-electricity electricity-price-2015]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set price-electricity electricity-price-2016]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set price-electricity electricity-price-2017]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set price-electricity electricity-price-2018]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set price-electricity electricity-price-2019]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set price-electricity electricity-price-2020]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set price-electricity electricity-price-2021]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set price-electricity electricity-price-2022]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set price-electricity electricity-price-2023]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set price-electricity electricity-price-2024]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set price-electricity electricity-price-2025]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set price-electricity electricity-price-2026]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set price-electricity electricity-price-2027]]

 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef Prices;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set price-beef-head Beef-Sold-Price-2013 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set price-beef-head Beef-Sold-Price-2014 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set price-beef-head Beef-Sold-Price-2015 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set price-beef-head Beef-Sold-Price-2016 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set price-beef-head Beef-Sold-Price-2017 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set price-beef-head Beef-Sold-Price-2018 * pounds-per-head]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set price-beef-head Beef-Sold-Price-2019 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set price-beef-head Beef-Sold-Price-2020 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set price-beef-head Beef-Sold-Price-2021 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set price-beef-head Beef-Sold-Price-2022 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set price-beef-head Beef-Sold-Price-2023 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set price-beef-head Beef-Sold-Price-2024 * pounds-per-head]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set price-beef-head Beef-Sold-Price-2025 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set price-beef-head Beef-Sold-Price-2026 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set price-beef-head Beef-Sold-Price-2027 * pounds-per-head]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef Prices Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set price-beef-headb Beef-Sold-Price-2013 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set price-beef-headb Beef-Sold-Price-2014 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set price-beef-headb Beef-Sold-Price-2015 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set price-beef-headb Beef-Sold-Price-2016 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set price-beef-headb Beef-Sold-Price-2017 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set price-beef-headb Beef-Sold-Price-2018 * pounds-per-head]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set price-beef-headb Beef-Sold-Price-2019 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set price-beef-headb Beef-Sold-Price-2020 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set price-beef-headb Beef-Sold-Price-2021 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set price-beef-headb Beef-Sold-Price-2022 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set price-beef-headb Beef-Sold-Price-2023 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set price-beef-headb Beef-Sold-Price-2024 * pounds-per-head]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set price-beef-headb Beef-Sold-Price-2025 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set price-beef-headb Beef-Sold-Price-2026 * pounds-per-head]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set price-beef-headb Beef-Sold-Price-2027 * pounds-per-head]]
   
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Manure Cost per Mile/Ton;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2013]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2014]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2015]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2016]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2017]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2018]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2019]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2020]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2021]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2022]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2023]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2024]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2025]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2026]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set manure-transportation-cost manure-trans-cost-2027]] 
  ask farmhouse 258 [if clusters = 0 [set manure-transportation-cost 0]] 
   
 
  
;;;;;;;;;;;;;;;;;;;;;;;;;;Defining Risk on Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   if ticks = initial-time-frame * 15 + 16 + 364 and heads-interest-11-stoc < average-stocking-stocker-stoc 
      [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-11-stoc)]] 
   if ticks = initial-time-frame * 15 + 16 + 364 and heads-interest-11-stoc >= average-stocking-stocker-stoc 
      [ask farmhouse 258  [set heads-risk 0]]
      
   if ticks = initial-time-frame * 16 + 17 + 364 and heads-interest-12-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-12-stoc)]] 
   if ticks = initial-time-frame * 16 + 17 + 364 and heads-interest-12-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk 0]]
   
   if ticks = initial-time-frame * 17 + 18 + 364 and heads-interest-13-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-13-stoc)]] 
   if ticks = initial-time-frame * 17 + 18 + 364 and heads-interest-13-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk 0]]
  
   if ticks = initial-time-frame * 18 + 19 + 364 and heads-interest-14-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-14-stoc)]] 
   if ticks = initial-time-frame * 18 + 19 + 364 and heads-interest-14-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk 0]]
  
   if ticks = initial-time-frame * 19 + 20 + 364 and heads-interest-15-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-15-stoc)]] 
   if ticks = initial-time-frame * 19 + 20 + 364 and heads-interest-15-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk 0]]
   
  if ticks = initial-time-frame * 20 + 21 + 364 and heads-interest-16-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-16-stoc)]] 
  if ticks = initial-time-frame * 20 + 21 + 364 and heads-interest-16-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
   
  if ticks = initial-time-frame * 21 + 22 + 364 and heads-interest-17-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-17-stoc)]] 
  if ticks = initial-time-frame * 21 + 22 + 364 and heads-interest-17-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
   
  if ticks = initial-time-frame * 22 + 23 + 364 and heads-interest-18-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-18-stoc)]] 
  if ticks = initial-time-frame * 22 + 23 + 364 and heads-interest-18-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
  
  if ticks = initial-time-frame * 23 + 24 + 364 and heads-interest-19-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-19-stoc)]] 
  if ticks = initial-time-frame * 23 + 24 + 364 and heads-interest-19-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]] 
  
  if ticks = initial-time-frame * 24 + 25 + 364 and heads-interest-110-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-110-stoc)]] 
  if ticks = initial-time-frame * 24 + 25 + 364 and heads-interest-110-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
  
  if ticks = initial-time-frame * 25 + 26 + 364 and heads-interest-111-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-111-stoc)]] 
  if ticks = initial-time-frame * 25 + 26 + 364 and heads-interest-111-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk 0]]
  
  if ticks = initial-time-frame * 26 + 27 + 364 and heads-interest-112-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-112-stoc)]] 
  if ticks = initial-time-frame * 26 + 27 + 364 and heads-interest-112-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
   
  if ticks = initial-time-frame * 27 + 28 + 364 and heads-interest-113-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-113-stoc)]] 
  if ticks = initial-time-frame * 27 + 28 + 364 and heads-interest-113-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
  
  if ticks = initial-time-frame * 28 + 29 + 364 and heads-interest-114-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-114-stoc)]] 
  if ticks = initial-time-frame * 28 + 29 + 364 and heads-interest-114-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-risk 0]]
  
  if ticks = initial-time-frame * 29 + 30 + 364 and heads-interest-115-stoc < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk round (average-stocking-stocker-stoc - heads-interest-115-stoc)]] 
  if ticks = initial-time-frame * 29 + 30 + 364 and heads-interest-115-stoc >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-risk 0]]
     
 
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef Variable Costs (Stochastic);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2013 * heads-interest-11-stoc + other-var-costs-beef-2013 * heads-interest-11-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost2-stoc (cost-pasture-2013 * ((num-acres-list / heads-interest-11-stoc) * 100) * 2) + pasture-silage-production-diversified-2013]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2013 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2014 * heads-interest-12-stoc + other-var-costs-beef-2014 * heads-interest-12-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost2-stoc (cost-pasture-2014 * ((num-acres-list / heads-interest-12-stoc) * 100) * 2) + pasture-silage-production-diversified-2014]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2014 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]
  
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2015 * heads-interest-13-stoc + other-var-costs-beef-2015 * heads-interest-13-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost2-stoc (cost-pasture-2015 * ((num-acres-list / heads-interest-13-stoc) * 100) * 2) + pasture-silage-production-diversified-2015]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2015 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2016 * heads-interest-14-stoc + other-var-costs-beef-2016 * heads-interest-14-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost2-stoc (cost-pasture-2016 * ((num-acres-list / heads-interest-14-stoc) * 100) * 2) + pasture-silage-production-diversified-2016]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2016 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]   
     
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2017 * heads-interest-15-stoc + other-var-costs-beef-2017 * heads-interest-15-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost2-stoc (cost-pasture-2017 * ((num-acres-list / heads-interest-15-stoc) * 100) * 2) + pasture-silage-production-diversified-2017]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2017 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2018 * heads-interest-16-stoc + other-var-costs-beef-2018 * heads-interest-16-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost2-stoc (cost-pasture-2018 * ((num-acres-list / heads-interest-16-stoc) * 100) * 2) + pasture-silage-production-diversified-2018]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2018 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]
  
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2019 * heads-interest-17-stoc + other-var-costs-beef-2019 * heads-interest-17-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost2-stoc (cost-pasture-2019 * ((num-acres-list / heads-interest-17-stoc) * 100) * 2) + pasture-silage-production-diversified-2019]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2019 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2020 * heads-interest-18-stoc + other-var-costs-beef-2020 * heads-interest-18-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost2-stoc (cost-pasture-2020 * ((num-acres-list / heads-interest-18-stoc) * 100) * 2) + pasture-silage-production-diversified-2020]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2020 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]   
     
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2021 * heads-interest-19-stoc + other-var-costs-beef-2021 * heads-interest-19-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost2-stoc (cost-pasture-2021 * ((num-acres-list / heads-interest-19-stoc) * 100) * 2) + pasture-silage-production-diversified-2021]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2021 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]   
     
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2022 * heads-interest-110-stoc + other-var-costs-beef-2022 * heads-interest-110-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost2-stoc (cost-pasture-2022 * ((num-acres-list / heads-interest-110-stoc) * 100) * 2) + pasture-silage-production-diversified-2022]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2022 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2023 * heads-interest-111-stoc + other-var-costs-beef-2023 * heads-interest-111-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost2-stoc (cost-pasture-2023 * ((num-acres-list / heads-interest-111-stoc) * 100) * 2) + pasture-silage-production-diversified-2023]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2023 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]
  
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2024 * heads-interest-112-stoc + other-var-costs-beef-2024 * heads-interest-112-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost2-stoc (cost-pasture-2024 * ((num-acres-list / heads-interest-112-stoc) * 100) * 2) + pasture-silage-production-diversified-2024]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2024 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2025 * heads-interest-113-stoc + other-var-costs-beef-2025 * heads-interest-113-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost2-stoc (cost-pasture-2025 * ((num-acres-list / heads-interest-113-stoc) * 100) * 2) + pasture-silage-production-diversified-2025]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2025 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]     
       
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2026 * heads-interest-114-stoc + other-var-costs-beef-2026 * heads-interest-114-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost2-stoc (cost-pasture-2026 * ((num-acres-list / heads-interest-114-stoc) * 100) * 2) + pasture-silage-production-diversified-2026]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2026 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost1-stoc initial-weight * Steer-Purchase-Price-2027 * heads-interest-115-stoc + other-var-costs-beef-2027 * heads-interest-115-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost2-stoc (cost-pasture-2027 * ((num-acres-list / heads-interest-115-stoc) * 100) * 2) + pasture-silage-production-diversified-2027]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost3-stoc 88 * heads-risk * 4.13 + 500 * Steer-Purchase-Price-2027 * heads-risk]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost-stoc beef-variable-cost1-stoc + beef-variable-cost2-stoc + beef-variable-cost3-stoc]]    
        
  ;;;;;;;;;;;;;;;;;;;;;;;;;;Defining Risk on Stochastic Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 15 + 16 + 200 and heads-interest-11-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-11-stocb)]] 
  if ticks = initial-time-frame * 15 + 16 + 200 and heads-interest-11-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
      
  if ticks = initial-time-frame * 16 + 17 + 200 and heads-interest-12-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-12-stocb)]] 
  if ticks = initial-time-frame * 16 + 17 + 200 and heads-interest-12-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb 0]]
   
  if ticks = initial-time-frame * 17 + 18 + 200 and heads-interest-13-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-13-stocb)]] 
  if ticks = initial-time-frame * 17 + 18 + 200 and heads-interest-13-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 18 + 19 + 200 and heads-interest-14-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-14-stocb)]] 
  if ticks = initial-time-frame * 18 + 19 + 200 and heads-interest-14-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 19 + 20 + 200 and heads-interest-15-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-15-stocb)]] 
  if ticks = initial-time-frame * 19 + 20 + 200 and heads-interest-15-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb 0]]
   
  if ticks = initial-time-frame * 20 + 21 + 200 and heads-interest-16-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-16-stocb)]] 
  if ticks = initial-time-frame * 20 + 21 + 200 and heads-interest-16-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
   
  if ticks = initial-time-frame * 21 + 22 + 200 and heads-interest-17-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-17-stocb)]] 
  if ticks = initial-time-frame * 21 + 22 + 200 and heads-interest-17-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
   
  if ticks = initial-time-frame * 22 + 23 + 200 and heads-interest-18-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-18-stocb)]] 
  if ticks = initial-time-frame * 22 + 23 + 200 and heads-interest-18-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 23 + 24 + 200 and heads-interest-19-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-19-stocb)]] 
  if ticks = initial-time-frame * 23 + 24 + 200 and heads-interest-19-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]] 
  
  if ticks = initial-time-frame * 24 + 25 + 200 and heads-interest-110-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-110-stocb)]] 
  if ticks = initial-time-frame * 24 + 25 + 200 and heads-interest-110-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 25 + 26 + 200 and heads-interest-111-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-111-stocb)]] 
  if ticks = initial-time-frame * 25 + 26 + 200 and heads-interest-111-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 26 + 27 + 200 and heads-interest-112-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-112-stocb)]] 
  if ticks = initial-time-frame * 26 + 27 + 200 and heads-interest-112-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
   
  if ticks = initial-time-frame * 27 + 28 + 200 and heads-interest-113-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-113-stocb)]] 
  if ticks = initial-time-frame * 27 + 28 + 200 and heads-interest-113-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 28 + 29 + 200 and heads-interest-114-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-114-stocb)]] 
  if ticks = initial-time-frame * 28 + 29 + 200 and heads-interest-114-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258  [set heads-riskb 0]]
  
  if ticks = initial-time-frame * 29 + 30 + 200 and heads-interest-115-stocb < average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb round (average-stocking-stocker-stoc - heads-interest-115-stocb)]] 
  if ticks = initial-time-frame * 29 + 30 + 200 and heads-interest-115-stocb >= average-stocking-stocker-stoc 
     [ask farmhouse 258 [set heads-riskb 0]]    
      

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef Variable Costs (Stochastic) Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2013 * heads-interest-11-stocb + Other-Var-Costs-Beef-specialized-2013 * heads-interest-11-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb2-stoc cost-pasture-2013 * ((num-acres-list / heads-interest-11-stocb) * 100) + pasture-production-specialized-2013]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2013 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 
 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2014 * heads-interest-12-stocb + Other-Var-Costs-Beef-specialized-2014 * heads-interest-12-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb2-stoc cost-pasture-2014 * ((num-acres-list / heads-interest-12-stocb) * 100) + pasture-production-specialized-2014]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2014 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2015 * heads-interest-13-stocb + Other-Var-Costs-Beef-specialized-2015 * heads-interest-13-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb2-stoc cost-pasture-2015 * ((num-acres-list / heads-interest-13-stocb) * 100) + pasture-production-specialized-2015]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2015 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 
 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2016 * heads-interest-14-stocb + Other-Var-Costs-Beef-specialized-2016 * heads-interest-14-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb2-stoc cost-pasture-2016 * ((num-acres-list / heads-interest-14-stocb) * 100) + pasture-production-specialized-2016]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2016 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2017 * heads-interest-15-stocb + Other-Var-Costs-Beef-specialized-2017 * heads-interest-15-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb2-stoc cost-pasture-2017 * ((num-acres-list / heads-interest-15-stocb) * 100) + pasture-production-specialized-2017]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2017 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 
 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2018 * heads-interest-16-stocb + Other-Var-Costs-Beef-specialized-2018 * heads-interest-16-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb2-stoc cost-pasture-2018 * ((num-acres-list / heads-interest-16-stocb) * 100) + pasture-production-specialized-2018]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2018 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2019 * heads-interest-17-stocb + Other-Var-Costs-Beef-specialized-2019 * heads-interest-17-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb2-stoc cost-pasture-2019 * ((num-acres-list / heads-interest-17-stocb) * 100) + pasture-production-specialized-2019]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2019 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 

  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2020 * heads-interest-18-stocb + Other-Var-Costs-Beef-specialized-2020 * heads-interest-18-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb2-stoc cost-pasture-2020 * ((num-acres-list / heads-interest-18-stocb) * 100) + pasture-production-specialized-2020]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2020 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2021 * heads-interest-19-stocb + Other-Var-Costs-Beef-specialized-2021 * heads-interest-19-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb2-stoc cost-pasture-2021 * ((num-acres-list / heads-interest-19-stocb) * 100) + pasture-production-specialized-2021]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2021 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 
 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2022 * heads-interest-110-stocb + Other-Var-Costs-Beef-specialized-2022 * heads-interest-110-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb2-stoc cost-pasture-2022 * ((num-acres-list / heads-interest-110-stocb) * 100) + pasture-production-specialized-2022]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2022 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2023 * heads-interest-111-stocb + Other-Var-Costs-Beef-specialized-2023 * heads-interest-111-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb2-stoc cost-pasture-2023 * ((num-acres-list / heads-interest-111-stocb) * 100) + pasture-production-specialized-2023]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2023 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 

  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2024 * heads-interest-112-stocb + Other-Var-Costs-Beef-specialized-2024 * heads-interest-112-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb2-stoc cost-pasture-2024 * ((num-acres-list / heads-interest-112-stocb) * 100) + pasture-production-specialized-2024]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2024 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2025 * heads-interest-113-stocb + Other-Var-Costs-Beef-specialized-2025 * heads-interest-113-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb2-stoc cost-pasture-2025 * ((num-acres-list / heads-interest-113-stocb) * 100) + pasture-production-specialized-2025]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2025 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 
 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2026 * heads-interest-114-stocb + Other-Var-Costs-Beef-specialized-2026 * heads-interest-114-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb2-stoc cost-pasture-2026 * ((num-acres-list / heads-interest-114-stocb) * 100) + pasture-production-specialized-2026]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2026 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]]
 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb1-stoc initial-weight * Steer-Purchase-Price-2027 * heads-interest-115-stocb + Other-Var-Costs-Beef-specialized-2027 * heads-interest-115-stocb]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb2-stoc cost-pasture-2027 * ((num-acres-list / heads-interest-115-stocb) * 100) + pasture-production-specialized-2027]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb3-stoc 88 * heads-riskb * 1.95 + 500 * Steer-Purchase-Price-2027 * heads-riskb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-cost-stocb beef-variable-costb1-stoc + beef-variable-costb2-stoc + beef-variable-costb3-stoc]] 

  ;;;;;;;;;;;;;;;;;;;;;;;;;;Defining Risk on Deterministic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 15 + 16 + 364 and heads-interest-11 < average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest round (average-stocking-stocker - heads-interest-11)]] 
  if ticks = initial-time-frame * 15 + 16 + 364 and heads-interest-11 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
     
  if ticks = initial-time-frame * 16 + 17 + 364 and heads-interest-12 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-12)]] 
  if ticks = initial-time-frame * 16 + 17 + 364 and heads-interest-12 >= average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest 0]]
     
  if ticks = initial-time-frame * 17 + 18 + 364 and heads-interest-13 < average-stocking-stocker 
    [ ask farmhouse 258 [set heads-risk-interest round (average-stocking-stocker - heads-interest-13)]] 
  if ticks = initial-time-frame * 17 + 18 + 364 and heads-interest-13 >= average-stocking-stocker 
    [ ask farmhouse 258 [set heads-risk-interest 0]]
     
  if ticks = initial-time-frame * 18 + 19 + 364 and heads-interest-14 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-14)]] 
  if ticks = initial-time-frame * 18 + 19 + 364 and heads-interest-14 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 19 + 20 + 364 and heads-interest-15 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-15)]] 
  if ticks = initial-time-frame * 19 + 20 + 364 and heads-interest-15 >= average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest 0]]
     
  if ticks = initial-time-frame * 20 + 21 + 364 and heads-interest-16 < average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest round (average-stocking-stocker - heads-interest-16)]] 
  if ticks = initial-time-frame * 20 + 21 + 364 and heads-interest-16 >= average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest 0]]
     
  if ticks = initial-time-frame * 21 + 22 + 364 and heads-interest-17 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-17)]] 
  if ticks = initial-time-frame * 21 + 22 + 364 and heads-interest-17 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 22 + 23 + 364 and heads-interest-18 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-18)]] 
  if ticks = initial-time-frame * 22 + 23 + 364 and heads-interest-18 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 23 + 24 + 364 and heads-interest-19 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-19)]] 
  if ticks = initial-time-frame * 23 + 24 + 364 and heads-interest-19 >= average-stocking-stocker 
    [ask farmhouse 258[set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 24 + 25 + 364 and heads-interest-110 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-110)]] 
  if ticks = initial-time-frame * 24 + 25 + 364 and heads-interest-110 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 25 + 26 + 364 and heads-interest-111 < average-stocking-stocker 
    [ask farmhouse 258   [set heads-risk-interest round (average-stocking-stocker - heads-interest-111)]] 
  if ticks = initial-time-frame * 25 + 26 + 364 and heads-interest-111 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 26 + 27 + 364 and heads-interest-112 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-112)]] 
  if ticks = initial-time-frame * 26 + 27 + 364 and heads-interest-112 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 27 + 28 + 364 and heads-interest-113 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-113)]] 
  if ticks = initial-time-frame * 27 + 28 + 364 and heads-interest-113 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 28 + 29 + 364 and heads-interest-114 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-114)]] 
  if ticks = initial-time-frame * 28 + 29 + 364 and heads-interest-114 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
  if ticks = initial-time-frame * 29 + 30 + 364 and heads-interest-115 < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interest round (average-stocking-stocker - heads-interest-115)]] 
  if ticks = initial-time-frame * 29 + 30 + 364 and heads-interest-115 >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interest 0]]
    
    ;;;;;;;;;;;;;;;;;;;;Cost of Steer Purchase;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2013 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2014 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2015 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2016 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2017 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2018 * heads-risk-interest]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2019 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2020 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2021 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2022 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2023 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2024 * heads-risk-interest]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2025 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2026 * heads-risk-interest]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set purchase-price-head 500 * Steer-Purchase-Price-2027 * heads-risk-interest]] 
    
   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef Variable Costs (Deterministic);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2013 * heads-interest-11 + other-var-costs-beef-2013 * heads-interest-11]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost2 (cost-pasture-2013 * ((num-acres-list / heads-interest-11) * 100) * 2) + pasture-silage-production-diversified-2013]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]   
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost1 other-var-costs-beef-2014 * heads-interest-12]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost2 (cost-pasture-2014 * ((num-acres-list / heads-interest-12) * 100) * 2) + pasture-silage-production-diversified-2014]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost4 initial-weight * Steer-Purchase-Price-2014 * heads-interest-12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3 + beef-variable-cost4]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2015 * heads-interest-13 + other-var-costs-beef-2015 * heads-interest-13]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost2 (cost-pasture-2015 * ((num-acres-list / heads-interest-13) * 100) * 2) + pasture-silage-production-diversified-2015]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2016 * heads-interest-14 + other-var-costs-beef-2016 * heads-interest-14]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost2 (cost-pasture-2016 * ((num-acres-list / heads-interest-14) * 100) * 2) + pasture-silage-production-diversified-2016]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost1 other-var-costs-beef-2017 * heads-interest-15]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost2 (cost-pasture-2017 * ((num-acres-list / heads-interest-15) * 100) * 2) + pasture-silage-production-diversified-2017]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost4 initial-weight * Steer-Purchase-Price-2017 * heads-interest-15]]   
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3 + beef-variable-cost4]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2018 * heads-interest-16 + other-var-costs-beef-2018 * heads-interest-16]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost2 (cost-pasture-2018 * ((num-acres-list / heads-interest-16) * 100) * 2) + pasture-silage-production-diversified-2018]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]   
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2019 * heads-interest-17 + other-var-costs-beef-2019 * heads-interest-17]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost2 (cost-pasture-2019 * ((num-acres-list / heads-interest-17) * 100) * 2) + pasture-silage-production-diversified-2019]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2020 * heads-interest-18 + other-var-costs-beef-2020 * heads-interest-18]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost2 (cost-pasture-2020 * ((num-acres-list / heads-interest-18) * 100) * 2) + pasture-silage-production-diversified-2020]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost1 other-var-costs-beef-2021 * heads-interest-19]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost2 (cost-pasture-2021 * ((num-acres-list / heads-interest-19) * 100) * 2) + pasture-silage-production-diversified-2021]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost4 initial-weight * Steer-Purchase-Price-2021 * heads-interest-19]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3 + beef-variable-cost4]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2022 * heads-interest-110 + other-var-costs-beef-2022 * heads-interest-110]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost2 (cost-pasture-2022 * ((num-acres-list / heads-interest-110) * 100) * 2) + pasture-silage-production-diversified-2022]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]   
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2023 * heads-interest-111 + other-var-costs-beef-2023 * heads-interest-111]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost2 (cost-pasture-2023 * ((num-acres-list / heads-interest-111) * 100) * 2) + pasture-silage-production-diversified-2023]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost1 other-var-costs-beef-2024 * heads-interest-112]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost2 (cost-pasture-2024 * ((num-acres-list / heads-interest-112) * 100) * 2) + pasture-silage-production-diversified-2024]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost4 initial-weight * Steer-Purchase-Price-2024 * heads-interest-112]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3 + beef-variable-cost4]] 
 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost1 other-var-costs-beef-2025 * heads-interest-113]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost2 (cost-pasture-2025 * ((num-acres-list / heads-interest-113) * 100) * 2) + pasture-silage-production-diversified-2025]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost4 initial-weight * Steer-Purchase-Price-2025 * heads-interest-113]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3 + beef-variable-cost4]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost1 other-var-costs-beef-2026 * heads-interest-114]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost2 (cost-pasture-2026 * ((num-acres-list / heads-interest-114) * 100) * 2) + pasture-silage-production-diversified-2026]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost4 initial-weight * Steer-Purchase-Price-2026 * heads-interest-114]]  
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3 + beef-variable-cost4]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost1 initial-weight * Steer-Purchase-Price-2027 * heads-interest-115 + other-var-costs-beef-2027 * heads-interest-115]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost2 (cost-pasture-2027 * ((num-acres-list / heads-interest-115) * 100) * 2) + pasture-silage-production-diversified-2027]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost3 88 * heads-risk-interest * 4.13 ]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-variable-cost beef-variable-cost1 + beef-variable-cost2 + beef-variable-cost3]] 
 
  
   ;;;;;;;;;;;;;;;;;;;;;;;;;;Defining Risk on Deterministic Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  if ticks = initial-time-frame * 15 + 16 + 200 and heads-interest-11b < average-stocking-stocker 
     [ask farmhouse 258 [set heads-risk-interestb round (average-stocking-stocker - heads-interest-11b)]] 
   if ticks = initial-time-frame * 15 + 16 + 200 and heads-interest-11b >= average-stocking-stocker 
     [ask farmhouse 258 [set heads-risk-interestb 0]]
     
  if ticks = initial-time-frame * 16 + 17 + 200 and heads-interest-12b < average-stocking-stocker 
     [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-12b)]] 
  if ticks = initial-time-frame * 16 + 17 + 200 and heads-interest-12b >= average-stocking-stocker 
     [ask farmhouse 258  [set heads-risk-interestb 0]]
     
  if ticks = initial-time-frame * 17 + 18 + 200 and heads-interest-13b < average-stocking-stocker 
     [ ask farmhouse 258 [set heads-risk-interestb round (average-stocking-stocker - heads-interest-13b)]] 
  if ticks = initial-time-frame * 17 + 18 + 200 and heads-interest-13b >= average-stocking-stocker 
     [ ask farmhouse 258 [set heads-risk-interestb 0]]
     
  if ticks = initial-time-frame * 18 + 19 + 200 and heads-interest-14b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-14b)]] 
  if ticks = initial-time-frame * 18 + 19 + 200 and heads-interest-14b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 19 + 20 + 200 and heads-interest-15b < average-stocking-stocker 
     [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-15b)]] 
  if ticks = initial-time-frame * 19 + 20 + 200 and heads-interest-15b >= average-stocking-stocker 
     [ask farmhouse 258  [set heads-risk-interestb 0]]
     
  if ticks = initial-time-frame * 20 + 21 + 200 and heads-interest-16b < average-stocking-stocker 
     [ask farmhouse 258 [set heads-risk-interestb round (average-stocking-stocker - heads-interest-16b)]] 
  if ticks = initial-time-frame * 20 + 21 + 200 and heads-interest-16b >= average-stocking-stocker 
     [ask farmhouse 258  [set heads-risk-interestb 0]]
     
  if ticks = initial-time-frame * 21 + 22 + 200 and heads-interest-17b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-17b)]] 
  if ticks = initial-time-frame * 21 + 22 + 200 and heads-interest-17b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 22 + 23 + 200 and heads-interest-18b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-18b)]] 
  if ticks = initial-time-frame * 22 + 23 + 200 and heads-interest-18b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 23 + 24 + 200 and heads-interest-19b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-19b)]] 
  if ticks = initial-time-frame * 23 + 24 + 200 and heads-interest-19b >= average-stocking-stocker 
    [ask farmhouse 258[set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 24 + 25 + 200 and heads-interest-110b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-110b)]] 
  if ticks = initial-time-frame * 24 + 25 + 200 and heads-interest-110b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 25 + 26 + 200 and heads-interest-111b < average-stocking-stocker 
    [ask farmhouse 258   [set heads-risk-interestb round (average-stocking-stocker - heads-interest-111b)]] 
  if ticks = initial-time-frame * 25 + 26 + 200 and heads-interest-111b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 26 + 27 + 200 and heads-interest-112b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-112b)]] 
  if ticks = initial-time-frame * 26 + 27 + 200 and heads-interest-112b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 27 + 28 + 200 and heads-interest-113b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-113b)]] 
  if ticks = initial-time-frame * 27 + 28 + 200 and heads-interest-113b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 28 + 29 + 200 and heads-interest-114b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-114b)]] 
  if ticks = initial-time-frame * 28 + 29 + 200 and heads-interest-114b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]]
    
  if ticks = initial-time-frame * 29 + 30 + 200 and heads-interest-115b < average-stocking-stocker 
    [ask farmhouse 258  [set heads-risk-interestb round (average-stocking-stocker - heads-interest-115b)]] 
  if ticks = initial-time-frame * 29 + 30 + 200 and heads-interest-115b >= average-stocking-stocker 
    [ask farmhouse 258 [set heads-risk-interestb 0]] 
    
       
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef Variable Costs (Deterministic) Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2013 * heads-interest-11b + Other-Var-Costs-Beef-specialized-2013 * heads-interest-11b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb2 cost-pasture-2013 * ((num-acres-list / heads-interest-11b) * 100) + pasture-production-specialized-2013]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2013 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2014 * heads-interest-12b + Other-Var-Costs-Beef-specialized-2014 * heads-interest-12b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb2 cost-pasture-2014 * ((num-acres-list / heads-interest-12b) * 100) + pasture-production-specialized-2014]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2014 * heads-risk-interestb]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2015 * heads-interest-13b + Other-Var-Costs-Beef-specialized-2015 * heads-interest-13b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb2 cost-pasture-2015 * ((num-acres-list / heads-interest-13b) * 100) + pasture-production-specialized-2015]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2015 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2016 * heads-interest-14b + Other-Var-Costs-Beef-specialized-2016 * heads-interest-14b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb2 cost-pasture-2016 * ((num-acres-list / heads-interest-14b) * 100) + pasture-production-specialized-2016]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2016 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2017 * heads-interest-15b + Other-Var-Costs-Beef-specialized-2017 * heads-interest-15b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb2 cost-pasture-2017 * ((num-acres-list / heads-interest-15b) * 100) + pasture-production-specialized-2017]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2017 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2018 * heads-interest-16b + Other-Var-Costs-Beef-specialized-2018 * heads-interest-16b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb2 cost-pasture-2018 * ((num-acres-list / heads-interest-16b) * 100) + pasture-production-specialized-2018]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2018 * heads-risk-interestb]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2019 * heads-interest-17b + Other-Var-Costs-Beef-specialized-2019 * heads-interest-17b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb2 cost-pasture-2019 * ((num-acres-list / heads-interest-17b) * 100) + pasture-production-specialized-2019]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2019 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2020 * heads-interest-18b + Other-Var-Costs-Beef-specialized-2020 * heads-interest-18b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb2 cost-pasture-2020 * ((num-acres-list / heads-interest-18b) * 100) + pasture-production-specialized-2020]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2020 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2021 * heads-interest-19b + Other-Var-Costs-Beef-specialized-2021 * heads-interest-19b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb2 cost-pasture-2021 * ((num-acres-list / heads-interest-19b) * 100) + pasture-production-specialized-2021]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2021 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2022 * heads-interest-110b + Other-Var-Costs-Beef-specialized-2022 * heads-interest-110b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb2 cost-pasture-2022 * ((num-acres-list / heads-interest-110b) * 100) + pasture-production-specialized-2022]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2022 * heads-risk-interestb]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2023 * heads-interest-111b + Other-Var-Costs-Beef-specialized-2023 * heads-interest-111b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb2 cost-pasture-2023 * ((num-acres-list / heads-interest-111b) * 100) + pasture-production-specialized-2023]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2023 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2024 * heads-interest-112b + Other-Var-Costs-Beef-specialized-2024 * heads-interest-112b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb2 cost-pasture-2024 * ((num-acres-list / heads-interest-112b) * 100) + pasture-production-specialized-2024]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2024 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2025 * heads-interest-113b + Other-Var-Costs-Beef-specialized-2025 * heads-interest-113b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb2 cost-pasture-2025 * ((num-acres-list / heads-interest-113b) * 100) + pasture-production-specialized-2025]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2025 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2026 * heads-interest-114b + Other-Var-Costs-Beef-specialized-2026 * heads-interest-114b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb2 cost-pasture-2026 * ((num-acres-list / heads-interest-114b) * 100) + pasture-production-specialized-2026]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2026 * heads-risk-interestb]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
  
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb1 initial-weight * Steer-Purchase-Price-2027 * heads-interest-115b + Other-Var-Costs-Beef-specialized-2027 * heads-interest-115b]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb2 cost-pasture-2027 * ((num-acres-list / heads-interest-115b) * 100) + pasture-production-specialized-2027]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb3 88 * heads-risk-interestb * 1.95 + 500 * Steer-Purchase-Price-2027 * heads-risk-interestb]]    
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-variable-costb beef-variable-costb1 + beef-variable-costb2 + beef-variable-costb3]] 
     
  ;;;;;;;;;;Deterministic: Redefining Stocking Rate with Risk in Farm of Interest due to Average Stocking Rate within 15 Years (Divesified);;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and heads-risk-interest > 0  [set heads-interest-11  average-stocking-stocker]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and heads-risk-interest > 0  [set heads-interest-12  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and heads-risk-interest > 0  [set heads-interest-13  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and heads-risk-interest > 0  [set heads-interest-14  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and heads-risk-interest > 0  [set heads-interest-15  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and heads-risk-interest > 0  [set heads-interest-16  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and heads-risk-interest > 0  [set heads-interest-17  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and heads-risk-interest > 0  [set heads-interest-18  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and heads-risk-interest > 0  [set heads-interest-19  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and heads-risk-interest > 0  [set heads-interest-110  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and heads-risk-interest > 0  [set heads-interest-111  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and heads-risk-interest > 0  [set heads-interest-112  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and heads-risk-interest > 0  [set heads-interest-113  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and heads-risk-interest > 0  [set heads-interest-114  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and heads-risk-interest > 0  [set heads-interest-115  average-stocking-stocker]]
  
  ;;;;;;;;;;Stochastic: Redefining Stocking Rate with Risk in Farm of Interest due to Average Stocking Rate within 15 Years (Divesified);;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and heads-risk > 0  [set heads-interest-11-stoc  average-stocking-stocker-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and heads-risk > 0  [set heads-interest-12-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and heads-risk > 0  [set heads-interest-13-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and heads-risk > 0  [set heads-interest-14-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and heads-risk > 0  [set heads-interest-15-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and heads-risk > 0  [set heads-interest-16-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and heads-risk > 0  [set heads-interest-17-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and heads-risk > 0  [set heads-interest-18-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and heads-risk > 0  [set heads-interest-19-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and heads-risk > 0  [set heads-interest-110-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and heads-risk > 0  [set heads-interest-111-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and heads-risk > 0  [set heads-interest-112-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and heads-risk > 0  [set heads-interest-113-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and heads-risk > 0  [set heads-interest-114-stoc  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and heads-risk > 0  [set heads-interest-115-stoc  average-stocking-stocker-stoc]]
  
   ;;;;;;;;;;Determinisitc: Redefining Stocking Rate with Risk in Farm of Interest due to Average Stocking Rate within 15 Years (Specialized);;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 and heads-risk-interestb > 0  [set heads-interest-11b  average-stocking-stocker]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 and heads-risk-interestb > 0  [set heads-interest-12b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 and heads-risk-interestb > 0  [set heads-interest-13b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 and heads-risk-interestb > 0  [set heads-interest-14b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 and heads-risk-interestb > 0  [set heads-interest-15b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 and heads-risk-interestb > 0  [set heads-interest-16b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 and heads-risk-interestb > 0  [set heads-interest-17b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 and heads-risk-interestb > 0  [set heads-interest-18b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 and heads-risk-interestb > 0  [set heads-interest-19b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 and heads-risk-interestb > 0  [set heads-interest-110b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 and heads-risk-interestb > 0  [set heads-interest-111b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 and heads-risk-interestb > 0  [set heads-interest-112b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 and heads-risk-interestb > 0  [set heads-interest-113b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 and heads-risk-interestb > 0  [set heads-interest-114b  average-stocking-stocker]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 and heads-risk-interestb > 0  [set heads-interest-115b  average-stocking-stocker]]
  
  ;;;;;;;;;;Stochastic: Redefining Stocking Rate with Risk in Farm of Interest due to Average Stocking Rate within 15 Years (Specialized);;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 and heads-riskb > 0  [set heads-interest-11-stocb  average-stocking-stocker-stoc]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 and heads-riskb > 0  [set heads-interest-12-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 and heads-riskb > 0  [set heads-interest-13-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 and heads-riskb > 0  [set heads-interest-14-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 and heads-riskb > 0  [set heads-interest-15-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 and heads-riskb > 0  [set heads-interest-16-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 and heads-riskb > 0  [set heads-interest-17-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 and heads-riskb > 0  [set heads-interest-18-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 and heads-riskb > 0  [set heads-interest-19-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 and heads-riskb > 0  [set heads-interest-110-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 and heads-riskb > 0  [set heads-interest-111-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 and heads-riskb > 0  [set heads-interest-112-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 and heads-riskb > 0  [set heads-interest-113-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 and heads-riskb > 0  [set heads-interest-114-stocb  average-stocking-stocker-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 and heads-riskb > 0  [set heads-interest-115-stocb  average-stocking-stocker-stoc]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Manure Production in adjacent Locations in Tons;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-11-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-12-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-13-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-14-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-15-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-16-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-17-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-18-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-19-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-110-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-111-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-112-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-113-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-114-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set manure-production-adjacent ((TMP2) * (heads-nearby-115-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if clusters = 0 [set manure-production-adjacent 0]]
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Manure Production in adjacent Locations Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-11-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-12-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-13-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-14-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-15-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-16-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-17-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-18-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-19-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-110-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-111-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-112-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-113-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-114-stoc-cow-calf) * clusters / 2000)]]  
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set manure-production-adjacent-stoc ((TMP2) * (heads-nearby-115-stoc-cow-calf) * clusters / 2000)]]
 ask farmhouse 258 [if clusters = 0 [set manure-production-adjacent-stoc 0]]
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Frequency of Manure Transportation: Assuming hauling truck is 6 tons capacity;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set transportation-frequency (manure-production-adjacent / 6)]]
 ask farmhouse 258 [if clusters = 0 [set transportation-frequency 0]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Frequency of Manure Transportation Stochastic: Assuming hauling truck is 6 tons capacity;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]]
 ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set transportation-frequency-stoc (manure-production-adjacent-stoc / 6)]]
 ask farmhouse 258 [if clusters = 0 [set transportation-frequency-stoc 0]]

;;;;;;;;;;;;;;;;;;;;;;;;;Base cost of transporting manure to the designated location;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2013 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2014 * manure-production-adjacent)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2015 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2016 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2017 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2018 * manure-production-adjacent)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2019 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2020 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2021 * manure-production-adjacent)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2022 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2023 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2024 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2025 * manure-production-adjacent)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2026 * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set transportation-base-cost (manure-base-charge-2027 * manure-production-adjacent)]]
ask farmhouse 258 [if clusters = 0 [set transportation-base-cost 0]] 

;;;;;;;;;;;;;;;;;;;;;;;;;Base cost of transporting manure Stochastic to the designated location;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2013 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2014 * manure-production-adjacent-stoc)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2015 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2015 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2017 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2018 * manure-production-adjacent-stoc)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2019 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2020 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2021 * manure-production-adjacent-stoc)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2022 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2023 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2024 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2025 * manure-production-adjacent-stoc)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2026 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set transportation-base-cost-stoc (manure-base-charge-2027 * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if clusters = 0 [set transportation-base-cost-stoc 0]] 

;;;;;;;;;;;;;;;;;Cost of transportatioon based on Milage;;;;;;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2013 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2014 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2015 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2016 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2017 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2018 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2019 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2020 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2021 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2022 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2023 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2024 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2025 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2026 * average-miles * manure-production-adjacent)]]
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set transportation-milage-cost (manure-trans-cost-2027 * average-miles * manure-production-adjacent)]] 
ask farmhouse 258 [if clusters = 0 [set transportation-milage-cost 0]] 

;;;;;;;;;;;;;;;;;Cost of transportatioon Stochastic based on Milage;;;;;;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2013 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2014 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2015 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2016 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2017 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2018 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2019 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2020 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2021 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2022 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2023 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2024 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2025 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2026 * average-miles * manure-production-adjacent-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set transportation-milage-cost-stoc (manure-trans-cost-2027 * average-miles * manure-production-adjacent-stoc)]] 
ask farmhouse 258 [if clusters = 0 [set transportation-milage-cost-stoc 0]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Costs of manure per ton;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2013)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2014)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2015)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2016)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2017)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2018)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2019)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2020)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2021)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2022)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2023)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2024)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2025)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2026)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set manure-collected-cost (manure-production-adjacent * manure-cost-2027)]]   
ask farmhouse 258 [if clusters = 0 [set manure-collected-cost 0]]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Costs of manure per ton Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2013)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2014)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2015)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2016)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2017)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2018)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2019)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2020)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2021)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2022)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2023)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2024)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2025)]]  
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2026)]] 
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 and clusters > 0 [set manure-collected-cost-stoc (manure-production-adjacent-stoc * manure-cost-2027)]]   
ask farmhouse 258 [if clusters = 0 [set manure-collected-cost-stoc 0]]

;;;;;;;;;;;;;;;;;;;;;;Variable Costs of Manure Spatially Related;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set variable-cost-manure (transportation-base-cost + transportation-milage-cost + manure-collected-cost)]]

;;;;;;;;;;;;;;;;;;;;;; Stochastic Variable Costs of Manure Spatially Related;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]
ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set variable-cost-manure-stoc (transportation-base-cost-stoc + transportation-milage-cost-stoc + manure-collected-cost-stoc)]]

;;;;;;;;;;;;;;;;;;;;;;;;;Variable Costs of Electricity Generation;;;;;;;;;;;;;;;;;;;;
set electricity-cost 0.033
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set electricity-variable-cost (generation * heads-interest-11 * electricity-cost) 
  + ((generation2 * heads-nearby-11-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set electricity-variable-cost (generation * heads-interest-12 * electricity-cost) 
  + ((generation2 * heads-nearby-12-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set electricity-variable-cost (generation * heads-interest-13 * electricity-cost) 
  + ((generation2 * heads-nearby-13-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set electricity-variable-cost (generation * heads-interest-14 * electricity-cost) 
  + ((generation2 * heads-nearby-14-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set electricity-variable-cost (generation * heads-interest-15 * electricity-cost) 
  + ((generation2 * heads-nearby-15-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set electricity-variable-cost (generation * heads-interest-16 * electricity-cost) 
  + ((generation2 * heads-nearby-16-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set electricity-variable-cost (generation * heads-interest-17 * electricity-cost) 
  + ((generation2 * heads-nearby-17-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set electricity-variable-cost (generation * heads-interest-18 * electricity-cost) 
  + ((generation2 * heads-nearby-18-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set electricity-variable-cost (generation * heads-interest-19 * electricity-cost) 
  + ((generation2 * heads-nearby-19-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set electricity-variable-cost (generation * heads-interest-110 * electricity-cost) 
  + ((generation2 * heads-nearby-110-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set electricity-variable-cost (generation * heads-interest-111 * electricity-cost) 
  + ((generation2 * heads-nearby-111-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set electricity-variable-cost (generation * heads-interest-112 * electricity-cost) 
  + ((generation2 * heads-nearby-112-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set electricity-variable-cost (generation * heads-interest-113 * electricity-cost) 
  + ((generation2 * heads-nearby-113-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set electricity-variable-cost (generation * heads-interest-114 * electricity-cost) 
  + ((generation2 * heads-nearby-114-cow-calf * electricity-cost) * clusters) ]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set electricity-variable-cost (generation * heads-interest-115 * electricity-cost) 
  + ((generation2 * heads-nearby-115-cow-calf * electricity-cost) * clusters) ]] 
  
  ;;;;;;;;;;;;;;;;;;;;;;;;; Stochastic Variable Costs of Electricity Generation;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-11-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-11-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-12-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-12-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-13-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-13-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-14-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-14-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-15-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-15-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-16-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-16-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-17-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-17-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-18-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-18-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-19-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-19-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-110-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-110-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-111-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-111-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-112-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-112-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-113-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-113-stoc-cow-calf * electricity-cost) * clusters) ]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-114-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-114-stoc-cow-calf * electricity-cost) * clusters) ]] 
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set electricity-variable-cost-stoc (generation * heads-interest-115-stoc * electricity-cost) 
  + ((generation2 * heads-nearby-115-stoc-cow-calf * electricity-cost) * clusters) ]] 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;Setting Up Planning Horizon;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set year 1]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set year 2]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set year 3]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set year 4]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set year 5]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set year 6]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set year 7]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set year 8]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set year 9]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set year 10]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set year 11]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set year 12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set year 13]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set year 14]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set year 15]]

;;;;;;;;;;;;;;;;;;;;;Setting Death Loss Percentage;;;;;;;;;;;;;
;;;;;;;Determinisitc;;;;;;;;;
 if ticks = initial-time-frame * 15 + 16 [set death-loss 2]
 
 ;;;;;;Stochastic;;;;;;;;;;;;
 if ticks = initial-time-frame * 15 + 16 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 15 + 16 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 16 + 17 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 16 + 17 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 17 + 18 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 17 + 18 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 18 + 19 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 18 + 19 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 19 + 20 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 19 + 20 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 20 + 21 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 20 + 21 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 21 + 22 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 21 + 22 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 22 + 23 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 22 + 23 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 23 + 24 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 23 + 24 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 24 + 25 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 24 + 25 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 25 + 26 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 25 + 26 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 26 + 27 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 26 + 27 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 27 + 28 [set death-loss-stoc random 4]
 if ticks = initial-time-frame * 27 + 28 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 28 + 29 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 28 + 29 and death-loss-stoc = 0 [set death-loss-stoc 1]
 if ticks = initial-time-frame * 29 + 30 [set death-loss-stoc random 4] 
 if ticks = initial-time-frame * 29 + 30 and death-loss-stoc = 0 [set death-loss-stoc 1] 
 
;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Beef Revenue Deterministic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-revenue price-beef-head * (heads-interest-11 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-revenue price-beef-head * (heads-interest-12 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-revenue price-beef-head * (heads-interest-13 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-revenue price-beef-head * (heads-interest-14 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-revenue price-beef-head * (heads-interest-15 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-revenue price-beef-head * (heads-interest-16 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-revenue price-beef-head * (heads-interest-17 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-revenue price-beef-head * (heads-interest-18 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-revenue price-beef-head * (heads-interest-19 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-revenue price-beef-head * (heads-interest-110 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-revenue price-beef-head * (heads-interest-111 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-revenue price-beef-head * (heads-interest-112 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-revenue price-beef-head * (heads-interest-113 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-revenue price-beef-head * (heads-interest-114 * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-revenue price-beef-head * (heads-interest-115 * (1 - death-loss / 100))]]
 
;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Beef Revenue Deterministic Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-revenueb price-beef-headb * (heads-interest-11b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-revenueb price-beef-headb * (heads-interest-12b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-revenueb price-beef-headb * (heads-interest-13b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-revenueb price-beef-headb * (heads-interest-14b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-revenueb price-beef-headb * (heads-interest-15b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-revenueb price-beef-headb * (heads-interest-16b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-revenueb price-beef-headb * (heads-interest-17b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-revenueb price-beef-headb * (heads-interest-18b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-revenueb price-beef-headb * (heads-interest-19b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-revenueb price-beef-headb * (heads-interest-110b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-revenueb price-beef-headb * (heads-interest-111b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-revenueb price-beef-headb * (heads-interest-112b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-revenueb price-beef-headb * (heads-interest-113b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-revenueb price-beef-headb * (heads-interest-114b * (1 - death-loss / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-revenueb price-beef-headb * (heads-interest-115b * (1 - death-loss / 100))]]

;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Beef Revenue Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-11-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-12-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-13-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-14-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-15-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-16-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-17-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-18-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-19-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-110-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-111-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-112-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-113-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-114-stoc * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set beef-revenue-stoc price-beef-head * (heads-interest-115-stoc * (1 - death-loss-stoc / 100))]]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Beef Revenue Stochastic Specialized Farm;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-11-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-12-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-13-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-14-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-15-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-16-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-17-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-18-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-19-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-110-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-111-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-112-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-113-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-114-stocb * (1 - death-loss-stoc / 100))]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set beef-revenue-stocb price-beef-headb * (heads-interest-115-stocb * (1 - death-loss-stoc / 100))]]
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up PV Receipts for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 1)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 2)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 3)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 4)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 5)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 6)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 7)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 8)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 9)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 10)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 11)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 12)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 13)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 14)]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set PV-Receipts-Beef (beef-revenueb / (1 + Discount-Rate) ^ 15)]]
 
  ;;;;;;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up PV Expendetures for Beef Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 1]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 2]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 3]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 4]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 5]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 6]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 7]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 8]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 9]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 10]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 11]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 13]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 14]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set PV-Expendetures-Beef beef-variable-costb / (1 + Discount-Rate) ^ 15]]

 ;;;;;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up Net Cash Flow for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set Net-Cash-Flow-Beef PV-Receipts-Beef - PV-Expendetures-Beef]]
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up NPV for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set NPV-Beef1 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 1]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set NPV-Beef2 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 2]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set NPV-Beef3 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 3]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set NPV-Beef4 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 4]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set NPV-Beef5 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 5]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set NPV-Beef6 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 6]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set NPV-Beef7 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 7]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set NPV-Beef8 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 8]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set NPV-Beef9 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 9]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set NPV-Beef10 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 10]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set NPV-Beef11 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 11]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set NPV-Beef12 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set NPV-Beef13 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 13]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set NPV-Beef14 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 14]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set NPV-Beef15 Net-Cash-Flow-Beef / (1 + Discount-Rate) ^ 15]]
 
;;;;;;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up PV Receipts for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 1]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 2]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 3]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 4]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 5]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 6]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 7]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 8]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 9]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 10]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 11]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 13]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 14]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set PV-Receipts-Beef-stoc beef-revenue-stocb / (1 + Discount-Rate) ^ 15]]
 
  ;;;;;;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up PV Expendetures for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 1]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 2]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 3]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 4]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 5]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 6]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 7]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 8]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 9]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 10]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 11]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 13]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 14]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set PV-Expendetures-Beef-stoc beef-variable-cost-stocb / (1 + Discount-Rate) ^ 15]]
 
 ;;;;;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Net Cash Flow for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set Net-Cash-Flow-Beef-stoc PV-Receipts-Beef-stoc - PV-Expendetures-Beef-stoc]]
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up NPV for Specialized Farm Only;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 200 [set NPV-Beef-stoc1 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 1]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 200 [set NPV-Beef-stoc2 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 2]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 200 [set NPV-Beef-stoc3 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 3]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 200 [set NPV-Beef-stoc4 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 4]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 200 [set NPV-Beef-stoc5 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 5]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 200 [set NPV-Beef-stoc6 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 6]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 200 [set NPV-Beef-stoc7 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 7]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 200 [set NPV-Beef-stoc8 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 8]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 200 [set NPV-Beef-stoc9 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 9]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 200 [set NPV-Beef-stoc10 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 10]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 200 [set NPV-Beef-stoc11 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 11]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 200 [set NPV-Beef-stoc12 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 12]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 200 [set NPV-Beef-stoc13 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 13]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 200 [set NPV-Beef-stoc14 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 14]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set NPV-Beef-stoc15 Net-Cash-Flow-Beef-stoc / (1 + Discount-Rate) ^ 15]]
   
  ;;;;;;;;;;;;;;;;;;;;Setting up Revenue from Carbon Offset in Tons;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set carbon-revenue carbon-prices-list * Total-Carbon-Offset]] 
  
  ;;;;;;;;;;;;;;;;;;;; Stochastic Setting up Revenue from Carbon Offset;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set carbon-revenue-stoc carbon-prices-list * Total-Carbon-Offset-stoc]]   

  
  ;;;;;;;;;;;;;;;;;;;;Deterministic Setting up Total Beef Production for Plot Purposes in Kgs;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-11 * (1 - death-loss / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-12 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-13 * (1 - death-loss / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-14 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-15 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-16 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-17 * (1 - death-loss / 100))) * .454]]
      
  ask farmhouse 258 [if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-18 * (1 - death-loss / 100))) * .454]]
      
  ask farmhouse 258 [if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-19 * (1 - death-loss / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-110 * (1 - death-loss / 100))) * .454]]
      
  ask farmhouse 258 [if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-111 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-112 * (1 - death-loss / 100))) * .454]]
      
  ask farmhouse 258 [if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-113 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-114 * (1 - death-loss / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 365 [set Total-Beef round (pounds-per-head * (heads-interest-115 * (1 - death-loss / 100))) * .454]]
 
 ;;;;;;;;;;;;;;;;;;;;Setting up Total Beef Production for value availability through the entire planning horizon;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-Beef-Yr-1 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-Beef-Yr-2 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-Beef-Yr-3 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-Beef-Yr-4 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-Beef-Yr-5 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-Beef-Yr-6 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-Beef-Yr-7 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-Beef-Yr-8 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-Beef-Yr-9 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-Beef-Yr-10 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-Beef-Yr-11 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-Beef-Yr-12 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-Beef-Yr-13 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-Beef-Yr-14 round total-beef]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-Beef-Yr-15 round total-beef]]
  
  
  ;;;;;;;;;;;;;;;;;;;;Stochastic Setting up Total Beef Production for Plot Purposes in Kgs;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-11-stoc * (1 - death-loss-stoc / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-12-stoc * (1 - death-loss-stoc / 100))) * .454]]
   
  ask farmhouse 258 [if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-13-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-14-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-15-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-16-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-17-stoc * (1 - death-loss-stoc / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-18-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-19-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-110-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-111-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-112-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-113-stoc * (1 - death-loss-stoc / 100))) * .454]]
    
  ask farmhouse 258 [if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-114-stoc * (1 - death-loss-stoc / 100))) * .454]]
     
  ask farmhouse 258 [if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 365 [set Total-Beef-stoc round (pounds-per-head * (heads-interest-115-stoc * (1 - death-loss-stoc / 100))) * .454]]
  
  
  ;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up Total Manure in Clustering For Plot Purposes;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
    [set total-manure round (tmp * heads-interest-11)
      + round (tmp2 * heads-nearby-11-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
    [set total-manure round (tmp * heads-interest-12)
      + round (tmp2 * heads-nearby-12-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
    [set total-manure round (tmp * heads-interest-13)
      + round (tmp2 * heads-nearby-13-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
    [set total-manure round (tmp * heads-interest-14)
      + round (tmp2 * heads-nearby-14-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
    [set total-manure round (tmp * heads-interest-15)
      + round (tmp2 * heads-nearby-15-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
    [set total-manure round (tmp * heads-interest-16)
      + round (tmp2 * heads-nearby-16-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
    [set total-manure round (tmp * heads-interest-17)
      + round (tmp2 * heads-nearby-17-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
    [set total-manure round (tmp * heads-interest-18)
      + round (tmp2 * heads-nearby-18-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
    [set total-manure round (tmp * heads-interest-19)
      + round (tmp2 * heads-nearby-19-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
    [set total-manure round (tmp * heads-interest-110)
      + round (tmp2 * heads-nearby-110-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
    [set total-manure round (tmp * heads-interest-111)
      + round (tmp2 * heads-nearby-111-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
    [set total-manure round (tmp * heads-interest-112)
      + round (tmp2 * heads-nearby-112-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
    [set total-manure round (tmp * heads-interest-113)
      + round (tmp2 * heads-nearby-113-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
    [set total-manure round (tmp * heads-interest-114)
      + round (tmp2 * heads-nearby-114-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set total-manure 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
    [set total-manure round (tmp * heads-interest-115)
      + round (tmp2 * heads-nearby-115-cow-calf) * Clusters]] 
   
  ;;;;;;;;;;;;;;;;;;;;Setting up Total Manure Production in Clustering for value availability through the entire planning horizon;;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-Manure-Yr-1 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-Manure-Yr-2 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-Manure-Yr-3 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-Manure-Yr-4 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-Manure-Yr-5 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-Manure-Yr-6 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-Manure-Yr-7 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-Manure-Yr-8 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-Manure-Yr-9 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-Manure-Yr-10 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-Manure-Yr-11 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-Manure-Yr-12 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-Manure-Yr-13 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-Manure-Yr-14 round total-manure]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-Manure-Yr-15 round total-manure]]
 
  
 ;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up Total CO2 Equivalent Baseline in Clustering For Plot Purposes;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-11 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-11-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-12 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-12-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-13 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-13-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-14 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-14-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-15 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-15-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-16 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-16-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-17 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-17-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-18 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-18-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-19 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-19-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-110 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-110-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-111 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-111-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-112 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-112-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-113 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-113-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-114 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-114-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set Total-CO2Equivalent-Baseline 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
    [set Total-CO2Equivalent-Baseline round (co2equivalent-baseline * (heads-interest-115 * (1 - death-loss / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-115-cow-calf) * Clusters]] 
  
  
  ;;;;;;;;;;;;;;;;;;;;Setting up Total CO2 Equivalent Baseline in Clustering for value availability through the entire planning horizon;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-CO2Equivalent-Baseline-Yr-1 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-CO2Equivalent-Baseline-Yr-2 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-CO2Equivalent-Baseline-Yr-3 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-CO2Equivalent-Baseline-Yr-4 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-CO2Equivalent-Baseline-Yr-5 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-CO2Equivalent-Baseline-Yr-6 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-CO2Equivalent-Baseline-Yr-7 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-CO2Equivalent-Baseline-Yr-8 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-CO2Equivalent-Baseline-Yr-9 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-CO2Equivalent-Baseline-Yr-10 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-CO2Equivalent-Baseline-Yr-11 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-CO2Equivalent-Baseline-Yr-12 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-CO2Equivalent-Baseline-Yr-13 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-CO2Equivalent-Baseline-Yr-14 round Total-CO2Equivalent-Baseline]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-CO2Equivalent-Baseline-Yr-15 round Total-CO2Equivalent-Baseline]]
  
 
 ;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Total CO2 Equivalent Baseline in the Clustering For Plot Purposes;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-11-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-11-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-12-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-12-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-13-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-13-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-14-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-14-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-15-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-15-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-16-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-16-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-17-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-17-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-18-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-18-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-19-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-19-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-110-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-110-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-111-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-111-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-112-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-112-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-113-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-113-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-114-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-114-stoc-cow-calf) * Clusters]]
  
  ask manure-lagoon 294 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set Total-CO2Equivalent-Baseline-stoc 0]] 
  ask manure-lagoon 294 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
    [set Total-CO2Equivalent-Baseline-stoc round (co2equivalent-baseline * (heads-interest-115-stoc * (1 - death-loss-stoc / 100)))
      + round (co2equivalent-baseline2 * heads-nearby-115-stoc-cow-calf) * Clusters]] 
  
  
  ;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Total CO2 Equivalent Baseline in the Clustering for value availability through the entire planning horizon;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-CO2Equivalent-Baseline-Yr-1-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-CO2Equivalent-Baseline-Yr-2-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-CO2Equivalent-Baseline-Yr-3-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-CO2Equivalent-Baseline-Yr-4-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-CO2Equivalent-Baseline-Yr-5-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-CO2Equivalent-Baseline-Yr-6-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-CO2Equivalent-Baseline-Yr-7-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-CO2Equivalent-Baseline-Yr-8-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-CO2Equivalent-Baseline-Yr-9-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-CO2Equivalent-Baseline-Yr-10-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-CO2Equivalent-Baseline-Yr-11-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-CO2Equivalent-Baseline-Yr-12-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-CO2Equivalent-Baseline-Yr-13-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-CO2Equivalent-Baseline-Yr-14-stoc round Total-CO2Equivalent-Baseline-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-CO2Equivalent-Baseline-Yr-15-stoc round Total-CO2Equivalent-Baseline-stoc]]
 

  ;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up Total Carbon Offset Reduction in Clustering for Plot Purposes;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-11 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-11-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-12 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-12-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-13 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-13-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-14 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-14-cow-calf) * Clusters]]
   
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-15 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-15-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-16 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-16-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-17 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-17-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-18 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-18-cow-calf) * Clusters]]
  
 ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-19 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-19-cow-calf) * Clusters]]
   
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-110 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-110-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-111 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-111-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-112 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-112-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-113 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-113-cow-calf) * Clusters]] 
  
   ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-114 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-114-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set Total-Carbon-Offset 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
    [set Total-Carbon-Offset  (carbon-offset * (heads-interest-115 * (1 - death-loss / 100)))
      +  (carbon-offset2 * heads-nearby-115-cow-calf) * Clusters]]
  
  
   ;;;;;;;;;;;;;;;;;;;;Determinisitic: Setting up Total Carbon Offset Reduction in Clustering for value availability through the entire planning horizon;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-Carbon-Offset-Yr-1 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-Carbon-Offset-Yr-2 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-Carbon-Offset-Yr-3 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-Carbon-Offset-Yr-4 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-Carbon-Offset-Yr-5 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-Carbon-Offset-Yr-6 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-Carbon-Offset-Yr-7 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-Carbon-Offset-Yr-8 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-Carbon-Offset-Yr-9 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-Carbon-Offset-Yr-10 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-Carbon-Offset-Yr-11 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-Carbon-Offset-Yr-12 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-Carbon-Offset-Yr-13 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-Carbon-Offset-Yr-14 round total-carbon-offset]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-Carbon-Offset-Yr-15 round total-carbon-offset]]
  
  
 ;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Total Carbon Offset Reduction in the Clustering for Plot Purposes;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-11-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-11-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-12-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-12-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-13-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-13-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-14-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-14-stoc-cow-calf) * Clusters]]
   
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-15-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-15-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-16-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-16-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-17-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-17-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-18-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-18-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-19-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-19-stoc-cow-calf) * Clusters]]
   
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-110-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-110-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-111-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-111-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-112-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-112-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-113-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-113-stoc-cow-calf) * Clusters]] 
  
   ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-114-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-114-stoc-cow-calf) * Clusters]]
  
  ask carbon-offset-counter 293 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set Total-Carbon-Offset-stoc 0]]
  ask carbon-offset-counter 293 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 
    [set Total-Carbon-Offset-stoc round (carbon-offset * (heads-interest-115-stoc * (1 - death-loss-stoc / 100)))
      + round (carbon-offset2 * heads-nearby-115-stoc-cow-calf) * Clusters]]
  
  
   ;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Total Carbon Offset Reduction in the Clustering for value availability through the entire planning horizon;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-Carbon-Offset-Yr-1-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-Carbon-Offset-Yr-2-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-Carbon-Offset-Yr-3-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-Carbon-Offset-Yr-4-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-Carbon-Offset-Yr-5-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-Carbon-Offset-Yr-6-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-Carbon-Offset-Yr-7-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-Carbon-Offset-Yr-8-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-Carbon-Offset-Yr-9-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-Carbon-Offset-Yr-10-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-Carbon-Offset-Yr-11-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-Carbon-Offset-Yr-12-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-Carbon-Offset-Yr-13-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-Carbon-Offset-Yr-14-stoc round Total-Carbon-Offset-stoc]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-Carbon-Offset-Yr-15-stoc round Total-Carbon-Offset-stoc]] 
  
 
  ;;;;;;;;;;;;;;;;;;;;Deterministic: Setting up Total Electricity Production in the Clustering for Plot Purposes in MWh;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask digestor 292 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 [set Total-Electricity  (generation * (heads-interest-11 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-11-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 [set Total-Electricity  (generation * (heads-interest-12 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-12-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 [set Total-Electricity  (generation * (heads-interest-13 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-13-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 [set Total-Electricity  (generation * (heads-interest-14 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-14-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 [set Total-Electricity  (generation * (heads-interest-15 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-15-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 [set Total-Electricity  (generation * (heads-interest-16 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-16-cow-calf) * 0.001 * Clusters]]
  
 ask digestor 292 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 [set Total-Electricity  (generation * (heads-interest-17 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-17-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 [set Total-Electricity  (generation * (heads-interest-18 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-18-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 [set Total-Electricity  (generation * (heads-interest-19 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-19-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 [set Total-Electricity  (generation * (heads-interest-110 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-110-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 [set Total-Electricity  (generation * (heads-interest-111 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-111-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 [set Total-Electricity  (generation * (heads-interest-112 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-112-cow-calf) * 0.001 * Clusters]]
 
  ask digestor 292 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 [set Total-Electricity  (generation * (heads-interest-113 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-113-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 [set Total-Electricity  (generation * (heads-interest-114 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-114-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set Total-Electricity 0]]
  ask digestor 292 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 [set Total-Electricity  (generation * (heads-interest-115 * (1 - death-loss / 100))) * 0.001
      +  (generation2 * heads-nearby-115-cow-calf) * 0.001 * Clusters]]
  
 ;;;;;;;;;;;;;;;;;;;;Determinisitc: Setting up Total Electricity Production in the Clustering for value availability through the plannning horizon;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-Electricity-Yr-1  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-Electricity-Yr-2  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-Electricity-Yr-3  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-Electricity-Yr-4  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-Electricity-Yr-5  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-Electricity-Yr-6  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-Electricity-Yr-7  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-Electricity-Yr-8  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-Electricity-Yr-9  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-Electricity-Yr-10  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-Electricity-Yr-11  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-Electricity-Yr-12  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-Electricity-Yr-13  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-Electricity-Yr-14  Total-Electricity * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-Electricity-Yr-15  Total-Electricity * 1000]] 
  
 
 ;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Total Electricity Production in the Clustering for Plot Purposes;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ask digestor 292 [ if ticks > initial-time-frame * 15 + 16 and ticks < initial-time-frame * 15 + 16 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-11-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-11-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 16 + 17 and ticks < initial-time-frame * 16 + 17 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-12-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-12-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 17 + 18 and ticks < initial-time-frame * 17 + 18 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-13-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-13-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 18 + 19 and ticks < initial-time-frame * 18 + 19 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-14-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-14-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 19 + 20 and ticks < initial-time-frame * 19 + 20 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-15-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-15-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 20 + 21 and ticks < initial-time-frame * 20 + 21 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-16-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-16-stoc-cow-calf) * 0.001 * Clusters]]
  
 ask digestor 292 [ if ticks > initial-time-frame * 21 + 22 and ticks < initial-time-frame * 21 + 22 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-17-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-17-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 22 + 23 and ticks < initial-time-frame * 22 + 23 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-18-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-18-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 23 + 24 and ticks < initial-time-frame * 23 + 24 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-19-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-19-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 24 + 25 and ticks < initial-time-frame * 24 + 25 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-110-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-110-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 25 + 26 and ticks < initial-time-frame * 25 + 26 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-111-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-111-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 26 + 27 and ticks < initial-time-frame * 26 + 27 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-112-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-112-stoc-cow-calf) * 0.001 * Clusters]]
 
  ask digestor 292 [ if ticks > initial-time-frame * 27 + 28 and ticks < initial-time-frame * 27 + 28 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-113-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-113-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 28 + 29 and ticks < initial-time-frame * 28 + 29 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-114-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-114-stoc-cow-calf) * 0.001 * Clusters]]
  
  ask digestor 292 [ if ticks > initial-time-frame * 29 + 30 and ticks < initial-time-frame * 29 + 30 + 181 [set Total-Electricity-stoc 0]]
  ask digestor 292 [if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 [set Total-Electricity-stoc round (generation * (heads-interest-115-stoc * (1 - death-loss-stoc / 100))) * 0.001
      + round (generation2 * heads-nearby-115-stoc-cow-calf) * 0.001 * Clusters]]
  
 ;;;;;;;;;;;;;;;;;;;;Stochastic: Setting up Total Electricity Production in the Clustering for value availability through the plannning horizon;;;;;;;;;;;;;;;
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Total-Electricity-Yr-1-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Total-Electricity-Yr-2-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Total-Electricity-Yr-3-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Total-Electricity-Yr-4-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Total-Electricity-Yr-5-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Total-Electricity-Yr-6-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Total-Electricity-Yr-7-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Total-Electricity-Yr-8-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Total-Electricity-Yr-9-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Total-Electricity-Yr-10-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Total-Electricity-Yr-11-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Total-Electricity-Yr-12-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Total-Electricity-Yr-13-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Total-Electricity-Yr-14-stoc round Total-Electricity-stoc * 1000]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Total-Electricity-Yr-15-stoc round Total-Electricity-stoc * 1000]] 
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Setting up Revenue from Electricity;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set electricity-revenue (Total-Electricity * 1000) * price-electricity]] 
  
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stochastic Setting up Revenue from Electricity in KWh;;;;;;;;;;;;;;;;;;;;;;;;;;  
  ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]]
  ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set electricity-revenue-stoc (Total-Electricity-stoc * 1000) * price-electricity]] 
 
 ;;;;;;;;;;;;;;;Deterministic: Setting up Net Present Value Variable for Availability through Planning Horizon;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Value1 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Value2 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Value3 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Value4 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Value5 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Value6 round Net-Present-Value]]
 ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Value7 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Value8 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Value9 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Value10 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Value11 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Value12 round Net-Present-Value]]
 ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Value13 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Value14 round Net-Present-Value]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Value15 round Net-Present-Value]] 
 
 ;;;;;;;;;;;;;;Stochastic; Setting up Net Present Value Variable for Availability through Planning Horizon;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 15 + 16 + 364 [set Value1-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 16 + 17 + 364 [set Value2-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 17 + 18 + 364 [set Value3-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 18 + 19 + 364 [set Value4-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 19 + 20 + 364 [set Value5-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 20 + 21 + 364 [set Value6-stoc round Net-Present-Value-stoc]]
 ask farmhouse 258 [if ticks = initial-time-frame * 21 + 22 + 364 [set Value7-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 22 + 23 + 364 [set Value8-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 23 + 24 + 364 [set Value9-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 24 + 25 + 364 [set Value10-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 25 + 26 + 364 [set Value11-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 26 + 27 + 364 [set Value12-stoc round Net-Present-Value-stoc]]
 ask farmhouse 258 [if ticks = initial-time-frame * 27 + 28 + 364 [set Value13-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 28 + 29 + 364 [set Value14-stoc round Net-Present-Value-stoc]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set Value15-stoc round Net-Present-Value-stoc]] 

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;NPV in Planning Horizon;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;;;;;;;;;;;;;;;;;;;;;Deterministic: NPV in Planning Horizon Diversified;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set NPV11 (Value1 + Value2 + Value3 + Value4 + Value5 + Value6 + Value7 + Value8 + Value9 + Value10 
                           + Value11 + Value12 + Value13 + Value14 + Value15) - carbon-market-initial - paddock-costs
 - (digester-capital-investment) * (1 - (Cost-Share-Program / 100))]]  

 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print "Deterministic: Net Present Value over the Planning Horizon: Diversified Enterprise"]]
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print NPV11]]
 
 ;;;;;;;;;;;;;;;;;;;;;;;;Stochastic: NPV in Planning Horizon Disversified;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [set NPV11-stoc (Value1-stoc + Value2-stoc + Value3-stoc + Value4-stoc + Value5-stoc + Value6-stoc + Value7-stoc 
       + Value8-stoc + Value9-stoc + Value10-stoc + Value11-stoc + Value12-stoc + Value13-stoc + Value14-stoc + Value15-stoc) - carbon-market-initial - paddock-costs  
 - digester-capital-investment-stoc * (1 - (Cost-Share-Program / 100))]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print "Stochastic: Net Present Value over the Planning Horizon: Diversified Enterprise"]]
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print NPV11-stoc]]
 
 ;;;;;;;;;;;;;;;;;;;;;;;;Deterministic: NPV in Planning Horizon Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set NPV11-Beef (NPV-Beef1 + NPV-Beef2 + NPV-Beef3 + NPV-Beef4 + NPV-Beef5 + NPV-Beef6 + NPV-Beef7 
       + NPV-Beef8 + NPV-Beef9 + NPV-Beef10 + NPV-Beef11 + NPV-Beef12 + NPV-Beef13 + NPV-Beef14 + NPV-Beef15) - paddock-costs]]  

 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [output-print "Deterministic: Net Present Value over the Planning Horizon: Specialized Business"]]
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [output-print NPV11-Beef]]
 
 ;;;;;;;;;;;;;;;;; Stochastic: NPV in Planning Horizon Specialized;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [set NPV11-Beef-stoc (NPV-Beef-stoc1 + NPV-Beef-stoc2 + NPV-Beef-stoc3 + NPV-Beef-stoc4 + NPV-Beef-stoc5 + NPV-Beef-stoc6 + NPV-Beef-stoc7 
       + NPV-Beef-stoc8 + NPV-Beef-stoc9 + NPV-Beef-stoc10 + NPV-Beef-stoc11 + NPV-Beef-stoc12 + NPV-Beef-stoc13 + NPV-Beef-stoc14 + NPV-Beef-stoc15) - paddock-costs]] 
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [output-print "Stochastic: Net Present Value over the Planning Horizon: Specialized Business"]]
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 200 [output-print NPV11-Beef-stoc]]
 
 ;;;;;;;;;;;;;;;;;;Forecasting Electricity Price;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print (word "Electricity Sold Price" " = " const-electricity " + "  price-electricity-coef " * " " Lag Price  ")]]
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print (word "R-Squared" " = " R-2-electricity " ")]]
 
;;;;;;;;;;;;;;;;;;Cost of Anaerobic Digester;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print (word "Cost of Anaerobic Digester" " = " beta " * Heads ^ "  alpha )]]
 ask farmhouse 258 [if ticks = initial-time-frame * 29 + 30 + 364 [output-print (word "R-Squared" " = " R-2-anaerobic " ")]]
end 

to update-cows
 
end

to system-simulation
  go
  step-system-dynamics
  do-plot
  display-labels

ifelse ticks <= initial-time-frame * 15 + 16 + 180 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation01-methane01]
if ticks = 367 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 733 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 1099 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 1465 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 1831 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 2197 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 2563 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 2929 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 3295 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 3661 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 4027 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 4393 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 4759 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 5125 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set ASW ASW-Max set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0]
if ticks = 5491 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set cum-growth 0 set rainfall 0 set Tmax 0 set Tmin 0 set Tave 0 set ASW ASW-Max 
  set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0]

if ticks >= 5489 [set acc-pgr-acre 0 set Rel-Cum-Growth 0 set cum-growth 0 set rainfall 0 set rainfall-stoc 0 set Tmax 0 set Tmin 0 set Tave 0 set ASW 0 
  set DEC 0 set DL 0 set H 0 set D 0 set r 0 set sp 0]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Stochastic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
if ticks = 367 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 733 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 1099 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 1465 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 1831 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 2197 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 2563 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 2929 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 3295 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 3661 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 4027 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 4393 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 4759 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 5125 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0]
if ticks = 5491 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set rainfall-stoc 0] 

if ticks >= 5489 [set acc-pgr-acre-stoc 0 set Rel-Cum-Growth-stoc 0 set cum-growth-stoc 0 set Lag-Eff-ET-stoc 0 set rainfall-stoc 0 set ASW-stoc 0 
  set lag-asw-stoc 0 set rel-cum-growth-stoc 0 set pan-evap 0 set lambda 0 set sp 0 set dec 0 set h 0 set d 0 set r 0 set rgr-dl 0]
if ticks >= 5489 and rainfall-stoc > 0 [set rainfall-stoc 0] 

end


;;;;;;;;;;;;;;;;;;Year 1 Generation;;;;;;;;;;;;;;;
to update-generation01-methane01
  ifelse ticks > initial-time-frame * 15 + 16 + 180 and ticks < initial-time-frame * 15 + 16 + 365 [go] [update-generation11-methane11] ;;
end 

;;;;;;;;;;;;;;;;;;Year 2 Resetting UP;;;;;;;;;;;;;;; 
to update-generation11-methane11
 ifelse ticks > initial-time-frame * 16 + 16 and ticks < initial-time-frame * 16 + 17 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation02-methane02]
end 

;;;;;;;;;;;;;;;;;;Year 2 Generation;;;;;;;;;;;;;;;
to update-generation02-methane02
  ifelse ticks > initial-time-frame * 16 + 17 + 180 and ticks < initial-time-frame * 16 + 17 + 365 [go] [update-generation22-methane22]
end 

;;;;;;;;;;;;;;;;;;Year 3 Settting UP;;;;;;;;;;;;;;;
to update-generation22-methane22
  ifelse ticks > initial-time-frame * 17 + 17 and ticks < initial-time-frame * 17 + 18 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation03-methane03]
end 

;;;;;;;;;;;;;;;;;;Year 3 Generation;;;;;;;;;;;;;;;
to update-generation03-methane03
  ifelse ticks > initial-time-frame * 17 + 18 + 180 and ticks < initial-time-frame * 17 + 18 + 365 [go] [update-generation33-methane33]
end 

;;;;;;;;;;;;;;;;;;Year 4 Setting UP;;;;;;;;;;;;;;;
to update-generation33-methane33
  ifelse ticks > initial-time-frame * 18 + 18 and ticks < initial-time-frame * 18 + 19 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation04-methane04]
end 

;;;;;;;;;;;;;;;;;;Year 4 Generation;;;;;;;;;;;;;;;
to update-generation04-methane04
  ifelse ticks > initial-time-frame * 18 + 19 + 180 and ticks < initial-time-frame * 18 + 19 + 365 [go] [update-generation44-methane44]
end 

;;;;;;;;;;;;;;;;;;Year 5 Setting UP;;;;;;;;;;;;;;;
to update-generation44-methane44
  ifelse ticks > initial-time-frame * 19 + 19 and ticks < initial-time-frame * 19 + 20 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation05-methane05] 
end 

;;;;;;;;;;;;;;;;;;Year 5 Generation;;;;;;;;;;;;;;;
to update-generation05-methane05
  ifelse ticks > initial-time-frame * 19 + 20 + 180 and ticks < initial-time-frame * 19 + 20 + 365 [go]  [update-generation55-methane55]
end 

;;;;;;;;;;;;;;;;;;Year 6 Setting UP;;;;;;;;;;;;;;;
to update-generation55-methane55
  ifelse ticks > initial-time-frame * 20 + 20 and ticks < initial-time-frame * 20 + 21 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation06-methane06]
end 

;;;;;;;;;;;;;;;;;;Year 6 Generation;;;;;;;;;;;;;;;
to update-generation06-methane06
  ifelse ticks > initial-time-frame * 20 + 21 + 180 and ticks < initial-time-frame * 20 + 21 + 365  [go]  [update-generation66-methane66]
end 

;;;;;;;;;;;;;;;;;;Year 7 Setting UP;;;;;;;;;;;;;;;
to update-generation66-methane66
  ifelse ticks > initial-time-frame * 21 + 21 and ticks < initial-time-frame * 21 + 22 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation07-methane07]                 
end 

;;;;;;;;;;;;;;;;;;Year 7 Generation;;;;;;;;;;;;;;;
to update-generation07-methane07
  ifelse ticks > initial-time-frame * 21 + 22 + 180 and ticks < initial-time-frame * 21 + 22 + 365 [go]  [update-generation77-methane77]
end 

;;;;;;;;;;;;;;;;;;Year 8 Setting UP;;;;;;;;;;;;;;;
to update-generation77-methane77
  ifelse ticks > initial-time-frame * 22 + 22 and ticks < initial-time-frame * 22 + 23 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation08-methane08]
end 

;;;;;;;;;;;;;;;;;;Year 8 Generation;;;;;;;;;;;;;;;
to update-generation08-methane08
  ifelse ticks > initial-time-frame * 22 + 23 + 180 and ticks < initial-time-frame * 22 + 23 + 365 [go]  [update-generation88-methane88]
end 

;;;;;;;;;;;;;;;;;;Year 9 Setting UP;;;;;;;;;;;;;;;
to update-generation88-methane88
  ifelse ticks > initial-time-frame * 23 + 23 and ticks < initial-time-frame * 23 + 24 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation09-methane09]
end 

;;;;;;;;;;;;;;;;;;Year 9 Generation;;;;;;;;;;;;;;;
to update-generation09-methane09
  ifelse ticks > initial-time-frame * 23 + 24 + 180 and ticks < initial-time-frame * 23 + 24 + 365 [go]  [update-generation99-methane99]
end 

;;;;;;;;;;;;;;;;;;Year 10 Setting UP;;;;;;;;;;;;;;;
to update-generation99-methane99
  ifelse ticks > initial-time-frame * 24 + 24 and ticks < initial-time-frame * 24 + 25 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation010-methane010]
end 

;;;;;;;;;;;;;;;;;;Year 10 Generation;;;;;;;;;;;;;;;
to update-generation010-methane010
  ifelse ticks > initial-time-frame * 24 + 25 + 180 and ticks < initial-time-frame * 24 + 25 + 365  [go]  [update-generation1010-methane1010]
end 

;;;;;;;;;;;;;;;;;;Year 11 Setting UP;;;;;;;;;;;;;;;
to update-generation1010-methane1010
  ifelse ticks > initial-time-frame * 25 + 25 and ticks < initial-time-frame * 25 + 26 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation011-methane011]
end 

;;;;;;;;;;;;;;;;;;Year 11 Generation;;;;;;;;;;;;;;;
to update-generation011-methane011
  ifelse ticks > initial-time-frame * 25 + 26 + 180 and ticks < initial-time-frame * 25 + 26 + 365 [go]  [update-generation1111-methane1111]
end 

;;;;;;;;;;;;;;;;;;Year 12 Setting UP;;;;;;;;;;;;;;;
to update-generation1111-methane1111
  ifelse ticks > initial-time-frame * 26 + 26 and ticks < initial-time-frame * 26 + 27 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation012-methane012]
end 

;;;;;;;;;;;;;;;;;;Year 12 Generation;;;;;;;;;;;;;;;
to update-generation012-methane012
  ifelse ticks > initial-time-frame * 26 + 27 + 180 and ticks < initial-time-frame * 26 + 27 + 365  [go]  [update-generation1212-methane1212]
end 

;;;;;;;;;;;;;;;;;;Year 13 Setting UP;;;;;;;;;;;;;;;
to update-generation1212-methane1212
  ifelse ticks > initial-time-frame * 27 + 27 and ticks < initial-time-frame * 27 + 28 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation013-methane013]
end 

;;;;;;;;;;;;;;;;;;Year 13 Generation;;;;;;;;;;;;;;;
to update-generation013-methane013
  ifelse ticks > initial-time-frame * 27 + 28 + 180 and ticks < initial-time-frame * 27 + 28 + 365 [go]  [update-generation1313-methane1313]
end 

;;;;;;;;;;;;;;;;;;Year 14 Setting UP;;;;;;;;;;;;;;;
to update-generation1313-methane1313
  ifelse ticks > initial-time-frame * 28 + 28 and ticks < initial-time-frame * 28 + 29 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation014-methane014]
end 

;;;;;;;;;;;;;;;;;;Year 14 Generation;;;;;;;;;;;;;;;
to update-generation014-methane014
  ifelse ticks > initial-time-frame * 28 + 29 + 180 and ticks < initial-time-frame * 28 + 29 + 365 [go]  [update-generation1414-methane1414]
end 

;;;;;;;;;;;;;;;;;;Year 15 Setting UP;;;;;;;;;;;;;;;
to update-generation1414-methane1414
  ifelse ticks > initial-time-frame * 29 + 29 and ticks < initial-time-frame * 29 + 30 + 181 [set generation 0 set methane 0 set tmp 0 set generation2 0 set methane2 0 set tmp2 0] [update-generation015-methane015]
end 

;;;;;;;;;;;;;;;;;;Year 15 Generation;;;;;;;;;;;;;;;
to update-generation015-methane015
  if ticks > initial-time-frame * 29 + 30 + 180 and ticks < initial-time-frame * 29 + 30 + 365 [go]   
   
end 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;Generating Graphs from System Dynamics & Interaction;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
to do-plot
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Stocking Rate;;;;;;;;;;;;;;
  if ticks >= 365 and ticks <= 5489 [set-current-plot "Stocking Rate: Deterministic versus Stochastic"]
  if ticks >= 365 and ticks <= 5489 [set-current-plot-pen "Optimal-Stocking-nearby-1-stoc"]
  if ticks >= 365 and ticks <= 5489 [plotxy ticks Optimal-Stocking-nearby-1-stoc]
  if ticks >= 365 and ticks <= 5489 [set-current-plot-pen "Optimal-Stocking-nearby-1"]
  if ticks >= 365 and ticks <= 5489 [plotxy ticks Optimal-Stocking-nearby-1]
  if ticks >= 365 and ticks <= 5489 [set-current-plot-pen "Optimal-Stocking-Interest-1"]
  if ticks >= 365 and ticks <= 5489 [plotxy ticks Optimal-Stocking-Interest-1]
  if ticks >= 365 and ticks <= 5489 [set-current-plot-pen "Optimal-Stocking-interest-1-stoc"]
  if ticks >= 365 and ticks <= 5489 [plotxy ticks Optimal-Stocking-interest-1-stoc]
  if ticks >= 365 and ticks <= 5489 [set-current-plot-pen "Optimal-Stocking-nearby-1-cow-calf"]
  if ticks >= 365 and ticks <= 5489 [plotxy ticks Optimal-Stocking-nearby-1-cow-calf]
  if ticks >= 365 and ticks <= 5489 [set-current-plot-pen "Optimal-Stocking-nearby-1-stoc-cow-calf"]
  if ticks >= 365 and ticks <= 5489 [plotxy ticks Optimal-Stocking-nearby-1-stoc-cow-calf]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Pasture Growth;;;;;;;;;;
  if ticks >= 0 and ticks <= 5489 [set-current-plot "Daily Pasture Growth Over Time"]
  if ticks >= 0 and ticks <= 5489 [set-current-plot-pen "daily-pgr-acre"]
  if ticks >= 0 and ticks <= 5489 [plotxy ticks daily-pgr-acre]
  if ticks >= 0 and ticks <= 5489 [set-current-plot-pen "daily-pgr-acre-stoc"]
  if ticks >= 0 and ticks <= 5489 [plotxy ticks daily-pgr-acre-stoc]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;Temperature;;;;;;;;;;;;;;;;;;
  if ticks >= 0 and ticks <= 5489 [set-current-plot "Daily Temperature Over Time"]
  if ticks >= 0 and ticks <= 5489 [set-current-plot-pen "Tave"]
  if ticks >= 0 and ticks <= 5489 [plotxy ticks Tave]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Precipitation;;;;;;;;;;;;;
  if ticks >= 0 and ticks <= 5489 [set-current-plot "Daily Precipitation Over Time"]
  if ticks >= 0 and ticks <= 5489 [set-current-plot-pen "rainfall"]
  if ticks >= 0 and ticks <= 5489 [plotxy ticks rainfall]
  if ticks >= 0 and ticks <= 5489 [set-current-plot-pen "rainfall-stoc"]
  if ticks >= 0 and ticks <= 5489 [plotxy ticks rainfall-stoc]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;Carbon Offset and Baseline;;
  if ticks >= 5491 [set-current-plot "Carbon Offset vs CO2E Baseline"]
  if ticks >= 5491 [set-current-plot-pen "total-carbon-offset"]
  if ticks >= 5491 [plotxy ticks total-carbon-offset] 
  if ticks >= 5491 [set-current-plot-pen "total-co2equivalent-baseline"]
  if ticks >= 5491 [plotxy ticks total-co2equivalent-baseline] 
  if ticks >= 5491 [set-current-plot-pen "total-carbon-offset-stoc"]
  if ticks >= 5491 [plotxy ticks total-carbon-offset-stoc] 
  if ticks >= 5491 [set-current-plot-pen "total-co2equivalent-baseline-stoc"]
  if ticks >= 5491 [plotxy ticks total-co2equivalent-baseline-stoc] 
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Electricity;;;;;;;;;;;;;;;
  if ticks >= 5491 [set-current-plot "Electricity Generation"]
  if ticks >= 5491 [set-current-plot-pen "total-electricity"]
  if ticks >= 5491 [plotxy ticks total-electricity]
  if ticks >= 5491 [set-current-plot-pen "total-electricity-stoc"]
  if ticks >= 5491 [plotxy ticks total-electricity-stoc]
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Beef;;;;;;;;;;;;;;;
  if ticks > 5489 [set-current-plot "Deterministic vs Stochastic: Daily Beef Production"]
  if ticks > 5491 [set-current-plot-pen "total-beef-stoc"]
  if ticks > 5491 [plotxy ticks total-beef-stoc]
  if ticks > 5491 [set-current-plot-pen "total-beef"]
  if ticks > 5491 [plotxy ticks total-beef] 
end 
@#$#@#$#@
GRAPHICS-WINDOW
1163
10
1470
338
49
49
3.0
1
1
1
1
1
0
0
0
1
-49
49
-49
49
0
0
0
days
30.0

CHOOSER
38
119
154
164
initial-weight
initial-weight
550 500 450 400
1

PLOT
628
404
1469
643
Daily Pasture Growth Over Time
Days
Pasture Growth/Pounds/Acre
0.0
5490.0
0.0
60.0
true
true
"" ""
PENS
"daily-pgr-acre" 1.0 1 -10899396 true "" ""
"daily-pgr-acre-stoc" 1.0 0 -7500403 true "" ""

SWITCH
38
84
154
117
show-weight?
show-weight?
0
1
-1000

BUTTON
58
28
143
61
System Setup
setup-agent\nsystem-dynamics-setup\n
NIL
1
T
OBSERVER
NIL
NIL
NIL
NIL
1

BUTTON
210
28
297
61
Simulation
;if ticks = 365 [stop]\n;if ticks = 5489 [stop] \nif ticks = 10979 [stop]\nsystem-simulation\n\n\n
T
1
T
OBSERVER
NIL
NIL
NIL
NIL
1

BUTTON
354
27
452
60
Simulation by Step
system-simulation\n
NIL
1
T
OBSERVER
NIL
NIL
NIL
NIL
1

SWITCH
470
352
597
385
show-electricity?
show-electricity?
0
1
-1000

SWITCH
25
366
173
399
show-co2e-offset?
show-co2e-offset?
0
1
-1000

SWITCH
25
330
173
363
show-co2e-baseline?
show-co2e-baseline?
0
1
-1000

TEXTBOX
498
151
592
169
Clustering System
11
14.0
1

TEXTBOX
67
70
131
89
Beef System
11
14.0
1

TEXTBOX
34
10
599
38
***********************************SIMULATION CONTROL PANEL**********************************
11
14.0
1

TEXTBOX
1614
10
1733
29
SIMULATION RESULTS
11
14.0
1

CHOOSER
191
365
329
410
Discount-Rate-List
Discount-Rate-List
0.04 0.05 0.06 0.07 0.08
1

CHOOSER
199
208
312
253
num-acres-list
num-acres-list
30 50 60 70 80 90 93 100 150 200
6

MONITOR
197
87
310
132
Pre Interaction: Days
daily-pre-interaction
17
1
11

CHOOSER
487
234
597
279
Cost-Share-Program
Cost-Share-Program
0 20 25 40 45 50 55 60 65 70 75 80 85 90 95 100
0

CHOOSER
487
282
597
327
Carbon-Prices-List
Carbon-Prices-List
0 13 26 30 36
0

MONITOR
343
87
477
132
Transportation Frequency
transportation-frequency
0
1
11

CHOOSER
487
166
596
211
Clusters
Clusters
0 1 2 3 4 5
0

SWITCH
343
136
477
169
show-manure?
show-manure?
0
1
-1000

SWITCH
191
330
329
363
show-profitability?
show-profitability?
0
1
-1000

CHOOSER
354
329
465
374
County-WV
County-WV
"Barbour" "Berkeley" "Boone" "Braxton" "Brooke" "Cabell" "Calhoun" "Clay" "Doddridge" "Fayette" "Gilmer" "Grant" "Greenbrier" "Hampshire" "Hancock" "Hardy" "Harrison" "Jackson" "Jefferson" "Kanawha" "Lewis" "Lincoln" "Logan" "Marion" "Marshall" "Mason" "McDowell" "Mercer" "Mineral" "Mingo" "Monongalia" "Monroe" "Morgan" "Nicholas" "Ohio" "Pendleton" "Pocahontas" "Preston" "Putnam" "Raleigh" "Randolph" "Ritchie" "Roane" "Summers" "Tucker" "Tyler" "Upshur" "Wayne" "Webster" "Wetzel" "Wirt" "Wood" "Wyoming"
30

CHOOSER
199
257
313
302
PGR-Max
PGR-Max
70 60 40
1

PLOT
598
209
1162
403
Daily Temperature Over Time
Days
Average Temperature (F)
0.0
5489.0
0.0
90.0
true
true
"" ""
PENS
"Tave" 1.0 0 -2674135 true "" ""

PLOT
3
422
625
643
Daily Precipitation Over Time
Days
Rainfall in Inches
0.0
5489.0
0.0
3.5
true
true
"" ""
PENS
"rainfall" 1.0 0 -13345367 true "" ""
"rainfall-stoc" 1.0 0 -955883 true "" ""

TEXTBOX
370
313
456
331
County Selection
11
14.0
1

TEXTBOX
64
314
139
332
Carbon Factors
11
14.0
1

TEXTBOX
368
73
447
91
Manure Factors
11
14.0
1

TEXTBOX
505
335
578
363
Energy System
11
14.0
1

TEXTBOX
500
218
588
236
Policy Parameters
11
14.0
1

PLOT
597
10
1162
207
Stocking Rate: Deterministic versus Stochastic
Days
Stocking Rate/Farm/Yr
365.0
5489.0
0.0
120.0
true
true
"" ""
PENS
"Optimal-Stocking-Interest-1" 1.0 0 -16777216 true "" ""
"Optimal-Stocking-Nearby-1" 1.0 0 -13345367 true "" ""
"Optimal-Stocking-Interest-1-Stoc" 1.0 0 -2674135 true "" ""
"Optimal-Stocking-Nearby-1-Stoc" 1.0 0 -10899396 true "" ""
"Optimal-Stocking-Nearby-1-Cow-Calf" 1.0 0 -955883 true "" ""
"Optimal-Stocking-Nearby-1-Stoc-Cow-Calf" 1.0 0 -6459832 true "" ""

TEXTBOX
215
313
310
331
Profitability & Rate
11
14.0
1

TEXTBOX
197
72
313
90
Day of Planning Horizon
11
14.0
1

OUTPUT
1471
26
1838
854
12

PLOT
514
647
1021
854
Electricity Generation
Days
Electricity/MWh/Day
5491.0
10979.0
0.0
45.0
true
true
"" ""
PENS
"Total-Electricity" 1.0 0 -13345367 true "" ""
"Total-Electricity-Stoc" 1.0 0 -955883 true "" ""

PLOT
3
647
512
854
Carbon Offset vs CO2E Baseline
Days
CO2E/Tons/Day
5491.0
10990.0
0.0
700.0
true
true
"" ""
PENS
"Total-CO2Equivalent-Baseline" 1.0 1 -16777216 true "" ""
"Total-Carbon-Offset" 1.0 1 -10899396 true "" ""
"Total-CO2Equivalent-Baseline-Stoc" 1.0 0 -2674135 true "" ""
"Total-Carbon-Offset-Stoc" 1.0 0 -13345367 true "" ""

MONITOR
197
133
310
178
Interaction: Days
daily-planning-horizon
17
1
11

CHOOSER
484
45
595
90
Distance-Factor
Distance-Factor
0.4 0.5 0.8 1.2
1

MONITOR
485
94
595
139
Average Radius Miles
average-miles
2
1
11

TEXTBOX
515
29
562
47
Distance
11
14.0
1

PLOT
1022
647
1469
854
Deterministic vs Stochastic: Daily Beef Production
Days
Beef Production in Kg
5491.0
10979.0
11000.0
45000.0
true
true
"" ""
PENS
"total-beef" 1.0 0 -16777216 true "" ""
"total-beef-stoc" 1.0 0 -13345367 true "" ""

MONITOR
326
254
480
299
Slope Range: Adjacent Farms
slope-range
17
1
11

TEXTBOX
375
192
445
210
Terrain Slope
11
14.0
1

MONITOR
326
207
480
252
Slope Range: Farm of Interest
slope-range1
17
1
11

TEXTBOX
210
191
306
209
Forage Availability
11
14.0
1

CHOOSER
38
165
154
210
DM-Intake-List
DM-Intake-List
0.02 0.025 0.03 0.035 0.04
2

MONITOR
17
263
186
308
Stochastic: Death Loss Percent
death-loss-stoc
17
1
11

MONITOR
17
213
186
258
Deterministic: Death Loss Percent
Death-Loss
17
1
11

MONITOR
354
376
465
421
Latitude
latitude
17
1
11

@#$#@#$#@
REQUIRED ASSETS FOR RUNNING THE MODEL
-----------
Download from http://dl.dropbox.com/u/59330867/BEFERGYONET%20MODEL.zip

## WHAT IS IT?

This is an intertemporal and spatial model that shows the potential economic and environmental impacts in the Appalachian region by introducing a diversified pasture-based beef (PBB) industry, including beef, bio-fuel, and carbon offsets.   

The BEFERGYONET model (BET) is divided into two stages. In the first stage, the model simulates forage growth based on solar radiation, temperature, precipitation and location coordinates. When the pasture available is maximized, the model is able to obtain the optimal stocking rate for each farm distributed in the spatial domain. During the second stage, BET simulates agents' interactions within the whole system. As a result of agents interactions, high quality beef, renewable energy and eventually carbon offset production is determined. It basically simulates the introduction of this industry and its interaction with surrounding communities in an attempt to satisfy both producer goals and societal goals.  Results are obtained using both deterministic and stochastic scenarios. 

Finally, the model allows for the development of policy instruments based on the results from the agent-based model that would enhance the implementation of these management techniques as a form of maximizing beef farmers' profitability as well as social welfare in which clustering among locations contributes in intensifying the benefits from sustainable BMPs.

## HOW IT WORKS

Every farm in the spatial domain relies on 93 acres of pastureland (average for this region, Evans et. al, 2007) which is divided into 6 paddocks (Schuster et. al, 2001) of approximately 15 acres each where 10 patches represent 1 acre. The farm of interest is a stocker farm identified with the color red surrounded by adjacent cow/calf farms (gray), stocker farms (brown) and one silage farm (blue). This occurs within a radius of approximately 22 miles (when distance-factor = 0.5) derived from the interaction among participating farms in the clustering system and invoked by the farm of interest. The farm of interest (or contracting farm) is the business taking the primary risk of investing in an anaerobic digester. 

Farms are distributed throughout a grid of patches identified by their coordinates allowing the simulation to measure their distances when the clustering system is activated. The model also simulates farmers� interaction with the stocking rate during the grazing season by rotating it from one paddock to the next within a dynamic context. This interaction provides a fairly realistic representation of a PBB industry where the land resource is optimized considering both producer and societal goals. 

It is assumed that daily pasture intake per head is 3 percent of its body weight (Zobell, Burrell and Bagley, 1999, Rayburn, 2005, Schuster et. al, 2001) with a daily weight gain of 1.5 and 0.87 pounds  during the grazing and winter seasons, respectively (Rayburn, 2008, Blaser et., al 1986, VAFS, 1969). The stocking rate grazes 2/3 of the paddocks while 1/3 is used for hay or silage for winter feed each year based on expert opinion. The stocking rate composed of an Angus breed with an initial weight of 500 pounds (Rayburn and Lozier, 2002, Schuster et. al, 2001) is bought at the end of April and grazing is initiated in early May and moved to a building during the winter  where animals are fed and manure is collected for energy generation. 

The model also simulates the interaction of several agents such as hauling trucks for the movement of forage as well as manure from adjacent farms to the farm of interest which is invoked by the farm of interest depending on the parameters selected by the user. During the system interaction, the production of beef, electricity and CO2E emissions reduction and CO2E emissions baseline are graphically generated as well as sent to a spreadsheet file named "netlogoresults.csv" indicated at the beginning of the simulation.   

## HOW TO USE IT

1. Select the desired parameters by clicking on each of the choices available such as "initial-weight".   
2. Press setup system button. Follow the instructions to set up the file that stores the simulation results at the end of the simulation.  
3. Press the simulation button to run the model continuously or the simulation by step button to run it  for one iteration only.  
4. Observe the monitors such as "Pre Interaction: Days" for the current day during simulation. Furthermore, view the plots to observe changes in daily pasture growth, daily precipitation and mean temperature, stocking rates, beef production, electricity generation and carbon offsets. Also, notice the stocking rate as well as the NPV for specialized and diversified enterprises in the simulation results box.  

## THINGS TO NOTICE

If the slope range between the farm of interest and adjacent stocker farms are the same, then the stocking rate for both are equal (the first phase). Observe what happens to electricity generation during grazing season (the second phase). Also observe what happens to daily beef production. Are stochastic death loss percentages the same on an annual basis? What happens to pasture growth when precipitation and temperature are high? 

## THINGS TO TRY

The default parameters are the following:  
-initial weight = 500 lbs.  
-dry matter intake = 3%  
-number of acres = 93  
-expected pasture growth rate (PGR-Max) = 60 lbs./acre  
-discount rate = 5%  
-county = Monongalia  
-distance factor = 0.5  
-cluster system = 0 members  
-cost-share program = 0%  
-carbon price = $0.00

Try comparing results between different counties. This might help policy-makers and entrepreneurs to determine what counties could bring more benefits to farmers and society based on resources available in the area which are affected by topographical as well as climatological conditions. 

Moreover, try adjusting dry matter intake as well as initial-pounds and num-acres-list parameters to observe sensitivity of the model to these particular parameters.

Also, try adjusting the distance-factor to observe the impacts toward profitability since longer distances tend to increase transportation costs when inputs are moved from nearby farms to the farm of interest.  

## EXTENDING THE MODEL

The model can be extended to capture CO2 emissions generated by the hauling trucks to reflect a more complex and closer to reality approach. Other policy implications can also be added to the model. 

## NETLOGO FEATURES

The model compares a diversified pasture-based business (beef, electricity and carbon offset) with a specialized one (beef production only) under deterministic and stochastic simulations. The model uses climatological, price and cost data as well as published equations and parameters from PBB studies, NOAA (15 years data), governmental agencies and renewable energy studies, among others.  

## RELATED MODELS

Wolf Sheep Predation (System Dynamics and Docked)

## CREDITS 

This model was created by Inocencio Rodriguez, Gerard D'Souza, Edward Rayburn and Tom Griggs as part of a dissertation at West Virginia University-Resource Management Division, June 2012. 

If you mention this model in an academic publication, we ask that you include these citations for the model itself, the NetLogo software and the NetLogo-R-Extension:  
-Rodriguez, I., D'Souza, G., Rayburn, E. and Griggs, T. (2012). Befergyonet Model. http://ccl.northwestern.edu/netlogo/models/community/BefergyonetModel. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL. 
-Thiele J.C. and Grimm V. (2010). NetLogo meets R: Linking agent-based models with a toolbox for their analysis. Environmental Modelling and Software 25(8): 972 - 974. [DOI: 10.1016/j.envsoft.2010.02.008]. Retrieved from http://netlogo-r-ext.berlios.de/   
-Wilensky, U. (1999). NetLogo. http://ccl.northwestern.edu/netlogo/. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL. 

**Note: We would like to acknowledge the helpful input of Alan Collins, Tim Phipps and Don Lacombe. We would also like to express our gratitude to the USDA, ARS-funded Appalachian pasture-beef project for providing the funding to undertake this research project and Dr. Jan Thiele for his support during the NetLogo-R-Extension installation.

## REFERENCES

-Blaser, R.E., Hammes, R.C., Fontenot, J.P., Bryant, H.T., Polan, C.E., Wolf, D.D., McClaugherty, F.S., Kline, R.G. and Moore, J.S. (1986). Forage-Animal Management Systems.Virginia Agricultural Experiment Station, Virginia Polytechnic Institute and State University Research Division Bulletin No. 86-7. 

-Evans, J., D'Souza, G.E., Brown, C., Collins, A., Rayburn, E.B. and Sperow, M. (2007). Determining Consumer Perceptions of and Willingness to Pay for Appalachian Grass-fed Beef: An Experimental Approach.  (Doctoral Dissertation). Retrieved from  http://wvuscholar.wvu.edu:8881//exlibris/dtl/d3_1/apache_media/L2V4bGlicmlzL2R0bC9kM18xL2FwYWNoZV9tZWRpYS8xMzg4MQ==.pdf 

-Rayburn, E. (2005). Pasture Management for Pasture-Finished Beef. Extension Service, West Virginia University. Retrieved from http://www.wvu.edu/~agexten/forglvst/pasturemang.pdf

-Rayburn, E., ed. (2008). Animal Production Systems for Pasture-Based Livestock Production. Natural Resource, Agriculture, and Engineering Service-NRAES-171: New York.

-Rayburn, E. and Lozier, J. (2002).  Pasture-Based Beef Systems for Appalachia Preliminary Report of a Nationwide Survey. Retrieved from http://www.wvu.edu/~agexten/forglvst/PFBPrpt.pdf 

-Schuster, D., Undersander, D., Schaefer, D., Klemme, R. M., Siemens, M. and Smith, L. (2001). Stocker Enterprise Budgets for Grass-based Systems. A3718. UW-Extension. University of Wisconsin. Retrieved from http://learningstore.uwex.edu/assets/pdfs/A3718.pdf 

-Thiele J.C. and Grimm V. (2010). NetLogo meets R: Linking agent-based models with a toolbox for their analysis. Environmental Modelling and Software 25(8): 972 - 974. [DOI: 10.1016/j.envsoft.2010.02.008]. Retrieved from http://netlogo-r-ext.berlios.de/  

-Wilensky, U. (1999). NetLogo. http://ccl.northwestern.edu/netlogo/. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL. 

-Wilensky, U. (2005). NetLogo Wolf Sheep Predation (docked) model. http://ccl.northwestern.edu/netlogo/models/WolfSheepPredation(docked). Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL.

-Wilensky, U. (2005). NetLogo Wolf Sheep Predation (System Dynamics) model. http://ccl.northwestern.edu/netlogo/models/WolfSheepPredation(SystemDynamics). Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL.

-William, J.C. and Hall, M.H. (1994). Four Steps to Rotational Grazing. Cooperative Extension Service, The Pennsylvania State University: Agronomy Facts 43. Retrieved from http://www.forages.psu.edu/agfacts/agfact43.pdf

-Virginia Forage Research Station [VAFS]. (1969). Managing Forages for Animal Production: 1949-1969.  History and Research Findings. Virginia Forage Research Station, Virginia Polytechnic Institute-Research Division Bulletin No. 45. 

-ZoBell, D., Burrell, C. and Bagley, C. (1999). Raising Beef Cattle on Few Acres. Extension Service. Utah State University.  

**Note: For complete information regarding references associated with the BET model as well as its concept, please take a look at the dissertation titled: Land as a Renewable Resource: Integrating Climate, Energy, and Profitability Goals using an Agent-Based NetLogo Model at the West Virginia University website. We will post the link to the dissertation, once it is available.
@#$#@#$#@
default
true
0
Polygon -7500403 true true 150 5 40 250 150 205 260 250

airplane
true
0
Polygon -7500403 true true 150 0 135 15 120 60 120 105 15 165 15 195 120 180 135 240 105 270 120 285 150 270 180 285 210 270 165 240 180 180 285 195 285 165 180 105 180 60 165 15

arrow
true
0
Polygon -7500403 true true 150 0 0 150 105 150 105 293 195 293 195 150 300 150

box
false
0
Polygon -7500403 true true 150 285 285 225 285 75 150 135
Polygon -7500403 true true 150 135 15 75 150 15 285 75
Polygon -7500403 true true 15 75 15 225 150 285 150 135
Line -16777216 false 150 285 150 135
Line -16777216 false 150 135 15 75
Line -16777216 false 150 135 285 75

bug
true
0
Circle -7500403 true true 96 182 108
Circle -7500403 true true 110 127 80
Circle -7500403 true true 110 75 80
Line -7500403 true 150 100 80 30
Line -7500403 true 150 100 220 30

butterfly
true
0
Polygon -7500403 true true 150 165 209 199 225 225 225 255 195 270 165 255 150 240
Polygon -7500403 true true 150 165 89 198 75 225 75 255 105 270 135 255 150 240
Polygon -7500403 true true 139 148 100 105 55 90 25 90 10 105 10 135 25 180 40 195 85 194 139 163
Polygon -7500403 true true 162 150 200 105 245 90 275 90 290 105 290 135 275 180 260 195 215 195 162 165
Polygon -16777216 true false 150 255 135 225 120 150 135 120 150 105 165 120 180 150 165 225
Circle -16777216 true false 135 90 30
Line -16777216 false 150 105 195 60
Line -16777216 false 150 105 105 60

car
false
0
Polygon -7500403 true true 300 180 279 164 261 144 240 135 226 132 213 106 203 84 185 63 159 50 135 50 75 60 0 150 0 165 0 225 300 225 300 180
Circle -16777216 true false 180 180 90
Circle -16777216 true false 30 180 90
Polygon -16777216 true false 162 80 132 78 134 135 209 135 194 105 189 96 180 89
Circle -7500403 true true 47 195 58
Circle -7500403 true true 195 195 58

circle
false
0
Circle -7500403 true true 0 0 300

circle 2
false
0
Circle -7500403 true true 0 0 300
Circle -16777216 true false 30 30 240

cow
false
0
Polygon -7500403 true true 200 193 197 249 179 249 177 196 166 187 140 189 93 191 78 179 72 211 49 209 48 181 37 149 25 120 25 89 45 72 103 84 179 75 198 76 252 64 272 81 293 103 285 121 255 121 242 118 224 167
Polygon -7500403 true true 73 210 86 251 62 249 48 208
Polygon -7500403 true true 25 114 16 195 9 204 23 213 25 200 39 123

cow house
false
0
Rectangle -7500403 true true 45 195 225 285
Polygon -7500403 true true 90 150 135 135 180 150
Rectangle -16777216 true false 105 270 165 285
Rectangle -16777216 true false 105 120 120 120
Rectangle -2674135 true false 210 75 225 75
Rectangle -16777216 true false 210 60 225 60
Polygon -7500403 true true 30 195 60 180 90 150 180 150 210 180 240 195
Rectangle -16777216 true false 150 240 210 255
Rectangle -7500403 true true 45 195 225 195
Rectangle -16777216 true false 120 195 150 210
Rectangle -16777216 true false 60 240 150 255

cow2
false
0
Rectangle -7500403 true true 118 95 274 191
Circle -7500403 true true 154 123 82
Polygon -7500403 true true 218 177 243 266 267 266 271 184
Polygon -7500403 true true 119 95 71 199 47 198 64 258 96 261 136 170
Polygon -7500403 true true 120 184 116 256 129 263 144 177

cylinder
false
0
Circle -7500403 true true 0 0 300

digested manure applicator
false
0
Polygon -7500403 true true 285 210 264 194 210 180 210 210 180 210 150 180 120 180 120 135 105 135 90 135 90 195 75 210 105 210 90 255 285 255 285 210
Circle -16777216 true false 225 240 60
Circle -16777216 true false 90 210 90
Polygon -16777216 true false 180 210 210 210 210 135 120 135 120 180 156 189 165 196
Circle -7500403 true true 105 223 62
Circle -7500403 true true 238 253 32
Rectangle -7500403 true true 90 120 210 135
Rectangle -16777216 true false 285 240 300 255
Rectangle -16777216 true false 75 210 90 225
Rectangle -7500403 true true 30 165 75 255
Circle -16777216 true false 30 240 60
Line -7500403 true 15 270 30 270
Line -7500403 true 30 255 30 270
Line -7500403 true 30 240 15 240
Line -7500403 true 30 210 15 210
Line -7500403 true 30 180 15 180
Line -7500403 true 30 150 15 150
Line -7500403 true 15 150 15 165
Line -7500403 true 15 180 15 195
Line -7500403 true 15 210 15 225
Line -7500403 true 15 240 15 255
Line -7500403 true 15 270 15 285
Line -7500403 true 30 150 30 165
Rectangle -1 true false 270 210 285 225

digester
false
0
Polygon -7500403 true true 15 210 45 180 105 150 195 150 255 180 285 210 285 285 15 285

dot
false
0
Circle -7500403 true true 90 90 120

engineer 
false
0
Polygon -7500403 true true 105 90 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 195 90
Polygon -1 true false 60 195 90 210 114 154 120 195 180 195 187 157 210 210 240 195 195 90 150 90 150 105 150 150 150 90 105 90
Circle -7500403 true true 110 5 80
Rectangle -7500403 true true 127 79 172 94
Polygon -16777216 true false 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 165 195 150 195 135 195
Polygon -1184463 true false 120 30 90 30 120 0 180 0 210 30 120 30
Polygon -16777216 true false 150 90 165 135 150 150 135 135
Rectangle -16777216 true false 75 285 105 300
Rectangle -16777216 true false 195 285 225 300
Polygon -6459832 true false 60 195 60 210 90 210
Polygon -6459832 true false 210 210 240 210 240 195

face happy
false
0
Circle -7500403 true true 8 8 285
Circle -16777216 true false 60 75 60
Circle -16777216 true false 180 75 60
Polygon -16777216 true false 150 255 90 239 62 213 47 191 67 179 90 203 109 218 150 225 192 218 210 203 227 181 251 194 236 217 212 240

face neutral
false
0
Circle -7500403 true true 8 7 285
Circle -16777216 true false 60 75 60
Circle -16777216 true false 180 75 60
Rectangle -16777216 true false 60 195 240 225

face sad
false
0
Circle -7500403 true true 8 8 285
Circle -16777216 true false 60 75 60
Circle -16777216 true false 180 75 60
Polygon -16777216 true false 150 168 90 184 62 210 47 232 67 244 90 220 109 205 150 198 192 205 210 220 227 242 251 229 236 206 212 183

farm
false
0
Rectangle -7500403 true true 30 195 210 285
Polygon -7500403 true true 105 135 150 120 195 135
Rectangle -16777216 true false 105 255 150 285
Rectangle -7500403 true true 210 105 270 285
Rectangle -16777216 true false 105 120 120 120
Rectangle -2674135 true false 210 75 225 75
Rectangle -16777216 true false 225 105 240 120
Rectangle -16777216 true false 225 255 240 285
Rectangle -16777216 true false 210 60 225 60
Rectangle -7500403 true true 210 90 270 105
Polygon -1 true false 210 90 225 60 255 60 270 90
Polygon -7500403 true true 0 195 45 165 105 135 195 135 255 165 240 195
Rectangle -1 true false 45 210 75 240
Rectangle -1 true false 165 210 195 240
Rectangle -7500403 true true 45 195 225 195
Rectangle -1 true false 105 165 150 180
Rectangle -1 true false 15 195 285 195

farmer 2
false
0
Polygon -2064490 true false 105 90 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 195 90
Polygon -1 true false 60 195 90 210 114 154 120 195 180 195 187 157 210 210 240 195 195 90 165 90 150 90 150 150 150 90 105 90
Circle -2064490 true false 110 5 80
Rectangle -2064490 true false 127 79 172 94
Polygon -13345367 true false 105 90 120 180 120 195 90 285 120 270 150 270 150 225 150 285 180 270 210 285 180 195 195 90 172 89 165 135 135 135 127 90
Polygon -6459832 true false 120 0 105 15 75 30 109 48 120 45 150 30 180 45 225 30 195 15 180 0
Rectangle -7500403 true true 75 285 105 300
Rectangle -6459832 true false 165 285 225 300
Polygon -2064490 true false 60 195 60 210 90 210 60 195
Polygon -2064490 true false 240 210 240 195 210 210 225 210
Rectangle -7500403 true true 165 270 180 270
Rectangle -6459832 true false 75 285 135 300
Rectangle -6459832 true false 165 285 225 285

fence
false
0
Line -7500403 true 15 135 285 135
Line -7500403 true 15 165 285 165
Line -7500403 true 15 150 285 150
Line -7500403 true 15 120 15 180
Line -7500403 true 285 120 285 180

fence pole
false
0
Rectangle -7500403 true true 105 135 120 315

fence1
false
0
Line -7500403 true 105 315 105 240
Line -7500403 true 195 315 195 240
Line -7500403 true 150 300 150 240
Line -7500403 true 105 285 195 285
Line -7500403 true 105 255 195 255

fence2
false
0
Line -1 false 0 225 300 225
Line -1 false 0 285 315 285
Line -1 false 0 255 300 255
Line -1 false 30 210 30 300
Line -1 false 270 210 270 300
Line -1 false 150 210 150 300

fence3
false
0
Line -7500403 true 195 300 195 270
Line -7500403 true 105 300 105 270
Line -7500403 true 150 300 150 270
Line -7500403 true 105 285 195 285
Line -7500403 true 105 270 195 270

fish
false
0
Polygon -1 true false 44 131 21 87 15 86 0 120 15 150 0 180 13 214 20 212 45 166
Polygon -1 true false 135 195 119 235 95 218 76 210 46 204 60 165
Polygon -1 true false 75 45 83 77 71 103 86 114 166 78 135 60
Polygon -7500403 true true 30 136 151 77 226 81 280 119 292 146 292 160 287 170 270 195 195 210 151 212 30 166
Circle -16777216 true false 215 106 30

flag
false
0
Rectangle -7500403 true true 60 15 75 300
Polygon -7500403 true true 90 150 270 90 90 30
Line -7500403 true 75 135 90 135
Line -7500403 true 75 45 90 45

flower
false
0
Polygon -10899396 true false 135 120 165 165 180 210 180 240 150 300 165 300 195 240 195 195 165 135
Circle -7500403 true true 85 132 38
Circle -7500403 true true 130 147 38
Circle -7500403 true true 192 85 38
Circle -7500403 true true 85 40 38
Circle -7500403 true true 177 40 38
Circle -7500403 true true 177 132 38
Circle -7500403 true true 70 85 38
Circle -7500403 true true 130 25 38
Circle -7500403 true true 96 51 108
Circle -16777216 true false 113 68 74
Polygon -10899396 true false 189 233 219 188 249 173 279 188 234 218
Polygon -10899396 true false 180 255 150 210 105 210 75 240 135 240

hay collector
false
0
Polygon -7500403 true true 285 210 264 194 210 180 210 210 180 210 150 180 120 180 120 135 105 135 90 135 90 195 75 210 105 210 90 255 285 255 285 210
Circle -16777216 true false 225 270 30
Circle -16777216 true false 90 210 90
Polygon -1 true false 210 210 210 135 120 135 120 180 156 189 180 210
Circle -7500403 true true 105 223 62
Rectangle -7500403 true true 90 120 210 135
Rectangle -16777216 true false 285 240 300 255
Rectangle -16777216 true false 75 210 90 225
Rectangle -7500403 true true 0 165 75 255
Circle -16777216 true false 0 240 60
Rectangle -1 true false 270 210 285 225
Rectangle -16777216 true false 240 255 255 270
Rectangle -1 false false 15 180 75 225
Polygon -1 true false 75 165 30 135 0 135 0 165 75 165

house
false
0
Rectangle -7500403 true true 45 120 255 285
Rectangle -16777216 true false 120 210 180 285
Polygon -7500403 true true 15 120 150 15 285 120
Line -16777216 false 30 120 270 120

house ranch
false
0
Rectangle -7500403 true true 270 120 285 255
Rectangle -7500403 true true 15 180 270 255
Polygon -7500403 true true 0 180 300 180 240 135 60 135 0 180
Rectangle -16777216 true false 120 195 180 255
Line -7500403 true 150 195 150 255
Rectangle -16777216 true false 45 195 105 240
Rectangle -16777216 true false 195 195 255 240
Line -7500403 true 75 195 75 240
Line -7500403 true 225 195 225 240
Line -16777216 false 270 180 270 255
Line -16777216 false 0 180 300 180

leaf
false
0
Polygon -7500403 true true 150 210 135 195 120 210 60 210 30 195 60 180 60 165 15 135 30 120 15 105 40 104 45 90 60 90 90 105 105 120 120 120 105 60 120 60 135 30 150 15 165 30 180 60 195 60 180 120 195 120 210 105 240 90 255 90 263 104 285 105 270 120 285 135 240 165 240 180 270 195 240 210 180 210 165 195
Polygon -7500403 true true 135 195 135 240 120 255 105 255 105 285 135 285 165 240 165 195

line
true
0
Line -7500403 true 150 0 150 300

line half
true
0
Line -7500403 true 150 0 150 150

manure storage
false
0
Rectangle -7500403 true true 45 195 225 285
Polygon -7500403 true true 90 150 135 135 180 150
Rectangle -16777216 true false 105 255 165 285
Rectangle -16777216 true false 105 120 120 120
Rectangle -2674135 true false 210 75 225 75
Rectangle -16777216 true false 210 60 225 60
Polygon -7500403 true true 45 195 60 180 90 150 180 150 210 180 225 195
Rectangle -7500403 true true 45 195 225 195

person
false
0
Circle -7500403 true true 110 5 80
Polygon -7500403 true true 105 90 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 195 90
Rectangle -7500403 true true 127 79 172 94
Polygon -7500403 true true 195 90 240 150 225 180 165 105
Polygon -7500403 true true 105 90 60 150 75 180 135 105

person farmer
false
0
Polygon -7500403 true true 105 90 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 195 90
Polygon -1 true false 60 195 90 210 114 154 120 195 180 195 187 157 210 210 240 195 195 90 165 90 150 105 150 150 135 90 105 90
Circle -7500403 true true 110 5 80
Rectangle -7500403 true true 127 79 172 94
Polygon -6459832 true false 120 90 120 180 120 195 90 285 105 300 135 300 150 225 165 300 195 300 210 285 180 195 180 90 172 89 165 135 135 135 127 90
Polygon -6459832 true false 116 4 113 21 71 33 71 40 109 48 117 34 144 27 180 26 188 36 224 23 222 14 178 16 167 0
Line -16777216 false 225 90 270 90
Line -16777216 false 225 15 225 90
Line -16777216 false 270 15 270 90
Line -16777216 false 247 15 247 90
Rectangle -6459832 true false 240 90 255 300

plant
false
0
Rectangle -7500403 true true 135 90 165 300
Polygon -7500403 true true 135 255 90 210 45 195 75 255 135 285
Polygon -7500403 true true 165 255 210 210 255 195 225 255 165 285
Polygon -7500403 true true 135 180 90 135 45 120 75 180 135 210
Polygon -7500403 true true 165 180 165 210 225 180 255 120 210 135
Polygon -7500403 true true 135 105 90 60 45 45 75 105 135 135
Polygon -7500403 true true 165 105 165 135 225 105 255 45 210 60
Polygon -7500403 true true 135 90 120 45 150 15 180 45 165 90

sheep
false
0
Rectangle -7500403 true true 151 225 180 285
Rectangle -7500403 true true 47 225 75 285
Rectangle -7500403 true true 15 75 210 225
Circle -7500403 true true 135 75 150
Circle -16777216 true false 165 76 116

silage truck
false
0
Rectangle -7500403 true true 4 120 195 262
Polygon -1 true false 296 268 296 225 259 209 244 179 208 179 207 269
Rectangle -1 true false 195 60 195 105
Polygon -16777216 true false 238 187 252 216 219 216 218 187
Circle -16777216 true false 234 249 42
Rectangle -7500403 true true 181 245 214 254
Circle -16777216 true false 144 249 42
Circle -16777216 true false 24 249 42
Circle -7500403 false true 24 249 42
Circle -7500403 false true 144 249 42
Circle -7500403 false true 234 249 42
Polygon -7500403 true true 45 105 30 105 45 105 30 90
Rectangle -16777216 true false 30 180 165 195
Rectangle -16777216 true false 30 210 165 225
Rectangle -16777216 true false 30 150 165 165
Line -16777216 false 180 135 180 240
Line -16777216 false 15 135 15 240
Line -16777216 false 15 135 180 135
Line -16777216 false 15 240 180 240

square
false
0
Rectangle -7500403 true true 30 30 270 270

square 2
false
0
Rectangle -7500403 true true 30 30 270 270
Rectangle -16777216 true false 60 60 240 240

star
false
0
Polygon -7500403 true true 151 1 185 108 298 108 207 175 242 282 151 216 59 282 94 175 3 108 116 108

target
false
0
Circle -7500403 true true 0 0 300
Circle -16777216 true false 30 30 240
Circle -7500403 true true 60 60 180
Circle -16777216 true false 90 90 120
Circle -7500403 true true 120 120 60

tree
false
0
Circle -7500403 true true 118 3 94
Rectangle -6459832 true false 120 195 180 300
Circle -7500403 true true 65 21 108
Circle -7500403 true true 116 41 127
Circle -7500403 true true 45 90 120
Circle -7500403 true true 104 74 152

triangle
false
0
Polygon -7500403 true true 150 30 15 255 285 255

triangle 2
false
0
Polygon -7500403 true true 150 30 15 255 285 255
Polygon -16777216 true false 151 99 225 223 75 224

truck
false
0
Rectangle -7500403 true true 4 135 195 277
Polygon -1 true false 296 268 296 225 259 209 244 179 208 179 207 269
Rectangle -1 true false 195 60 195 105
Polygon -16777216 true false 238 187 252 216 219 216 218 187
Circle -16777216 true false 234 249 42
Rectangle -7500403 true true 181 260 214 269
Circle -16777216 true false 144 249 42
Circle -16777216 true false 24 249 42
Circle -7500403 false true 24 249 42
Circle -7500403 false true 144 249 42
Circle -7500403 false true 234 249 42
Polygon -7500403 true true 45 105 30 105 45 105 30 90
Polygon -10899396 true false 75 165 120 165 120 135 165 165 120 180 120 165 75 165 120 135
Rectangle -10899396 true false 75 210 120 225
Polygon -10899396 true false 45 225 90 225 90 195 45 225 90 240 90 225 45 225 90 195
Rectangle -10899396 true false 90 150 135 165

truck left
false
0
Rectangle -7500403 true true 94 135 285 277
Polygon -1 true false 88 184 45 184 29 221 -1 236 -1 272 89 273
Rectangle -1 true false 195 60 195 105
Polygon -16777216 true false 75 195 75 225 39 216 45 195
Circle -16777216 true false 234 249 42
Rectangle -7500403 true true 76 260 109 269
Circle -16777216 true false 144 249 42
Circle -16777216 true false 9 249 42
Circle -7500403 false true 9 249 42
Circle -7500403 false true 144 249 42
Circle -7500403 false true 234 249 42
Polygon -10899396 true false 150 150 120 165 150 195 150 150
Rectangle -10899396 true false 150 165 195 180
Polygon -10899396 true false 225 210 255 225 225 255 225 210
Rectangle -10899396 true false 180 225 225 240

turtle
true
0
Polygon -10899396 true false 215 204 240 233 246 254 228 266 215 252 193 210
Polygon -10899396 true false 195 90 225 75 245 75 260 89 269 108 261 124 240 105 225 105 210 105
Polygon -10899396 true false 105 90 75 75 55 75 40 89 31 108 39 124 60 105 75 105 90 105
Polygon -10899396 true false 132 85 134 64 107 51 108 17 150 2 192 18 192 52 169 65 172 87
Polygon -10899396 true false 85 204 60 233 54 254 72 266 85 252 107 210
Polygon -7500403 true true 119 75 179 75 209 101 224 135 220 225 175 261 128 261 81 224 74 135 88 99

water tank
false
0
Polygon -7500403 true true 75 270 210 270 285 225 0 225
Rectangle -11221820 true false 0 210 285 225

well
false
0
Line -16777216 false 150 15 150 270
Line -2674135 false 120 15 195 75
Line -2674135 false 105 75 195 75
Line -2674135 false 105 75 180 15
Line -2674135 false 105 75 210 120
Line -2674135 false 195 75 90 120
Line -2674135 false 90 120 210 120
Polygon -1 false false 120 15 180 15 255 270 30 270 120 15
Rectangle -2674135 true false 90 120 210 180
Line -1 false 60 180 240 225
Line -1 false 225 180 45 225
Line -1 false 45 225 255 270
Line -1 false 240 225 30 270
Line -1 false 90 120 225 180
Rectangle -2674135 true false 15 285 255 270
Rectangle -2674135 true false 15 270 270 300
Line -1 false 60 180 210 120
Rectangle -2674135 true false 165 0 135 15
Rectangle -2674135 true false 135 0 165 15

wheel
false
0
Circle -7500403 true true 3 3 294
Circle -16777216 true false 30 30 240
Line -7500403 true 150 285 150 15
Line -7500403 true 15 150 285 150
Circle -7500403 true true 120 120 60
Line -7500403 true 216 40 79 269
Line -7500403 true 40 84 269 221
Line -7500403 true 40 216 269 79
Line -7500403 true 84 40 221 269

x
false
0
Polygon -7500403 true true 270 75 225 30 30 225 75 270
Polygon -7500403 true true 30 75 75 30 270 225 225 270

@#$#@#$#@
NetLogo 5.0.1
@#$#@#$#@
@#$#@#$#@
1.0 
    org.nlogo.sdm.gui.AggregateDrawing 267 
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 58 180 60 40 
            org.nlogo.sdm.gui.WrappedStock "Pounds-per-Head" "initial-weight-adjuster + weight-inflow * initial-weight\n" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 46 9 30 30  
        org.nlogo.sdm.gui.RateConnection 3 63 39 73 103 83 168 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 3  
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.nlogo.sdm.gui.WrappedRate "seasonal-weight-gain" "weight-inflow" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 2 0   
        org.nlogo.sdm.gui.BindingConnection 2 83 168 73 103 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.nlogo.sdm.gui.ChopRateConnector REF 4   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 1 339 30 30  
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 128 379 30 30  
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 328 126 60 40 
            org.nlogo.sdm.gui.WrappedStock "Average-Steer-Weight" "-560 + Ave-Steer-Weight-Inflow " 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 167 162 30 30  
        org.nlogo.sdm.gui.RateConnection 3 197 175 256 164 316 153 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 16  
            org.jhotdraw.standard.ChopBoxConnector REF 14  
            org.nlogo.sdm.gui.WrappedRate "-1 + (initial + 1046) / 2" "Ave-Steer-Weight-Inflow" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 15 0   
        org.nlogo.sdm.gui.BindingConnection 2 316 153 256 164 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 14  
            org.nlogo.sdm.gui.ChopRateConnector REF 17   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 172 189 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Pounds-per-Head" "initial"   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 432 170 60 40 
            org.nlogo.sdm.gui.WrappedStock "TMP" "TMP-inflow " 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 304 207 30 30  
        org.nlogo.sdm.gui.RateConnection 3 334 220 377 209 420 199 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 29  
            org.jhotdraw.standard.ChopBoxConnector REF 27  
            org.nlogo.sdm.gui.WrappedRate "recoverable-manure-production-head-lbs * (APD * Ave-Steer-Weight-Inflow / 1000) ;; total manure" "TMP-inflow" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 28 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 257 207 50 50 
            org.nlogo.sdm.gui.WrappedConverter "10.1 ;; average production per day" "APD"   
        org.nlogo.sdm.gui.BindingConnection 2 302 227 377 209 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 35  
            org.nlogo.sdm.gui.ChopRateConnector REF 30   
        org.nlogo.sdm.gui.BindingConnection 2 420 199 377 209 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 27  
            org.nlogo.sdm.gui.ChopRateConnector REF 30   
        org.nlogo.sdm.gui.BindingConnection 2 256 164 377 209 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 17  
            org.nlogo.sdm.gui.ChopRateConnector REF 30   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 420 226 50 50 
            org.nlogo.sdm.gui.WrappedConverter " .9  ;; recoverable manure production" "Recoverable-Manure-Production-head-lbs"   
        org.nlogo.sdm.gui.BindingConnection 2 377 209 429 241 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 30  
            org.jhotdraw.contrib.ChopDiamondConnector REF 46   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 152 63 30 30  
        org.nlogo.sdm.gui.BindingConnection 2 130 205 174 211 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.jhotdraw.contrib.ChopDiamondConnector REF 25   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 425 57 60 40 
            org.nlogo.sdm.gui.WrappedStock "methane" "methane-inflow" 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 150 124 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Pounds-per-Head" "weight1"   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 219 46 30 30  
        org.nlogo.sdm.gui.RateConnection 3 249 62 331 67 413 73 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 59  
            org.jhotdraw.standard.ChopBoxConnector REF 55  
            org.nlogo.sdm.gui.WrappedRate "weight1 * 0.698 * 10.1 * .001 * 3.84 * .041 * .0005" "methane-inflow" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 56 0   
        org.nlogo.sdm.gui.BindingConnection 2 130 175 159 158 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.jhotdraw.contrib.ChopDiamondConnector REF 57   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 664 95 60 40 
            org.nlogo.sdm.gui.WrappedStock "CO2e" "Carbon-Offset " 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 517 116 50 50 
            org.nlogo.sdm.gui.WrappedConverter "methane" "methane-CO2-conversion"   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 841 277 30 30  
        org.nlogo.sdm.gui.RateConnection 3 847 282 785 214 723 147 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 72  
            org.jhotdraw.standard.ChopBoxConnector REF 68  
            org.nlogo.sdm.gui.WrappedRate " total-methane * 24" "Carbon-Offset" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 69 0   
        org.nlogo.sdm.gui.BindingConnection 2 497 107 527 130 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 55  
            org.jhotdraw.contrib.ChopDiamondConnector REF 70   
        org.nlogo.sdm.gui.BindingConnection 2 723 147 785 214 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 68  
            org.nlogo.sdm.gui.ChopRateConnector REF 73   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 790 113 30 30  
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 1072 296 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Biogas-Production-Head-Day" "Biogas-Production-Head" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 922 310 30 30  
        org.nlogo.sdm.gui.RateConnection 3 952 325 1006 321 1060 318 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 87  
            org.jhotdraw.standard.ChopBoxConnector REF 85  
            org.nlogo.sdm.gui.WrappedRate "Pounds-per-Head * 0.03440" "Biogas-Production-Head" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 86 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 1122 466 60 40 
            org.nlogo.sdm.gui.WrappedStock "GEC" "Gross-Energy-Content " 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 979 426 30 30  
        org.nlogo.sdm.gui.RateConnection 3 1008 445 1059 459 1110 473 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 95  
            org.jhotdraw.standard.ChopBoxConnector REF 93  
            org.nlogo.sdm.gui.WrappedRate "Daily-Biogas-Production-Head * BTU" "Gross-Energy-Content" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 94 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 1075 379 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Biogas-Production-Head" "Daily-Biogas-Production-Head"   
        org.nlogo.sdm.gui.BindingConnection 2 1089 418 1059 459 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 101  
            org.nlogo.sdm.gui.ChopRateConnector REF 96   
        org.nlogo.sdm.gui.BindingConnection 2 1006 321 1086 392 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 88  
            org.jhotdraw.contrib.ChopDiamondConnector REF 101   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 886 489 50 50 
            org.nlogo.sdm.gui.WrappedConverter "600" "BTU"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 928 572 50 50 
            org.nlogo.sdm.gui.WrappedConverter "0.3554\n" "Percent-Energy"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 1047 530 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Gross-Energy-Content" "Gross-Energy"   
        org.nlogo.sdm.gui.BindingConnection 2 1059 459 1069 532 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 96  
            org.jhotdraw.contrib.ChopDiamondConnector REF 113   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 903 348 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Gross-Energy - (Gross-Energy * Percent-Energy)" "Net-Energy-Content"   
        org.nlogo.sdm.gui.BindingConnection 2 1060 541 939 386 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 113  
            org.jhotdraw.contrib.ChopDiamondConnector REF 118   
        org.nlogo.sdm.gui.BindingConnection 2 950 574 930 395 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 111  
            org.jhotdraw.contrib.ChopDiamondConnector REF 118   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 691 255 60 40 
            org.nlogo.sdm.gui.WrappedStock "Generation" "Electricity-Generation" 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 888 291 50 50 
            org.nlogo.sdm.gui.WrappedConverter "0.000292997\n" "kWh-BTU"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 870 388 50 50 
            org.nlogo.sdm.gui.WrappedConverter "0.25" "Methane-Electricity-Conversion"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 783 248 50 50 
            org.nlogo.sdm.gui.WrappedConverter "0.9" "on-line-efficiency"   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 865 363 30 30  
        org.nlogo.sdm.gui.RateConnection 3 868 371 815 336 763 302 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 134  
            org.jhotdraw.standard.ChopBoxConnector REF 126  
            org.nlogo.sdm.gui.WrappedRate "Net-Energy-Content * Methane-Electricity-Conversion * kWh-BTU * on-line-efficiency " "Electricity-Generation" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 127 0   
        org.nlogo.sdm.gui.BindingConnection 2 882 400 815 336 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 130  
            org.nlogo.sdm.gui.ChopRateConnector REF 135   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 141 237 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Pounds-per-Head " "Total-Pounds"   
        org.nlogo.sdm.gui.BindingConnection 2 128 232 152 250 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.jhotdraw.contrib.ChopDiamondConnector REF 143   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 566 66 50 50 
            org.nlogo.sdm.gui.WrappedConverter "methane-CO2-conversion " "total-methane"   
        org.nlogo.sdm.gui.BindingConnection 2 554 128 578 103 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 70  
            org.jhotdraw.contrib.ChopDiamondConnector REF 148   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 671 30 50 50 
            org.nlogo.sdm.gui.WrappedConverter "total-methane * 25" "CO2Equivalent-baseline"   
        org.nlogo.sdm.gui.BindingConnection 2 609 84 677 61 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 148  
            org.jhotdraw.contrib.ChopDiamondConnector REF 153   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 137 72 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Pounds-per-Head * DM-Intake-List" "daily-DM-intake"   
        org.nlogo.sdm.gui.BindingConnection 2 110 168 151 111 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.jhotdraw.contrib.ChopDiamondConnector REF 158   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 585 561 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Net-Present-Value-" "Net-Present-Value" 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 218 656 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Net-Cash-Flow-" "Net-Cash-Flow * dt" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 426 679 30 30  
        org.nlogo.sdm.gui.RateConnection 3 427 694 358 686 290 679 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 167  
            org.jhotdraw.standard.ChopBoxConnector REF 165  
            org.nlogo.sdm.gui.WrappedRate "PV-Receipts - PV-Expendetures" "Net-Cash-Flow" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 166 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 473 662 30 30  
        org.nlogo.sdm.gui.RateConnection 3 500 669 536 640 573 612 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 173  
            org.jhotdraw.standard.ChopBoxConnector REF 163  
            org.nlogo.sdm.gui.WrappedRate "Net-Cash-Flow / (1 + Discount-Rate) ^ year" "Net-Present-Value" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 164 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 464 524 60 40 
            org.nlogo.sdm.gui.WrappedStock "-PV-Expendetures-" "PV-Expendetures" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 657 474 30 30  
        org.nlogo.sdm.gui.RateConnection 3 659 493 597 511 536 530 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 181  
            org.jhotdraw.standard.ChopBoxConnector REF 179  
            org.nlogo.sdm.gui.WrappedRate "Total-Costs / (1 + Discount-Rate) ^ year" "PV-Expendetures" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 180 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 355 536 60 40 
            org.nlogo.sdm.gui.WrappedStock "-PV-Receipts-" "PV-Receipts" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 162 580 30 30  
        org.nlogo.sdm.gui.RateConnection 3 192 593 267 578 343 563 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 189  
            org.jhotdraw.standard.ChopBoxConnector REF 187  
            org.nlogo.sdm.gui.WrappedRate "Total-Revenue / (1 + Discount-Rate) ^ year" "PV-Receipts" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 188 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 476 453 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Total-Revenue-" "Total-Revenue" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 305 469 30 30  
        org.nlogo.sdm.gui.RateConnection 3 335 484 399 479 464 475 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 197  
            org.jhotdraw.standard.ChopBoxConnector REF 195  
            org.nlogo.sdm.gui.WrappedRate "Revenue-Beef + Revenue-Electricity + Revenue-Carbon" "Total-Revenue" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 196 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 386 360 60 40 
            org.nlogo.sdm.gui.WrappedStock "Costs" "Total-Costs" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 539 295 30 30  
        org.nlogo.sdm.gui.RateConnection 3 542 317 500 338 458 359 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 205  
            org.jhotdraw.standard.ChopBoxConnector REF 203  
            org.nlogo.sdm.gui.WrappedRate "Beef-Variable-Costs + CO2e-Variable-Costs + Electricity-Variable-Costs + variable-cost-manure " "Total-Costs" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 204 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 412 420 30 30  
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 151 695 30 30  
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 314 413 50 50 
            org.nlogo.sdm.gui.WrappedConverter "beef-revenue" "Revenue-Beef"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 563 424 50 50 
            org.nlogo.sdm.gui.WrappedConverter "electricity-revenue" "Revenue-Electricity"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 460 393 50 50 
            org.nlogo.sdm.gui.WrappedConverter "carbon-revenue" "Revenue-Carbon"   
        org.nlogo.sdm.gui.BindingConnection 2 353 448 399 479 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 213  
            org.nlogo.sdm.gui.ChopRateConnector REF 198   
        org.nlogo.sdm.gui.BindingConnection 2 566 452 399 479 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 215  
            org.nlogo.sdm.gui.ChopRateConnector REF 198   
        org.nlogo.sdm.gui.BindingConnection 2 470 428 399 479 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 217  
            org.nlogo.sdm.gui.ChopRateConnector REF 198   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 433 272 50 50 
            org.nlogo.sdm.gui.WrappedConverter "beef-variable-cost + purchase-price-head" "Beef-Variable-Costs"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 514 366 50 50 
            org.nlogo.sdm.gui.WrappedConverter "electricity-variable-cost" "Electricity-Variable-Costs"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 560 247 50 50 
            org.nlogo.sdm.gui.WrappedConverter "3000" "CO2e-Variable-Costs"   
        org.nlogo.sdm.gui.BindingConnection 2 500 338 570 282 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 206  
            org.jhotdraw.contrib.ChopDiamondConnector REF 232   
        org.nlogo.sdm.gui.BindingConnection 2 500 338 470 309 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 206  
            org.jhotdraw.contrib.ChopDiamondConnector REF 228   
        org.nlogo.sdm.gui.BindingConnection 2 500 338 528 376 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 206  
            org.jhotdraw.contrib.ChopDiamondConnector REF 230   
        org.nlogo.sdm.gui.BindingConnection 2 500 338 597 511 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 206  
            org.nlogo.sdm.gui.ChopRateConnector REF 182   
        org.nlogo.sdm.gui.BindingConnection 2 399 479 267 578 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 198  
            org.nlogo.sdm.gui.ChopRateConnector REF 190   
        org.nlogo.sdm.gui.BindingConnection 2 267 578 358 686 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 190  
            org.nlogo.sdm.gui.ChopRateConnector REF 168   
        org.nlogo.sdm.gui.BindingConnection 2 597 511 358 686 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 182  
            org.nlogo.sdm.gui.ChopRateConnector REF 168   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 438 618 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Discount-Rate-List" "Discount-Rate"   
        org.nlogo.sdm.gui.BindingConnection 2 444 636 267 578 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 190   
        org.nlogo.sdm.gui.BindingConnection 2 475 630 597 511 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 182   
        org.nlogo.sdm.gui.BindingConnection 2 445 650 358 686 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 168   
        org.nlogo.sdm.gui.BindingConnection 2 358 686 536 640 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 168  
            org.nlogo.sdm.gui.ChopRateConnector REF 174   
        org.nlogo.sdm.gui.BindingConnection 2 487 642 536 640 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 174   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 80 443 30 30  
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 100 298 60 40 
            org.nlogo.sdm.gui.WrappedStock "Accumulated-Daily-Intake" "Pasture-Intake" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 5 208 30 30  
        org.nlogo.sdm.gui.RateConnection 3 31 233 62 259 93 286 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 275  
            org.jhotdraw.standard.ChopBoxConnector REF 273  
            org.nlogo.sdm.gui.WrappedRate "Pounds-per-Head * DM-intake-percent" "Pasture-Intake" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 274 0   
        org.nlogo.sdm.gui.BindingConnection 2 73 232 62 259 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 1  
            org.nlogo.sdm.gui.ChopRateConnector REF 276   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 19 310 50 50 
            org.nlogo.sdm.gui.WrappedConverter "DM-Intake-List" "DM-intake-percent"   
        org.nlogo.sdm.gui.BindingConnection 2 48 314 62 259 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 284  
            org.nlogo.sdm.gui.ChopRateConnector REF 276   
        org.nlogo.sdm.gui.BindingConnection 2 93 286 62 259 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 273  
            org.nlogo.sdm.gui.ChopRateConnector REF 276   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 518 183 50 50 
            org.nlogo.sdm.gui.WrappedConverter "variable-cost-manure" "-manure-variable-cost-"   
        org.nlogo.sdm.gui.BindingConnection 2 500 338 536 226 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 206  
            org.jhotdraw.contrib.ChopDiamondConnector REF 292   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 1026 126 60 40 
            org.nlogo.sdm.gui.WrappedStock "RGR-ENV-ACC" "rgr-env" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 843 142 30 30  
        org.nlogo.sdm.gui.RateConnection 3 873 157 943 152 1014 148 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 299  
            org.jhotdraw.standard.ChopBoxConnector REF 297  
            org.nlogo.sdm.gui.WrappedRate "Rgr-Temp-Adj * Rgr-Dl-Adj * RGR-H2O" "RGR-ENV" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 298 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 915 26 50 50 
            org.nlogo.sdm.gui.WrappedConverter "rgr-dl" "Rgr-Dl-Adj"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 805 68 50 50 
            org.nlogo.sdm.gui.WrappedConverter "rgr-temp" "Rgr-Temp-Adj"   
        org.nlogo.sdm.gui.BindingConnection 2 943 152 846 101 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 300  
            org.jhotdraw.contrib.ChopDiamondConnector REF 307   
        org.nlogo.sdm.gui.BindingConnection 2 943 152 940 75 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 300  
            org.jhotdraw.contrib.ChopDiamondConnector REF 305   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 911 240 30 30  
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 969 303 30 30  
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 1064 187 30 30  
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 1049 281 30 30  
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 964 203 60 40 
            org.nlogo.sdm.gui.WrappedStock "Acc-PGR-Acre" "Daily-PGR-Acre" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 811 173 30 30  
        org.nlogo.sdm.gui.RateConnection 3 841 191 896 202 952 214 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 321  
            org.jhotdraw.standard.ChopBoxConnector REF 319  
            org.nlogo.sdm.gui.WrappedRate "RGR-ENV * PGR-Max-test" "Daily-PGR-Acre" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 320 0   
        org.nlogo.sdm.gui.BindingConnection 2 896 202 943 152 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 322  
            org.nlogo.sdm.gui.ChopRateConnector REF 300   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 928 242 50 50 
            org.nlogo.sdm.gui.WrappedConverter "PGR-Max" "PGR-Max-test"   
        org.nlogo.sdm.gui.BindingConnection 2 896 202 941 253 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 322  
            org.jhotdraw.contrib.ChopDiamondConnector REF 330   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 1141 46 60 40 
            org.nlogo.sdm.gui.WrappedStock "RGR-ENV-ACC-Stoc" "RGR-ENV-STOC" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 1078 188 30 30  
        org.nlogo.sdm.gui.RateConnection 3 1100 191 1126 144 1152 98 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 337  
            org.jhotdraw.standard.ChopBoxConnector REF 335  
            org.nlogo.sdm.gui.WrappedRate "RGR-Temp-Adj * RgR-DL-Adj * RGR-H2O-Stoc" "RGR-ENV-STOC" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 336 0   
        org.nlogo.sdm.gui.BindingConnection 2 1126 144 956 59 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 338  
            org.jhotdraw.contrib.ChopDiamondConnector REF 305   
        org.nlogo.sdm.gui.BindingConnection 2 1126 144 851 96 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 338  
            org.jhotdraw.contrib.ChopDiamondConnector REF 307   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 1129 191 60 40 
            org.nlogo.sdm.gui.WrappedStock "ACC-PGR-ACRE-Stoc" "Daily-PGR-Acre-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 976 281 30 30  
        org.nlogo.sdm.gui.RateConnection 3 1004 290 1060 260 1117 231 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 351  
            org.jhotdraw.standard.ChopBoxConnector REF 349  
            org.nlogo.sdm.gui.WrappedRate "RGR-ENV-STOC * PGR-Max-test" "Daily-PGR-Acre-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 350 0   
        org.nlogo.sdm.gui.BindingConnection 2 1060 260 976 265 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 352  
            org.jhotdraw.contrib.ChopDiamondConnector REF 330   
        org.nlogo.sdm.gui.BindingConnection 2 1060 260 1126 144 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 352  
            org.nlogo.sdm.gui.ChopRateConnector REF 338   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 882 542 60 40 
            org.nlogo.sdm.gui.WrappedStock "Costs-Stoc" "Total-Costs-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 798 577 30 30  
        org.nlogo.sdm.gui.RateConnection 3 827 589 848 581 870 574 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 365  
            org.jhotdraw.standard.ChopBoxConnector REF 363  
            org.nlogo.sdm.gui.WrappedRate "Beef-Variable-Costs-Stoc + -Manure-Variable-Cost-Stoc + CO2e-Variable-Costs-Stoc + Electricity-Variable-Costs-Stoc" "Total-Costs-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 364 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 696 454 50 50 
            org.nlogo.sdm.gui.WrappedConverter "3000" "-manure-variable-cost-stoc"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 732 398 50 50 
            org.nlogo.sdm.gui.WrappedConverter "3000" "CO2e-Variable-Costs-Stoc"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 862 455 50 50 
            org.nlogo.sdm.gui.WrappedConverter "electricity-variable-cost-stoc" "Electricity-Variable-Costs-Stoc"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 695 530 50 50 
            org.nlogo.sdm.gui.WrappedConverter "beef-variable-cost-stoc" "Beef-Variable-Costs-Stoc"   
        org.nlogo.sdm.gui.BindingConnection 2 848 581 880 498 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 366  
            org.jhotdraw.contrib.ChopDiamondConnector REF 375   
        org.nlogo.sdm.gui.BindingConnection 2 848 581 766 438 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 366  
            org.jhotdraw.contrib.ChopDiamondConnector REF 373   
        org.nlogo.sdm.gui.BindingConnection 2 848 581 734 490 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 366  
            org.jhotdraw.contrib.ChopDiamondConnector REF 371   
        org.nlogo.sdm.gui.BindingConnection 2 848 581 740 559 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 366  
            org.jhotdraw.contrib.ChopDiamondConnector REF 377   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 967 629 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Total-Revenue-Stoc-" "Total-Revenue-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 1132 622 30 30  
        org.nlogo.sdm.gui.RateConnection 3 1133 638 1086 641 1039 645 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 393  
            org.jhotdraw.standard.ChopBoxConnector REF 391  
            org.nlogo.sdm.gui.WrappedRate "Revenue-Beef-Stoc + Revenue-Carbon-Stoc + Revenue-Electricity-Stoc" "Total-Revenue-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 392 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 1142 582 50 50 
            org.nlogo.sdm.gui.WrappedConverter "electricity-revenue-stoc" "Revenue-Electricity-Stoc"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 1115 553 50 50 
            org.nlogo.sdm.gui.WrappedConverter "carbon-revenue-stoc" "Revenue-Carbon-Stoc"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 1001 570 50 50 
            org.nlogo.sdm.gui.WrappedConverter "beef-revenue-stoc" "Revenue-Beef-Stoc"   
        org.nlogo.sdm.gui.BindingConnection 2 1040 605 1086 641 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 403  
            org.nlogo.sdm.gui.ChopRateConnector REF 394   
        org.nlogo.sdm.gui.BindingConnection 2 1128 591 1086 641 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 401  
            org.nlogo.sdm.gui.ChopRateConnector REF 394   
        org.nlogo.sdm.gui.BindingConnection 2 1149 614 1086 641 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 399  
            org.nlogo.sdm.gui.ChopRateConnector REF 394   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 1017 718 60 40 
            org.nlogo.sdm.gui.WrappedStock "-PV-Receipts-Stoc-" "PV-Receipts-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 1211 712 30 30  
        org.nlogo.sdm.gui.RateConnection 3 1212 728 1150 731 1089 735 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 416  
            org.jhotdraw.standard.ChopBoxConnector REF 414  
            org.nlogo.sdm.gui.WrappedRate "Total-Revenue-Stoc / (1 + Discount-Rate) ^ year" "PV-Receipts-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 415 0   
        org.nlogo.sdm.gui.BindingConnection 2 1086 641 1150 731 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 394  
            org.nlogo.sdm.gui.ChopRateConnector REF 417   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 705 595 60 40 
            org.nlogo.sdm.gui.WrappedStock "-PV-Expendeture-Stoc-" "PV-Expendetures-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 908 600 30 30  
        org.nlogo.sdm.gui.RateConnection 3 909 615 843 615 777 615 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 427  
            org.jhotdraw.standard.ChopBoxConnector REF 425  
            org.nlogo.sdm.gui.WrappedRate "Total-Costs-Stoc / (1 + Discount-Rate) ^ year" "PV-Expendetures-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 426 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 818 693 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Net-Cash-Flow-Stoc-" "Net-Cash-Flow-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 988 714 30 30  
        org.nlogo.sdm.gui.RateConnection 3 989 728 939 722 890 717 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 435  
            org.jhotdraw.standard.ChopBoxConnector REF 433  
            org.nlogo.sdm.gui.WrappedRate "PV-Receipts-Stoc - PV-Expendetures-Stoc " "Net-Cash-Flow-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 434 0   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 617 697 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Net-Present-Value-Stoc-" "Net-Present-Value-Stoc" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 812 707 30 30  
        org.nlogo.sdm.gui.RateConnection 3 813 722 751 719 689 717 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 443  
            org.jhotdraw.standard.ChopBoxConnector REF 441  
            org.nlogo.sdm.gui.WrappedRate "Net-Cash-Flow-Stoc / (1 + Discount-Rate) ^ year" "Net-Present-Value-Stoc" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 442 0   
        org.nlogo.sdm.gui.BindingConnection 2 751 719 939 722 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 444  
            org.nlogo.sdm.gui.ChopRateConnector REF 436   
        org.nlogo.sdm.gui.BindingConnection 2 486 641 843 615 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 428   
        org.nlogo.sdm.gui.BindingConnection 2 482 648 751 719 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 444   
        org.nlogo.sdm.gui.BindingConnection 2 485 645 1150 731 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 255  
            org.nlogo.sdm.gui.ChopRateConnector REF 417   
        org.nlogo.sdm.gui.BindingConnection 2 1150 731 939 722 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 417  
            org.nlogo.sdm.gui.ChopRateConnector REF 436   
        org.nlogo.sdm.gui.BindingConnection 2 843 615 939 722 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 428  
            org.nlogo.sdm.gui.ChopRateConnector REF 436   
        org.nlogo.sdm.gui.BindingConnection 2 848 581 843 615 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 366  
            org.nlogo.sdm.gui.ChopRateConnector REF 428   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 666 349 60 40 
            org.nlogo.sdm.gui.WrappedStock "Timer-Loop-Sequence" "-250 + initial-loop * sequence" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 523 324 30 30  
        org.nlogo.sdm.gui.RateConnection 3 553 342 603 351 654 360 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 472  
            org.jhotdraw.standard.ChopBoxConnector REF 470  
            org.nlogo.sdm.gui.WrappedRate "1.5" "Sequence" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 471 0   
        org.nlogo.sdm.gui.BindingConnection 2 654 360 603 351 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 470  
            org.nlogo.sdm.gui.ChopRateConnector REF 473   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 193 371 60 40 
            org.nlogo.sdm.gui.WrappedStock "Average-Cow-Weight" "Average-Cow-Weight-Inflow" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 364 340 30 30  
        org.nlogo.sdm.gui.RateConnection 3 365 358 315 369 265 380 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 483  
            org.jhotdraw.standard.ChopBoxConnector REF 481  
            org.nlogo.sdm.gui.WrappedRate "(initial-cow + initial-cow) / 2" "Average-Cow-Weight-Inflow" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 482 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 197 311 50 50 
            org.nlogo.sdm.gui.WrappedConverter "cow-pounds" "initial-cow"   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 354 281 60 40 
            org.nlogo.sdm.gui.WrappedStock "TMP2" "TMP-inflow" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 231 273 30 30  
        org.nlogo.sdm.gui.RateConnection 3 261 289 301 292 342 296 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 493  
            org.jhotdraw.standard.ChopBoxConnector REF 491  
            org.nlogo.sdm.gui.WrappedRate "recoverable-manure-production-head-lbs * (apd * average-cow-weight-inflow / 1000) " "TMP-Inflow2" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 492 0   
        org.nlogo.sdm.gui.BindingConnection 2 288 250 301 292 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 35  
            org.nlogo.sdm.gui.ChopRateConnector REF 494   
        org.nlogo.sdm.gui.BindingConnection 2 342 296 301 292 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 491  
            org.nlogo.sdm.gui.ChopRateConnector REF 494   
        org.nlogo.sdm.gui.BindingConnection 2 301 292 425 256 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 494  
            org.jhotdraw.contrib.ChopDiamondConnector REF 46   
        org.nlogo.sdm.gui.BindingConnection 2 315 369 240 342 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 484  
            org.jhotdraw.contrib.ChopDiamondConnector REF 489   
        org.nlogo.sdm.gui.BindingConnection 2 256 164 210 202 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 17  
            org.jhotdraw.contrib.ChopDiamondConnector REF 25   
        org.nlogo.sdm.gui.BindingConnection 2 301 292 315 369 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 494  
            org.nlogo.sdm.gui.ChopRateConnector REF 484   
        org.nlogo.sdm.gui.BindingConnection 2 265 380 315 369 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 481  
            org.nlogo.sdm.gui.ChopRateConnector REF 484   
        org.nlogo.sdm.gui.BindingConnection 2 331 67 191 140 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 60  
            org.jhotdraw.contrib.ChopDiamondConnector REF 57   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 56 440 60 40 
            org.nlogo.sdm.gui.WrappedStock "methane2" "methane-inflow2" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 10 344 30 30  
        org.nlogo.sdm.gui.RateConnection 3 33 372 49 400 66 428 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 525  
            org.jhotdraw.standard.ChopBoxConnector REF 523  
            org.nlogo.sdm.gui.WrappedRate "initial-cow * 0.698 * 10.1 * .001 * 3.84 * .041 * .0005" "methane-inflow2" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 524 0   
        org.nlogo.sdm.gui.BindingConnection 2 49 400 203 342 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 526  
            org.jhotdraw.contrib.ChopDiamondConnector REF 489   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 155 418 50 50 
            org.nlogo.sdm.gui.WrappedConverter "methane2" "methane-co2-conversion2"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 253 499 50 50 
            org.nlogo.sdm.gui.WrappedConverter "total-methane2 * 25" "CO2Equivalent-baseline2"   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 214 448 50 50 
            org.nlogo.sdm.gui.WrappedConverter "methane-co2-conversion2" "total-methane2"   
        org.nlogo.sdm.gui.BindingConnection 2 128 452 158 446 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 523  
            org.jhotdraw.contrib.ChopDiamondConnector REF 534   
        org.nlogo.sdm.gui.BindingConnection 2 196 451 222 464 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 534  
            org.jhotdraw.contrib.ChopDiamondConnector REF 538   
        org.nlogo.sdm.gui.BindingConnection 2 249 487 267 509 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 538  
            org.jhotdraw.contrib.ChopDiamondConnector REF 536   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 64 511 60 40 
            org.nlogo.sdm.gui.WrappedStock "CO2e2" "total-methane2" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 243 531 30 30  
        org.nlogo.sdm.gui.RateConnection 3 244 545 190 539 136 534 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 551  
            org.jhotdraw.standard.ChopBoxConnector REF 549  
            org.nlogo.sdm.gui.WrappedRate "total-methane2 * 24" "Carbon-Offset2" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 550 0   
        org.nlogo.sdm.gui.BindingConnection 2 190 539 228 487 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 552  
            org.jhotdraw.contrib.ChopDiamondConnector REF 538   
        org.nlogo.sdm.gui.BindingConnection 2 785 214 606 100 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 73  
            org.jhotdraw.contrib.ChopDiamondConnector REF 148   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 22 563 60 40 
            org.nlogo.sdm.gui.WrappedStock "-Biogas-Production-Head-Day2" "Biogas-Production-Head2" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 149 642 30 30  
        org.nlogo.sdm.gui.RateConnection 3 152 650 123 630 94 610 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 565  
            org.jhotdraw.standard.ChopBoxConnector REF 563  
            org.nlogo.sdm.gui.WrappedRate "cow-pounds * 0.03440" "Biogas-Production-Head2" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 564 0   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 13 638 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Biogas-Production-Head2" "Daily-Biogas-Production-Head2"   
        org.nlogo.sdm.gui.BindingConnection 2 1060 318 1006 321 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 85  
            org.nlogo.sdm.gui.ChopRateConnector REF 88   
        org.nlogo.sdm.gui.BindingConnection 2 94 610 123 630 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 563  
            org.nlogo.sdm.gui.ChopRateConnector REF 566   
        org.nlogo.sdm.gui.BindingConnection 2 123 630 56 656 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 566  
            org.jhotdraw.contrib.ChopDiamondConnector REF 571   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 157 711 60 40 
            org.nlogo.sdm.gui.WrappedStock "GEC2" "Gross-Energy-Content2" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 5 697 30 30  
        org.nlogo.sdm.gui.RateConnection 3 35 713 90 719 145 725 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 584  
            org.jhotdraw.standard.ChopBoxConnector REF 582  
            org.nlogo.sdm.gui.WrappedRate "Daily-Biogas-Production-Head2 * BTU" "Gross-Energy-Content2" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 583 0   
        org.nlogo.sdm.gui.BindingConnection 2 50 675 90 719 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 571  
            org.nlogo.sdm.gui.ChopRateConnector REF 585   
        org.nlogo.sdm.gui.BindingConnection 2 1059 459 929 507 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 96  
            org.jhotdraw.contrib.ChopDiamondConnector REF 109   
        org.nlogo.sdm.gui.BindingConnection 2 90 719 890 518 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 585  
            org.jhotdraw.contrib.ChopDiamondConnector REF 109   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 235 717 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Gross-Energy-Content2" "Gross-Energy2"   
        org.nlogo.sdm.gui.BindingConnection 2 90 719 237 739 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 585  
            org.jhotdraw.contrib.ChopDiamondConnector REF 599   
        org.nlogo.sdm.gui.ConverterFigure "attributes" "attributes" 1 "FillColor" "Color" 130 188 183 332 737 50 50 
            org.nlogo.sdm.gui.WrappedConverter "Gross-Energy2 - (Gross-Energy2 * Percent-Energy)" "Net-Energy-Content2"   
        org.nlogo.sdm.gui.BindingConnection 2 280 746 336 757 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 599  
            org.jhotdraw.contrib.ChopDiamondConnector REF 604   
        org.nlogo.sdm.gui.BindingConnection 2 376 756 933 602 NULL NULL 0 0 0 
            org.jhotdraw.contrib.ChopDiamondConnector REF 604  
            org.jhotdraw.contrib.ChopDiamondConnector REF 111   
        org.nlogo.sdm.gui.StockFigure "attributes" "attributes" 1 "FillColor" "Color" 225 225 182 528 726 60 40 
            org.nlogo.sdm.gui.WrappedStock "Generation2" "Electricity-Generation2" 0   
        org.nlogo.sdm.gui.ReservoirFigure "attributes" "attributes" 1 "FillColor" "Color" 192 192 192 392 750 30 30  
        org.nlogo.sdm.gui.RateConnection 3 422 764 469 757 516 751 NULL NULL 0 0 0 
            org.jhotdraw.figures.ChopEllipseConnector REF 614  
            org.jhotdraw.standard.ChopBoxConnector REF 612  
            org.nlogo.sdm.gui.WrappedRate "Net-Energy-Content2 * Methane-Electricity-Conversion * KWH-BTU * on-line-efficiency" "Electricity-Generation2" 
                org.nlogo.sdm.gui.WrappedReservoir  REF 613 0   
        org.nlogo.sdm.gui.BindingConnection 2 815 336 892 320 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 135  
            org.jhotdraw.contrib.ChopDiamondConnector REF 128   
        org.nlogo.sdm.gui.BindingConnection 2 815 336 810 295 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 135  
            org.jhotdraw.contrib.ChopDiamondConnector REF 132   
        org.nlogo.sdm.gui.BindingConnection 2 815 336 909 366 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 135  
            org.jhotdraw.contrib.ChopDiamondConnector REF 118   
        org.nlogo.sdm.gui.BindingConnection 2 469 757 797 287 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 615  
            org.jhotdraw.contrib.ChopDiamondConnector REF 132   
        org.nlogo.sdm.gui.BindingConnection 2 469 757 900 328 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 615  
            org.jhotdraw.contrib.ChopDiamondConnector REF 128   
        org.nlogo.sdm.gui.BindingConnection 2 469 757 881 424 NULL NULL 0 0 0 
            org.nlogo.sdm.gui.ChopRateConnector REF 615  
            org.jhotdraw.contrib.ChopDiamondConnector REF 130   
        org.nlogo.sdm.gui.BindingConnection 2 413 73 331 67 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 55  
            org.nlogo.sdm.gui.ChopRateConnector REF 60   
        org.nlogo.sdm.gui.BindingConnection 2 136 534 190 539 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 549  
            org.nlogo.sdm.gui.ChopRateConnector REF 552   
        org.nlogo.sdm.gui.BindingConnection 2 343 563 267 578 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 187  
            org.nlogo.sdm.gui.ChopRateConnector REF 190   
        org.nlogo.sdm.gui.BindingConnection 2 458 359 500 338 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 203  
            org.nlogo.sdm.gui.ChopRateConnector REF 206   
        org.nlogo.sdm.gui.BindingConnection 2 763 302 815 336 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 126  
            org.nlogo.sdm.gui.ChopRateConnector REF 135   
        org.nlogo.sdm.gui.BindingConnection 2 952 214 896 202 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 319  
            org.nlogo.sdm.gui.ChopRateConnector REF 322   
        org.nlogo.sdm.gui.BindingConnection 2 1014 148 943 152 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 297  
            org.nlogo.sdm.gui.ChopRateConnector REF 300   
        org.nlogo.sdm.gui.BindingConnection 2 1152 98 1126 144 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 335  
            org.nlogo.sdm.gui.ChopRateConnector REF 338   
        org.nlogo.sdm.gui.BindingConnection 2 1117 231 1060 260 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 349  
            org.nlogo.sdm.gui.ChopRateConnector REF 352   
        org.nlogo.sdm.gui.BindingConnection 2 1110 473 1059 459 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 93  
            org.nlogo.sdm.gui.ChopRateConnector REF 96   
        org.nlogo.sdm.gui.BindingConnection 2 1039 645 1086 641 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 391  
            org.nlogo.sdm.gui.ChopRateConnector REF 394   
        org.nlogo.sdm.gui.BindingConnection 2 1089 735 1150 731 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 414  
            org.nlogo.sdm.gui.ChopRateConnector REF 417   
        org.nlogo.sdm.gui.BindingConnection 2 66 428 49 400 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 523  
            org.nlogo.sdm.gui.ChopRateConnector REF 526   
        org.nlogo.sdm.gui.BindingConnection 2 464 475 399 479 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 195  
            org.nlogo.sdm.gui.ChopRateConnector REF 198   
        org.nlogo.sdm.gui.BindingConnection 2 516 751 469 757 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 612  
            org.nlogo.sdm.gui.ChopRateConnector REF 615   
        org.nlogo.sdm.gui.BindingConnection 2 290 679 358 686 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 165  
            org.nlogo.sdm.gui.ChopRateConnector REF 168   
        org.nlogo.sdm.gui.BindingConnection 2 145 725 90 719 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 582  
            org.nlogo.sdm.gui.ChopRateConnector REF 585   
        org.nlogo.sdm.gui.BindingConnection 2 689 717 751 719 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 441  
            org.nlogo.sdm.gui.ChopRateConnector REF 444   
        org.nlogo.sdm.gui.BindingConnection 2 777 615 843 615 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 425  
            org.nlogo.sdm.gui.ChopRateConnector REF 428   
        org.nlogo.sdm.gui.BindingConnection 2 870 574 848 581 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 363  
            org.nlogo.sdm.gui.ChopRateConnector REF 366   
        org.nlogo.sdm.gui.BindingConnection 2 890 717 939 722 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 433  
            org.nlogo.sdm.gui.ChopRateConnector REF 436   
        org.nlogo.sdm.gui.BindingConnection 2 536 530 597 511 NULL NULL 0 0 0 
            org.jhotdraw.standard.ChopBoxConnector REF 179  
            org.nlogo.sdm.gui.ChopRateConnector REF 182
@#$#@#$#@
@#$#@#$#@
@#$#@#$#@
default
0.0
-0.2 0 0.0 1.0
0.0 1 1.0 0.0
0.2 0 0.0 1.0
link direction
true
0
Line -7500403 true 150 150 210 120
Line -7500403 true 150 150 90 120

fence
0.0
-0.2 0 0.0 1.0
0.0 1 1.0 0.0
0.2 0 0.0 1.0
link direction
false
0
Line -7500403 true 0 285 300 285
Line -7500403 true 0 270 300 270
Line -7500403 true 0 255 300 255

simple
0.0
-0.2 0 0.0 1.0
0.0 1 1.0 0.0
0.2 0 0.0 1.0
link direction
true
0
Line -7500403 true 150 150 90 180
Line -7500403 true 150 150 210 180

@#$#@#$#@
0
@#$#@#$#@