diff options
| author | Ben Davies <kaiepi@outlook.com> | 2021-05-19 08:41:34 -0300 |
|---|---|---|
| committer | Ben Davies <kaiepi@outlook.com> | 2021-05-20 05:54:43 -0300 |
| commit | 9824ab7d8bf87b5b709c0fcb17535f74d4969b80 (patch) | |
| tree | fc3f6ddb031f98a3218d12c79399bd3025b2fc5c | |
| parent | b0ce0feda870abfcd9023c13cbc220635d8294d7 (diff) | |
| download | perlweeklychallenge-club-9824ab7d8bf87b5b709c0fcb17535f74d4969b80.tar.gz perlweeklychallenge-club-9824ab7d8bf87b5b709c0fcb17535f74d4969b80.tar.bz2 perlweeklychallenge-club-9824ab7d8bf87b5b709c0fcb17535f74d4969b80.zip | |
Type BTree[::T].sum as Numeric:D
Nit of Ben Davies' Raku solution for challenge 113.
| -rw-r--r-- | challenge-113/ben-davies/raku/ch-2.raku | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-113/ben-davies/raku/ch-2.raku b/challenge-113/ben-davies/raku/ch-2.raku index c0c2a05e3c..c58effc7a3 100644 --- a/challenge-113/ben-davies/raku/ch-2.raku +++ b/challenge-113/ben-davies/raku/ch-2.raku @@ -13,8 +13,8 @@ role BTree[::T] { self.new: |args } - multi method sum(::?ROLE:U: --> 0) { } - multi method sum(::?ROLE:D: --> Int:D) { $!value + $!left.sum + $!right.sum } + multi method sum(::?ROLE:U: --> 0) { } + multi method sum(::?ROLE:D: --> Numeric:D) { $!value + $!left.sum + $!right.sum } multi method map(::?ROLE:U: &f --> ::?ROLE:U) { self } multi method map(::?ROLE:D: &f --> ::?ROLE:D) { self.new: f($!value), L => $!left.map(&f), R => $!right.map(&f) } |