From ca649ced4c0189d05327ac39c0cf81bee6e4db1c Mon Sep 17 00:00:00 2001
From: Mark Anderson <mark@frontrangerunner.com>
Date: Fri, 24 Jul 2020 04:25:17 -0600
Subject: Challenge 70 Solutions

---
 challenge-070/mark-anderson/raku/ch-2.raku | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/challenge-070/mark-anderson/raku/ch-2.raku b/challenge-070/mark-anderson/raku/ch-2.raku
index 97df7294d4..8e0a5c104c 100644
--- a/challenge-070/mark-anderson/raku/ch-2.raku
+++ b/challenge-070/mark-anderson/raku/ch-2.raku
@@ -3,16 +3,12 @@
 sub MAIN(UInt $N where 2 <= $N <= 5) {
     my @A = [0, 1];
 
-    loop {
-        state $C = 2;
-    
+    for 2..$N {
         my @S1 = @A.map("0" ~ *);
 
         my @S2 = @A.reverse.map("1" ~ *);
 
         @A = @S1.append(@S2);
-
-        last if $C++ == $N;
     }
 
     say @A.map({ ":2<$_>".Int }).Array; #https://tinyurl.com/y3nw4q5j 
-- 
cgit