Haskell fixes