sig
  type ('a, 'b) t
  val pp :
    'a CCFormat.printer ->
    'b CCFormat.printer -> ('a, 'b) Interfaces.PRINT2.t CCFormat.printer
  val to_string :
    'a CCFormat.printer ->
    'b CCFormat.printer -> ('a, 'b) Interfaces.PRINT2.t -> string
end