enclose :: Char -> Char -> Doc -> Doc
enclose left right x = char left <> x <> char right
enclose :: Char -> Char -> Doc -> Doc
enclose left right x = char left <> x <> char right
enclose left right x = char left <> x <> char right