From 2df4e900d634718b16c17ae56ce27e7ec7eb070a Mon Sep 17 00:00:00 2001
From: Mark <53903062+andemark@users.noreply.github.com>
Date: Mon, 13 Nov 2023 18:52:46 +0000
Subject: ch-1.raku improved

---
 challenge-243/mark-anderson/raku/ch-1.raku | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/challenge-243/mark-anderson/raku/ch-1.raku b/challenge-243/mark-anderson/raku/ch-1.raku
index 06314407da..d150879507 100644
--- a/challenge-243/mark-anderson/raku/ch-1.raku
+++ b/challenge-243/mark-anderson/raku/ch-1.raku
@@ -11,13 +11,13 @@ sub reverse-pairs(*@a)
 {
     my $bag = @a.BagHash;
 
-    sum gather for @a -> $n
+    sum gather for @a -> $a
     { 
-        $bag{$n}--;
+        $bag{$a}--;
 
         for $bag.keys -> $k
         {
-            take $bag{$k} if $n > $k + $k 
+            take $bag{$k} if $a > $k + $k 
         }
     }
 }
-- 
cgit