let
length t =
Hashtbl
.length t.table