Airline System Dynamics II - Chaos

;; system-dynamics-setup, system-dynamics-do-plot, and system-dynamics-go are automatically
;; generated by the System Dynamics Modeler.  The code can be viewed in the
;; Code Tab of the System Dynamics Modeler.

globals [market_share_1
         market_share_2
         market_share_3
         market_share_4
         Total_Fitness]

to setup
  clear-all
  system-dynamics-setup
end 

to go
  system-dynamics-go
  set Total_Fitness Company1 + Company2 + Company3 + Company4

  set market_share_1 Company1 / Total_Fitness
  set market_share_2 Company2 / Total_Fitness
  set market_share_3 Company3 / Total_Fitness
  set market_share_4 Company4 / Total_Fitness

  if ticks >= transient

  [ set-current-plot "Company 1"
    plot market_share_1
    set-current-plot "Company 2"
    plot market_share_2
    set-current-plot "Company 3"
    plot market_share_3
    set-current-plot "Company 4"
    plot market_share_4

   set-current-plot "Company 1 vs Company 2"
   plotxy market_share_1 market_share_2
   set-current-plot "Company 1 vs Company 3"
   plotxy market_share_1 market_share_3
   set-current-plot "Company 1 vs Company 4"
   plotxy market_share_1 market_share_4
  ]
end 


; Copyright 2005 Uri Wilensky.
; See Info tab for full copyright and license.