module Verbose: sig .. end
sig
end
val on : unit -> unit
unit -> unit
val off : unit -> unit
val set : int -> unit
int -> unit
val put : ?level:int -> ('a, unit, string, unit) Pervasives.format4 -> 'a
?level:int -> ('a, unit, string, unit) Pervasives.format4 -> 'a