Clojure solution for #1