sig type 'a t val pp : 'a CCFormat.printer -> 'a Interfaces.PRINT1.t CCFormat.printer val to_string : 'a CCFormat.printer -> 'a Interfaces.PRINT1.t -> string end