let mem t k = Hashtbl.mem t.table k