diff options
| -rw-r--r-- | challenge-088/mark-anderson/raku/ch-2.p6 | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/challenge-088/mark-anderson/raku/ch-2.p6 b/challenge-088/mark-anderson/raku/ch-2.p6 index 09abf9c7be..23a4269fd5 100644 --- a/challenge-088/mark-anderson/raku/ch-2.p6 +++ b/challenge-088/mark-anderson/raku/ch-2.p6 @@ -1,8 +1,3 @@ -# -# Abandoning my atrocious solution and going with the -# method used by James Smith, Feng Chang, (and possibly others) -# - use Test; plan 4; @@ -32,6 +27,10 @@ cmp-ok spiral(@matrix), &[eqv], [1, 2, 4, 6, 8, 7, 5, 3], "Rows > Cols"; cmp-ok spiral(@matrix), &[eqv], [1, 2, 3, 4, 8, 7, 6, 5], "Cols > Rows"; +# +# Abandoning my atrocious solution and going with the +# method used by James Smith, Feng Chang, (and possibly others) +# sub spiral(@matrix) { my @r; |