sig
  val pretty :
    'Pretty_utils.formatter -> 'Layout.range Pretty_utils.formatter
  val overlap :
    'Pretty_utils.formatter ->
    'Layout.merger -> 'Layout.range -> 'Layout.range -> 'Layout.range
  val included : int -> int -> 'Layout.range -> bool
end