|
@@ -108,9 +108,6 @@ begin
|
|
|
bits := GetCombSize(c);
|
|
bits := GetCombSize(c);
|
|
|
d := (bits + minWidth - 1) div minWidth;
|
|
d := (bits + minWidth - 1) div minWidth;
|
|
|
|
|
|
|
|
- raise Exception.Create(c.order.ToString + ' DABA ' + IntToStr(bits) +
|
|
|
|
|
- ' DABA ' + IntToStr(d));
|
|
|
|
|
-
|
|
|
|
|
System.SetLength(pow2Table, minWidth + 1);
|
|
System.SetLength(pow2Table, minWidth + 1);
|
|
|
|
|
|
|
|
pow2Table[0] := p;
|
|
pow2Table[0] := p;
|
|
@@ -119,6 +116,11 @@ begin
|
|
|
pow2Table[i] := pow2Table[i - 1].TimesPow2(d);
|
|
pow2Table[i] := pow2Table[i - 1].TimesPow2(d);
|
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
|
|
+ raise Exception.Create(pow2Table[0].ToString + ' DABA ' + pow2Table[1]
|
|
|
|
|
+ .ToString + ' DABA ' + pow2Table[2].ToString + ' DABA ' + pow2Table[3]
|
|
|
|
|
+ .ToString + ' DABA ' + pow2Table[4].ToString + ' DABA ' + pow2Table[5]
|
|
|
|
|
+ .ToString);
|
|
|
|
|
+
|
|
|
// This will be the 'offset' value
|
|
// This will be the 'offset' value
|
|
|
pow2Table[minWidth] := pow2Table[0].Subtract(pow2Table[1]);
|
|
pow2Table[minWidth] := pow2Table[0].Subtract(pow2Table[1]);
|
|
|
|
|
|