printDocument :: TurtleDocument -> Doc
printDocument doc = (vcat . map pretty) (statements doc)
printDocument :: TurtleDocument -> Doc
printDocument doc = (vcat . map pretty) (statements doc)
printDocument doc = (vcat . map pretty) (statements doc)