UU.PPrint
data Doc
class Pretty a
data SimpleDoc