Wagstaff primes: Difference between revisions

m
→‎{{header|Raku}}: avoid needless stringification, better concurrency
m (→‎{{header|Raku}}: avoid needless stringification, better concurrency)
Line 91:
# However many I have patience for
 
my atomicint $count = 20;
 
hyper for @wagstaff[20] .. * {
next unless .is-prime;
say ++$count ~ ": $_ ({sprintf "%.2f", now - $elapsed})" and $elapsed = now if is-prime("{ (1 + 1 +< $_)/3}");
}</syntaxhighlight>
{{out}}
10,327

edits