From 5b6caee89ff54943ee2172c349f475127b7ea34d Mon Sep 17 00:00:00 2001
From: BarrOff <58253563+BarrOff@users.noreply.github.com>
Date: Mon, 29 May 2023 00:09:01 +0200
Subject: feat: allow maximum product of `k` elements

---
 challenge-218/barroff/raku/ch-1.raku | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/challenge-218/barroff/raku/ch-1.raku b/challenge-218/barroff/raku/ch-1.raku
index b836ad597d..5f14669046 100644
--- a/challenge-218/barroff/raku/ch-1.raku
+++ b/challenge-218/barroff/raku/ch-1.raku
@@ -2,8 +2,8 @@
 
 use v6.d;
 
-sub maximum-product(Int:D @numbers where @numbers.elems ≥ 3 --> Int) {
-    return max(map({ [*] $_ }, @numbers.combinations(3)));
+sub maximum-product(Int:D @numbers where @numbers.elems ≥ 3, Int:D $k = 3 --> Int) {
+    return max(map({ [*] $_ }, @numbers.combinations($k)));
 }
 
 #| Run test cases
-- 
cgit