>>312
function TPrimeListTBitsTripleOverCompress.AccessInsideIndex(
　OutSideIndex: Integer): Integer;
begin
　Result := ((OutSideIndex div 6)*2)
　　　　　　+
　　　　　　((OutSideIndex mod 6) div 5);
end;
こんな感じだと思ってたのですが、
これって、x div 3 なのでしょうか？

|,,∧　　･　・　・　・　
|Дﾟ彡
|　U
|　ﾐ 　　　
| U