Truncatable primes: Difference between revisions

Content deleted Content added

Inline

@@ Line 1,208: / Line 1,208: @@
-sub is_tprime {
+sub is_tprime { # Absence of zeroes is tested outside the sub.
     my ($n, $side) = @_;
     return (is_prime($n)