diff options
| author | Mark A <andemark@a-iot1t.uch.ad.pvt> | 2021-08-10 20:06:47 -0600 |
|---|---|---|
| committer | Mark A <andemark@a-iot1t.uch.ad.pvt> | 2021-08-10 20:06:47 -0600 |
| commit | 3840e4e70137475f998f63739d3c576ae10aa8b6 (patch) | |
| tree | d24af0d4005a77938df3c6316f9726ebcf7cca85 | |
| parent | 5554bb00d92bee7f864f8d6051ddfb6281386087 (diff) | |
| download | perlweeklychallenge-club-3840e4e70137475f998f63739d3c576ae10aa8b6.tar.gz perlweeklychallenge-club-3840e4e70137475f998f63739d3c576ae10aa8b6.tar.bz2 perlweeklychallenge-club-3840e4e70137475f998f63739d3c576ae10aa8b6.zip | |
ch-1.raku
| -rw-r--r-- | challenge-125/mark-anderson/raku/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-125/mark-anderson/raku/ch-1.raku b/challenge-125/mark-anderson/raku/ch-1.raku index 510bd3cf53..5841262eff 100644 --- a/challenge-125/mark-anderson/raku/ch-1.raku +++ b/challenge-125/mark-anderson/raku/ch-1.raku @@ -50,7 +50,7 @@ multi py-tris($N where * > 0) sub factor-pairs($n) { - grep ({ $n %% $_ }), 1..^sqrt($n) + grep { $n %% $_ }, 1..^sqrt($n) andthen .map({ $_, $n div $_ }); } |