(* Auto-generated from "ban.atd" *) [@@@ocaml.warning "-27-32-35-39"] type user = User_t.t type t = Ban_t.t = { reason: string option; user: user } val write_user : Bi_outbuf.t -> user -> unit (** Output a JSON value of type {!user}. *) val string_of_user : ?len:int -> user -> string (** Serialize a value of type {!user} into a JSON string. @param len specifies the initial length of the buffer used internally. Default: 1024. *) val read_user : Yojson.Safe.lexer_state -> Lexing.lexbuf -> user (** Input JSON data of type {!user}. *) val user_of_string : string -> user (** Deserialize JSON data of type {!user}. *) val write_t : Bi_outbuf.t -> t -> unit (** Output a JSON value of type {!t}. *) val string_of_t : ?len:int -> t -> string (** Serialize a value of type {!t} into a JSON string. @param len specifies the initial length of the buffer used internally. Default: 1024. *) val read_t : Yojson.Safe.lexer_state -> Lexing.lexbuf -> t (** Input JSON data of type {!t}. *) val t_of_string : string -> t (** Deserialize JSON data of type {!t}. *)