From 8bcc44355fcd02d7f3558d12ba3d792792adad2d Mon Sep 17 00:00:00 2001 From: Andrew Shitov Date: Mon, 23 Jun 2025 08:50:10 +0200 Subject: extra variable --- challenge-327/ash/raku/ch-2a.raku | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/challenge-327/ash/raku/ch-2a.raku b/challenge-327/ash/raku/ch-2a.raku index b9469d30e8..5da56beb51 100644 --- a/challenge-327/ash/raku/ch-2a.raku +++ b/challenge-327/ash/raku/ch-2a.raku @@ -6,8 +6,7 @@ say mad(1, 3, 7, 11, 15); # [(1 3)] say mad(1, 5, 3, 8); # [(1 3) (5 3)] sub mad(*@data) { - my @pairs = @data.combinations(2); - my $classification = @pairs.classify: {abs(.[0] - .[1])}; + my $classification = @data.combinations(2).classify: {abs(.[0] - .[1])}; my $min_diff = $classification.keys.min; return ($classification.first: *.key == $min_diff).value; -- cgit