Experiment in Clojure with text entropy