Miou_fmtval failwith : ('a, Format.formatter, unit, 'b) format4 -> 'aval invalid_arg : ('a, Format.formatter, unit, 'b) format4 -> 'atype 'a t = Format.formatter -> 'a -> unitval pf : Format.formatter -> ('a, Format.formatter, unit) format -> 'aval str : ('a, Format.formatter, unit, string) format4 -> 'aval kstr : (string -> 'a) -> ('b, Format.formatter, unit, 'a) format4 -> 'bval fmt : ('a, Format.formatter, unit) format -> Format.formatter -> 'aval any : (unit, Format.formatter, unit) format -> 'a t