A Haskell implementation of Google's MapReduce system