val failwith : ('a, Stdlib.Format.formatter, unit, 'b) Stdlib.format4 -> 'a
val invalid_arg : ('a, Stdlib.Format.formatter, unit, 'b) Stdlib.format4 -> 'a
type 'a t = Stdlib.Format.formatter -> 'a -> unit
val pf :
Stdlib.Format.formatter ->
('a, Stdlib.Format.formatter, unit) Stdlib.format ->
'a
val str : ('a, Stdlib.Format.formatter, unit, string) Stdlib.format4 -> 'a
val kstr :
(string -> 'a) ->
('b, Stdlib.Format.formatter, unit, 'a) Stdlib.format4 ->
'b
val concat : ?sep:unit t -> 'a t list -> 'a t
val fmt :
('a, Stdlib.Format.formatter, unit) Stdlib.format ->
Stdlib.Format.formatter ->
'a
val any : (unit, Stdlib.Format.formatter, unit) Stdlib.format -> 'a t
val using : ('a -> 'b) -> 'b t -> 'a t