Implementation of Markov-chains in Clojure