Primality by Wilson's theorem: Difference between revisions
m
→{{header|Julia}}
Line 182:
=={{header|Julia}}==
<lang julia>function
(p < 2 || (p > 2 && iseven(p))) && return false
modfact, n = one(p), p - 1
while n > 0
m = n % p
for i in 1:m
end
isodd(n ÷= p) && (
end
return
end
function nwilsonprimesabove(N, bottom=1)
| |||