module type Level = sig .. end
sig
end
val value_if_set : int option Pervasives.ref
int option Pervasives.ref
val get : unit -> int
unit -> int
val set : int -> unit
int -> unit