Wieferich primes: Difference between revisions

Content added Content deleted

Inline

@@ Line 559: / Line 559: @@
    return 1
 .
-func weiferich p .
+func wieferich p .
    if isprim p = 0
       return 0
@@ Line 575: / Line 575: @@
 print "Wieferich primes less than 5000: "
 for i = 2 to 5000
-   if weiferich i = 1
+   if wieferich i = 1
       print i
    .