Miou_fmt
val failwith : ('a, Format.formatter, unit, 'b) format4 -> 'a
val invalid_arg : ('a, Format.formatter, unit, 'b) format4 -> 'a
type 'a t = Format.formatter -> 'a -> unit
val pf : Format.formatter -> ('a, Format.formatter, unit) format -> 'a
val str : ('a, Format.formatter, unit, string) format4 -> 'a
val kstr : (string -> 'a) -> ('b, Format.formatter, unit, 'a) format4 -> 'b
val fmt : ('a, Format.formatter, unit) format -> Format.formatter -> 'a
val any : (unit, Format.formatter, unit) format -> 'a t