Palindromic gapful numbers: Difference between revisions

Content deleted Content added

Inline

@@ Line 3,857: / Line 3,857: @@
 my @gappal = (1..9).map: -> \digit {
     my \divisor = digit + 10 * digit;
-    @npal.hyper.map: -> \this { next unless (my \test = digit ~ this ~ digit) %% divisor; test }
+    @npal.map: -> \this { next unless (my \test = digit ~ this ~ digit) %% divisor; test }
 }
@@ Line 3,866: / Line 3,866: @@
   ,"\n(Extra stretchy) 9,995th through 10,000th:", 9994..9999, 12
   ,"\n(Meh) 100,000th:",                                99999, 14
-).map: -> $caption, $range, $fmt {
+).hyper(:1batch).map: -> $caption, $range, $fmt {
     my $now = now;
     say $caption;