let
mem t key =
Hashtbl
.mem t.tbl key