sig
type t
val fprint : string -> Format.formatter -> Printer.S.t -> unit
val print : string -> Printer.S.t -> unit
val dprint : Printer.S.t -> unit
val sprint : string -> Printer.S.t -> string
val to_string : Printer.S.t -> string
val from_fstring : string -> string -> Printer.S.t
val from_string : string -> Printer.S.t
end