class TextLike a where 


class TextLike a => DocLike a where 


tshow :: (Show a, DocLike b) => a > b 

lparen :: TextLike a => a 

rparen :: TextLike a => a 

langle :: TextLike a => a 

rangle :: TextLike a => a 

lbrace :: TextLike a => a 

rbrace :: TextLike a => a 

lbracket :: TextLike a => a 

rbracket :: TextLike a => a 

squote :: TextLike a => a 

dquote :: TextLike a => a 

semi :: TextLike a => a 

colon :: TextLike a => a 

comma :: TextLike a => a 

space :: TextLike a => a 

dot :: TextLike a => a 

backslash :: TextLike a => a 

equals :: TextLike a => a 