sig   type 'a seq   val empty : 'B0.Json.seq   val ( ++ ) : 'B0.Json.seq -> 'B0.Json.seq -> 'B0.Json.seq   type t   type mem   type el   val null : B0.Json.t   val bool : bool -> B0.Json.t   val int : int -> B0.Json.t   val str : string -> B0.Json.t   val el : B0.Json.t -> B0.Json.el B0.Json.seq   val el_if : bool -> (unit -> B0.Json.t) -> B0.Json.el B0.Json.seq   val arr : B0.Json.el B0.Json.seq -> B0.Json.t   val mem : string -> B0.Json.t -> B0.Json.mem B0.Json.seq   val mem_if :     bool -> string -> (unit -> B0.Json.t) -> B0.Json.mem B0.Json.seq   val obj : B0.Json.mem B0.Json.seq -> B0.Json.t   val buffer_add : Buffer.t -> B0.Json.t -> unit   val to_string : B0.Json.t -> string   val output : Pervasives.out_channel -> B0.Json.t -> unit end