sig
  val pp :
    ?flush:bool ->
    ?first:string ->
    ?last:string ->
    ?sep:string ->
    ?indent:int ->
    (Format.formatter -> '-> 'b) -> Format.formatter -> 'a list -> unit
end