modified clojure script into haskell version