-- | Inserts a blank line unless one exists already.
-- (@blankline <> blankline@ has the same effect as @blankline@.
-- If you want multiple blank lines, use @text "\\n\\n"@.
blankline :: Doc
blankline = Doc $ singleton BlankLine
blankline :: Doc
blankline = Doc $ singleton BlankLine
blankline = Doc $ singleton BlankLine