Updated the Haskell code in the readme