[Haskell] monads, records, verbosity