diff options
| author | Mark <53903062+andemark@users.noreply.github.com> | 2022-01-10 12:22:36 +0000 |
|---|---|---|
| committer | Mark <53903062+andemark@users.noreply.github.com> | 2022-01-10 12:22:36 +0000 |
| commit | f4e1ecce21d107101cb0d53bf700ac9ac34cbaa8 (patch) | |
| tree | 1d32b8ac6a192b6ddad8cc861d98aabb6b5f5a28 | |
| parent | fe78c723122108e7f1efb36ed8983b022cbe7463 (diff) | |
| download | perlweeklychallenge-club-f4e1ecce21d107101cb0d53bf700ac9ac34cbaa8.tar.gz perlweeklychallenge-club-f4e1ecce21d107101cb0d53bf700ac9ac34cbaa8.tar.bz2 perlweeklychallenge-club-f4e1ecce21d107101cb0d53bf700ac9ac34cbaa8.zip | |
initial 147
| -rw-r--r-- | challenge-147/mark-anderson/raku/ch-1.raku | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/challenge-147/mark-anderson/raku/ch-1.raku b/challenge-147/mark-anderson/raku/ch-1.raku index 5780420a53..08ec5151c8 100644 --- a/challenge-147/mark-anderson/raku/ch-1.raku +++ b/challenge-147/mark-anderson/raku/ch-1.raku @@ -1,15 +1,15 @@ #!/usr/bin/env raku -say (1, 2, 3, { $_ + 2 } ... *).grep(&tp).head(20); +say (2, 3, { $_ + 2 } ... *).grep(&tp).head(20); multi tp(\n where *.index: 0) { - return False; + False; } multi tp(\n where * < 10) { - return n.is-prime + n.is-prime } multi tp(\n) |