simon/mw-engine
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

And another one introduced... and fixed.

Browse source
This commit is contained in:
simon 2014-07-04 09:46:13 +01:00
parent 8593289a7b
commit ac92181ab3
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/mw_engine/natural_rules.clj
View file

@ -93,7 +93,7 @@
(= (population cell :deer) 0) (= (population cell :deer) 0)
(>= n 2)) (>= n 2))
(merge cell {:deer (int (/ n 2))})))) (merge cell {:deer (int (/ n 2))}))))
deer breed. ;; deer breed.
(fn [cell world] (fn [cell world]
(cond (cond
(>= (population cell :deer) 2) (>= (population cell :deer) 2)
@ -120,7 +120,7 @@
(= (population cell :wolves) 0) (= (population cell :wolves) 0)
(>= n 2)) (>= n 2))
(merge cell {:wolves 2})))) (merge cell {:wolves 2}))))
wolves breed. ;; wolves breed.
(fn [cell world] (fn [cell world]
(cond (cond
(>= (population cell :wolves) 2) (>= (population cell :wolves) 2)