diff options
| author | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-09-12 03:04:18 +0200 |
|---|---|---|
| committer | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-09-12 03:04:18 +0200 |
| commit | af409e4fbda948f36ccb39265301aa23d75d2641 (patch) | |
| tree | 31f131f85578982e5597f35effeefae0d0243bc0 | |
| parent | 14ff8f7593b85f21db546cf304c473148f0245f1 (diff) | |
| download | perlweeklychallenge-club-af409e4fbda948f36ccb39265301aa23d75d2641.tar.gz perlweeklychallenge-club-af409e4fbda948f36ccb39265301aa23d75d2641.tar.bz2 perlweeklychallenge-club-af409e4fbda948f36ccb39265301aa23d75d2641.zip | |
#2 initial
| -rw-r--r-- | challenge-077/markus-holzer/raku/ch-2.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-077/markus-holzer/raku/ch-2.raku b/challenge-077/markus-holzer/raku/ch-2.raku index 2e8917150e..4d36fbb2b5 100644 --- a/challenge-077/markus-holzer/raku/ch-2.raku +++ b/challenge-077/markus-holzer/raku/ch-2.raku @@ -9,6 +9,6 @@ sub stands-alone( $matrix, $x, $y ) { state @maybe-neighbours = (-1,-1), (-1,0), (-1,1), (0,-1), (0, 1), (1,-1), (1,0), (1,1); sub is-neighbour($c) { - $matrix[ $x + $c[0]; $y + $c[1] ] andthen $_ eq "X" } + $matrix[ $x + $c[0]; $y + $c[1] ] andthen $_ eq "X" } @maybe-neighbours.grep( &is-neighbour ) == 0 }
\ No newline at end of file |