2009-05-10 15:08:03 -04:00
|
|
|
USING: kernel math.primes.miller-rabin sequences tools.test ;
|
2009-05-10 13:24:43 -04:00
|
|
|
IN: math.primes.miller-rabin.tests
|
2007-09-20 18:09:08 -04:00
|
|
|
|
|
|
|
|
[ f ] [ 473155932665450549999756893736999469773678960651272093993257221235459777950185377130233556540099119926369437865330559863 miller-rabin ] unit-test
|
|
|
|
|
[ t ] [ 2 miller-rabin ] unit-test
|
|
|
|
|
[ t ] [ 3 miller-rabin ] unit-test
|
|
|
|
|
[ f ] [ 36 miller-rabin ] unit-test
|
|
|
|
|
[ t ] [ 37 miller-rabin ] unit-test
|
2009-02-22 20:41:47 -05:00
|
|
|
[ t ] [ 2135623355842621559 miller-rabin ] unit-test
|
2009-05-06 01:54:14 -04:00
|
|
|
|
|
|
|
|
[ f ] [ 1000 [ drop 15 miller-rabin ] any? ] unit-test
|
