[Fractint] FOTD 23-07-12 (Sieve of Integers [7])