Add #6 solution in Clojure and Haskell