let make compare = 
       {last = 0;
        arr = Array.make 100 ((0,0),0,0.0);
        hash = IntPairHash.create 100;
        compare = compare}