Int.List
val mem : int -> int list -> bool
val assoc : int -> (int * 'a) list -> 'a
val mem_assoc : int -> (int * 'a) list -> bool
val remove_assoc : int -> (int * 'a) list -> (int * 'a) list