Simulation of Avaus-TV prize draw, in Clojure