factor/extra/math/primes/solovay-strassen/solovay-strassen-tests.factor

USING: kernel math.primes math.primes.solovay-strassen sequences
tools.test ;

{ t } [
    100,000 <iota> [ solovay-strassen ] filter
    100,000 primes-upto =
] unit-test
more test IN: cleanup. 2018-02-15 11:45:08 -05:00			`USING: kernel math.primes math.primes.solovay-strassen sequences`
			`tools.test ;`
math.primes.solovay-strassen: adding Solovay-Strassen primality test. 2014-12-13 19:52:28 -05:00
			`{ t } [`
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota-tuple ... ; 2017-06-01 17:59:35 -04:00			`100,000 <iota> [ solovay-strassen ] filter`
math.primes.solovay-strassen: adding Solovay-Strassen primality test. 2014-12-13 19:52:28 -05:00			`100,000 primes-upto =`
			`] unit-test`