Truncatable primes: Difference between revisions

Content deleted Content added

Inline

@@ Line 250: / Line 250: @@
 }
-sub trunc_prime ($type, $limit) {
+sub trunc_prime ($type, $limit is copy) {
-    my $odd = $limit + ($limit % 2 ?? 0 !! 1);
+    $limit += ($limit % 2 ?? 0 !! 1);
-    for ($odd, * - 2 ... * < 2) -> $loop {
+    for ($limit, * - 2 ... * < 2 ) -> $loop {
         next if $loop ~~ /0/; # No zeros allowed
         my $this = $loop;