Module Verbosity

module Verbosity: sig .. end

val verbosity : [ `High | `Low ] Pervasives.ref
val set_verbosity : [ `High | `Low ] -> unit
val print_high : ('a, Pervasives.out_channel, unit) Pervasives.format -> 'a