Nicer haskell.