Bucket0.With_debug
val find : bucket -> int -> int option
val insert : bucket -> int -> int -> [ `Ok | `Split of (int * int) list * int * (int * int) list ]