aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--challenge-207/mark-anderson/raku/ch-2.raku6
1 files changed, 3 insertions, 3 deletions
diff --git a/challenge-207/mark-anderson/raku/ch-2.raku b/challenge-207/mark-anderson/raku/ch-2.raku
index c7daf9dfd7..e8e5fe332b 100644
--- a/challenge-207/mark-anderson/raku/ch-2.raku
+++ b/challenge-207/mark-anderson/raku/ch-2.raku
@@ -6,12 +6,12 @@ is h-index(25, 8, 5, 3, 3), 3;
is h-index(25, 8, 3, 3, 3), 3;
is h-index(3), 1;
is h-index(3, 2), 2;
-is h-index(0, 0, 0, 0, 0), 0;
-is h-index(0, 0, 0, 0, 1), 1;
+is h-index(0, 0, 0), 0;
+is h-index(0, 0, 0, 1), 1;
is h-index(1, 1, 1, 1, 1), 1;
is h-index(9, 9, 9, 9, 9), 5;
sub h-index(*@a)
{
- .sort(-*).pairs.first({ .key >= .value }).key // .elems given @a
+ @a.sort(-*).pairs.first({ .key < .value }, :end).key.succ // 0
}