diff options
| -rw-r--r-- | challenge-082/mark-anderson/raku/ch-2.p6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-082/mark-anderson/raku/ch-2.p6 b/challenge-082/mark-anderson/raku/ch-2.p6 index 71b213811a..027ec71106 100644 --- a/challenge-082/mark-anderson/raku/ch-2.p6 +++ b/challenge-082/mark-anderson/raku/ch-2.p6 @@ -13,7 +13,7 @@ sub is-interleaved($A, $B, $C) { return 0 unless $C.chars; my ($a, $b, $c) = map { .substr: 0, 1 }, ($A, $B, $C); - my ($a-rest, $b-rest, $c-rest) = map { .substr: 1 }, ($A, $B, $C); + my ($a-rest, $b-rest, $c-rest) = map { .substr: 1 }, ($A, $B, $C); return +($a eq $c and is-interleaved($a-rest, $B, $c-rest)) || +($b eq $c and is-interleaved($A, $b-rest, $c-rest)); |