diff options
| author | Humberto Massa <humbertomassa@gmail.com> | 2023-11-20 21:04:38 -0300 |
|---|---|---|
| committer | Humberto Massa <humbertomassa@gmail.com> | 2023-11-20 21:04:38 -0300 |
| commit | 8bbbebc2ec9fd10be92c92adb6064750ea4db3b6 (patch) | |
| tree | 1c0dfe123c16ab3e665eb0bf4eedb51cd6cf2133 | |
| parent | 8fc5eec0ac83df4f8c124db76bae817a707f1d81 (diff) | |
| download | perlweeklychallenge-club-8bbbebc2ec9fd10be92c92adb6064750ea4db3b6.tar.gz perlweeklychallenge-club-8bbbebc2ec9fd10be92c92adb6064750ea4db3b6.tar.bz2 perlweeklychallenge-club-8bbbebc2ec9fd10be92c92adb6064750ea4db3b6.zip | |
TIMTOWTDI
| -rw-r--r-- | challenge-244/massa/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-244/massa/ch-1.raku b/challenge-244/massa/ch-1.raku index 48b5bd84d0..f5759bc05d 100644 --- a/challenge-244/massa/ch-1.raku +++ b/challenge-244/massa/ch-1.raku @@ -49,7 +49,7 @@ each index. use v6.*; sub SOLUTION(@a) { - @a.map: -> $each { @a.grep(* < $each).elems } + (@a X> @a)ยป.Int.batch(+@a).map(*.sum) } multi MAIN (Bool :$test!) { |