RosettaCodeData/Task/Forest-fire/Emacs-Lisp/forest-fire-2.l
2023-07-01 13:44:08 -04:00

7 lines
217 B
Common Lisp

((rows . 10)
(cols . 45)
(time . 100)
(skip . 10)
(f . 0.001) ;; probability tree ignites
(p . 0.01) ;; probability empty space fills with a tree
(tree . 0.5)) ;; initial probability of tree in a new world