tidy up haskell section a little