sig
  type t = [ `Debug | `Error | `Info ]
  val of_string : string -> t
  val to_string : t -> string
  val t_of_sexp : Sexplib.Sexp.t -> Log.Level.t
  val t_of_sexp__ : Sexplib.Sexp.t -> Log.Level.t
  val sexp_of_t : Log.Level.t -> Sexplib.Sexp.t
end