diff options
| author | Konrad Hinsen <konrad.hinsen@laposte.net> | 2009-03-20 10:46:17 +0000 |
|---|---|---|
| committer | Konrad Hinsen <konrad.hinsen@laposte.net> | 2009-03-20 10:46:17 +0000 |
| commit | 0a694e70f36ce6986ec8b21846426ff17d3aabc2 (patch) | |
| tree | 17fa66882941de556c28d4d26a29d005dfc3377f /src/clojure/contrib/monads/examples.clj | |
| parent | 19613025d233b5f445b1dd3460c4128f39218741 (diff) | |
monads: new state monad functions for working with maps
Diffstat (limited to 'src/clojure/contrib/monads/examples.clj')
| -rw-r--r-- | src/clojure/contrib/monads/examples.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/monads/examples.clj b/src/clojure/contrib/monads/examples.clj index 2d3dbb12..850fc19d 100644 --- a/src/clojure/contrib/monads/examples.clj +++ b/src/clojure/contrib/monads/examples.clj @@ -152,7 +152,7 @@ (let [m 259200 value (/ (float seed) (float m)) next (rem (+ 54773 (* 7141 seed)) m)] - (list value next))) + [value next])) ; We define a convenience function that creates an infinite lazy seq ; of values obtained from iteratively applying a state monad value. |