sig
  val pretty :
    'Pretty_utils.formatter -> 'Layout.cluster Pretty_utils.formatter
  val deref : pointed:'Lazy.t -> Layout.deref -> 'Layout.cluster
  val shift :
    Layout.Offset.cache ->
    'Pretty_utils.formatter ->
    Layout.offset ->
    '-> inline:bool -> 'Layout.cluster -> 'Layout.layout
  val merge :
    'Pretty_utils.formatter ->
    'Layout.merger ->
    'Layout.cluster -> 'Layout.cluster -> 'Layout.cluster
  val is_empty : 'Layout.cluster -> bool
  val is_garbled : 'Layout.cluster -> bool
  val reshape :
    eq:('-> '-> bool) ->
    flat:bool -> pack:bool -> 'Layout.cluster -> 'Layout.cluster
end