Permalink
Browse files

Reduce lichen growth rate.

  • Loading branch information...
1 parent 7f75147 commit 0fb12cc89ff9a5aca32fb6cf3b6313330301d00f @sjl committed Jul 13, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/caves/entities/lichen.clj
@@ -10,7 +10,7 @@
(->Lichen (get-id) "F" :green location 1))
(defn should-grow []
- (< (rand) 0.01))
+ (< (rand) (/ 1 500)))
(defn grow [lichen world]
(if-let [target (find-empty-neighbor world (:location lichen))]

0 comments on commit 0fb12cc

Please sign in to comment.