Miller–Rabin primality test: Difference between revisions
Content added Content deleted
m (→{{header|Perl 6}}: minor style) |
|||
Line 1,675: | Line 1,675: | ||
=={{header|Ruby}}== |
=={{header|Ruby}}== |
||
<lang ruby>def miller_rabin_prime?(n,k) |
<lang ruby>def miller_rabin_prime?(n,k) |
||
return true if n == 2 |
|||
return false if n < 2 or n % 2 == 0 |
|||
d = n - 1 |
d = n - 1 |
||
s = 0 |
s = 0 |
||
Line 1,697: | Line 1,695: | ||
end |
end |
||
p primes = ( |
p primes = (3..1000).step(2).find_all {|i| miller_rabin_prime?(i,10)} |
||
</lang> |
|||
{{out}} |
{{out}} |
||
<pre>[ |
<pre>[3, 5, 7, 11, 13, 17, ..., 971, 977, 983, 991, 997]</pre> |
||
=={{header|Run BASIC}}== |
=={{header|Run BASIC}}== |