module Stop_at_nth: sig .. end
sig
end
val clear : unit -> unit
unit -> unit
val incr : unit -> bool
unit -> bool