-- | Returns the height of a block or other 'Doc'.
height :: Doc -> Int
height = length . lines . render Nothing
height :: Doc -> Int
height = length . lines . render Nothing
height = length . lines . render Nothing