Explicitly flatten in Sierpinski triangle

Raku · Aug 23, 2015 · 3a4034c · 3a4034c
1 parent 5b958fe
commit 3a4034c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/rosettacode/sierpinski_triangle.t b/rosettacode/sierpinski_triangle.t
@@ -12,7 +12,7 @@ sub sierpinski ($n) {
     my @down  = '*';
     my $space = ' ';
     for ^$n {
-        @down = @down.map({"$space$_$space"}), @down.map({"$_ $_"});
+        @down = flat @down.map({"$space$_$space"}), @down.map({"$_ $_"});
         $space ~= $space;
     }
     return @down;