sig
  type 'a sformat = ('a, Stdlib.Format.formatter, unit) Stdlib.format
  type 'a formatter = Stdlib.Format.formatter -> 'a -> unit
  val pp_iter :
    ?pre:unit Pretty_memory.sformat ->
    ?sep:unit Pretty_memory.sformat ->
    ?suf:unit Pretty_memory.sformat ->
    ?format:('a Pretty_memory.formatter -> 'a -> unit) Pretty_memory.sformat ->
    (('a -> unit) -> 'b -> unit) ->
    'a Pretty_memory.formatter -> 'b Pretty_memory.formatter
  val pp_iter2 :
    ?pre:unit Pretty_memory.sformat ->
    ?sep:unit Pretty_memory.sformat ->
    ?suf:unit Pretty_memory.sformat ->
    ?format:('a Pretty_memory.formatter ->
             'a -> 'b Pretty_memory.formatter -> 'b -> unit)
            Pretty_memory.sformat ->
    (('a -> 'b -> unit) -> 'c -> unit) ->
    'a Pretty_memory.formatter ->
    'b Pretty_memory.formatter -> 'c Pretty_memory.formatter
end