Simple Markov Chain generator in Clojure