let
hash q =
Z
.to_int (
Z
.add (
Q
.get_den q) (
Q
.get_num q))
land
0x3FFFFFF