Add #4 solutions in Clojure and Haskell