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