Primality by Wilson's theorem: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,070: / Line 1,070: @@
 =={{header|Lua}}==
 <lang lua>-- primality by Wilson's theorem
 function isWilsonPrime( n )
     local fmodp = 1
-    for i = 1, n - 1 do
+    for i = 2, n - 1 do
         fmodp = fmodp * i
         fmodp = fmodp % n
     end
-    return (fmodp + 1 ) % n == 0
+    return fmodp == n - 1
 end
-for n = 2, 100 do
+for n = -1, 100 do
     if isWilsonPrime( n ) then
        io.write( " " .. n )