sig   val ansi_tty : bool Pervasives.ref   type 'a t = Format.formatter -> '-> unit   val pf :     Format.formatter -> ('a, Format.formatter, unit) Pervasives.format -> 'a   val string : string Omod.Private.Fmt.t   val list :     ?sep:unit Omod.Private.Fmt.t ->     'Omod.Private.Fmt.t -> 'a list Omod.Private.Fmt.t   val tty_str : mode:string -> string Omod.Private.Fmt.t   val faint : string Omod.Private.Fmt.t end