with Ints; use Ints; package Mods is -- determining size of hash table for stored volumes -- Prim: constant Int := 15000017; -- for 520MB on 32 bit machines -- Prim: constant Int := 53000011; -- for 1.8GB on 64 bit machines Prim: constant Int := 110000017; -- for 3.7GB on 64 bit machines type PMod is mod Prim; PFac: constant PMod := PMod(2**16)**2; end Mods;