Printable.SimpleShow
module P : Showable
val pretty : unit -> P.t -> Pretty.doc
val printXml : 'a BatInnerIO.output -> P.t -> unit
val to_yojson : P.t -> [> `String of string ]