diff options
| author | rir <rirans@comcast.net> | 2025-06-10 09:57:50 -0400 |
|---|---|---|
| committer | rir <rirans@comcast.net> | 2025-06-10 09:59:10 -0400 |
| commit | fbc4c18079b8a34ffcea7e01c295972e84fd51ed (patch) | |
| tree | 7fafaec7baf48851f2395483950f331afea76141 | |
| parent | a9f099b09f5cd637d39b54abbd42dd0d49fe497d (diff) | |
| download | perlweeklychallenge-club-fbc4c18079b8a34ffcea7e01c295972e84fd51ed.tar.gz perlweeklychallenge-club-fbc4c18079b8a34ffcea7e01c295972e84fd51ed.tar.bz2 perlweeklychallenge-club-fbc4c18079b8a34ffcea7e01c295972e84fd51ed.zip | |
Delelte undef'ed type and unneeded 'sum'
| -rw-r--r-- | challenge-323/0rir/raku/ch-2.raku | 2 | ||||
| -rw-r--r-- | challenge-324/0rir/raku/ch-2.raku | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/challenge-323/0rir/raku/ch-2.raku b/challenge-323/0rir/raku/ch-2.raku index 1c7b7b7636..dd6c696896 100644 --- a/challenge-323/0rir/raku/ch-2.raku +++ b/challenge-323/0rir/raku/ch-2.raku @@ -46,7 +46,7 @@ plan +@Test; enum Bracket< LOWER UPPER RATE TX-BASE TX-IN TX-MAX>; # Cache and stack the brackets so only one bracket need be in tax calculation. -sub create-brackets( @sch -->Tax-schedule) { +sub create-brackets( @sch ) { my $idx = ^@sch; my @ret = @sch.Array.deepmap({$_}); diff --git a/challenge-324/0rir/raku/ch-2.raku b/challenge-324/0rir/raku/ch-2.raku index 918b5d228d..c56d81f5f2 100644 --- a/challenge-324/0rir/raku/ch-2.raku +++ b/challenge-324/0rir/raku/ch-2.raku @@ -51,7 +51,7 @@ my @Test = plan +@Test รท 2; sub task( @a where { **.are(Int) or ** ~~ Empty } -->Int:D) { - sum do for @a.combinations { sum [+^] $_ } +sum do for @a.combinations { [+^] $_ } } for @Test -> @in, $exp { |