From 4cc208edb1a261e8e4d8f68bc182b249948a9699 Mon Sep 17 00:00:00 2001
From: Mark A <andemark@a-iot1t.uch.ad.pvt>
Date: Tue, 2 Mar 2021 16:30:20 -0700
Subject: ch-2.raku

---
 challenge-102/mark-anderson/raku/ch-2.raku | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

diff --git a/challenge-102/mark-anderson/raku/ch-2.raku b/challenge-102/mark-anderson/raku/ch-2.raku
index 01b42937a4..d178f1ed25 100644
--- a/challenge-102/mark-anderson/raku/ch-2.raku
+++ b/challenge-102/mark-anderson/raku/ch-2.raku
@@ -37,13 +37,9 @@ sub hash-string(UInt $n where $n > 0) is cached
 {
     given $n 
     {
-        when 1 { "#"   }
-        when 2 { "2#"  }
-        when 3 { "#3#" }
-        default 
-        {
-            my $next = $n - $n.chars - 1;
-            hash-string($next) ~ $n ~ "#";    
-        }
+        when 1  { "#"                                        }
+        when 2  { "2#"                                       }
+        when 3  { "#3#"                                      }
+        default { hash-string($n - $n.chars - 1) ~ $n ~ "#"  }
     }
 }    
-- 
cgit