val equal : t -> t -> Ppx_deriving_runtime.bool
val compare : t -> t -> Ppx_deriving_runtime.int
val name : unit -> string
val pretty : unit -> (Base.t * User.t) -> Printable.Pretty.doc
val printXml : 'a BatInnerIO.output -> (Base.t * User.t) -> unit
val to_yojson :
(Base.t * User.t) ->
[> `Assoc of (string * Yojson.Safe.t) list ]