An implementation of 2048 in Clojure