diff options
| author | Mark Anderson <mark@frontrangerunner.com> | 2020-09-13 09:54:07 -0600 |
|---|---|---|
| committer | Mark Anderson <mark@frontrangerunner.com> | 2020-09-13 09:54:07 -0600 |
| commit | 82dd7c66caab88a705f3d4c8e58322cdbebabc32 (patch) | |
| tree | 229e372484b6cc4378cc5602696bc8d260df4e06 /challenge-077 | |
| parent | 47f264e529509ce55a975040965bf8526acab5c4 (diff) | |
| download | perlweeklychallenge-club-82dd7c66caab88a705f3d4c8e58322cdbebabc32.tar.gz perlweeklychallenge-club-82dd7c66caab88a705f3d4c8e58322cdbebabc32.tar.bz2 perlweeklychallenge-club-82dd7c66caab88a705f3d4c8e58322cdbebabc32.zip | |
last minute improvement
Diffstat (limited to 'challenge-077')
| -rw-r--r-- | challenge-077/mark-anderson/raku/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-077/mark-anderson/raku/ch-1.raku b/challenge-077/mark-anderson/raku/ch-1.raku index 07c0f969e0..8dc6809155 100644 --- a/challenge-077/mark-anderson/raku/ch-1.raku +++ b/challenge-077/mark-anderson/raku/ch-1.raku @@ -1,4 +1,4 @@ -multi sub MAIN(UInt $N where 0 <= $N <= 2) { say $N } +multi sub MAIN(UInt $N where $N ~~ 1..2) { say $N } multi sub MAIN(UInt $N) { my @fib = (1, 2, * + * ... $N <= * + *); |