__   __ __  __  ____   ___      _________________________________________
||   || ||  || ||  || ||__      Hugs 98: Based on the Haskell 98 standard
||___|| ||__|| ||__||  __||     Copyright (c) 1994-2005
||---||         ___||           World Wide Web: http://haskell.org/hugs
||   ||                         Report bugs to: hugs-bugs@haskell.org
||   || Version: March 2005     _________________________________________

Hugs mode: Restart with command line option +98 for Haskell 98 mode

Type :? for help
Markup> Just [Text 'a',Text 'a',Text 'a',Markup [Text 'c',Text 'c',Text 'c',Markup [],Text 'd',Text 'd',Text 'd',Markup [Text 'f',Text 'f',Text 'f',Markup [Text 'i',Text 'i',Text 'i'],Text 'g',Text 'g',Text 'g',Markup [Text 'h',Text 'h',Text 'h']],Text 'e',Text 'e',Text 'e'],Text 'b',Text 'b',Text 'b']
Markup> [Leaving Hugs]