Extending haskell output