A reinforcement learning algorithm implemented in clojure.