diff options
| author | Mohammad Sajid Anwar <Mohammad.Anwar@yahoo.com> | 2024-05-21 17:04:20 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2024-05-21 17:04:20 +0100 |
| commit | 241729fdaf1c04db74ecf3fa89fc5b9927c408f0 (patch) | |
| tree | 7ec2466bf55e169008ea534aa95caa4231142f1e | |
| parent | 13b258ab4b316df1d7c5311ed0dee51b5d2e9dcf (diff) | |
| parent | 031c5366cd5c188ab49a2e5b739374a0cdde7774 (diff) | |
| download | perlweeklychallenge-club-241729fdaf1c04db74ecf3fa89fc5b9927c408f0.tar.gz perlweeklychallenge-club-241729fdaf1c04db74ecf3fa89fc5b9927c408f0.tar.bz2 perlweeklychallenge-club-241729fdaf1c04db74ecf3fa89fc5b9927c408f0.zip | |
Merge pull request #10130 from andemark/challenge-270
ch-1.raku was not correct
| -rw-r--r-- | challenge-270/mark-anderson/raku/ch-1.raku | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/challenge-270/mark-anderson/raku/ch-1.raku b/challenge-270/mark-anderson/raku/ch-1.raku deleted file mode 100644 index 6503db87f3..0000000000 --- a/challenge-270/mark-anderson/raku/ch-1.raku +++ /dev/null @@ -1,20 +0,0 @@ -#!/usr/bin/env raku -use Test; - -is special-positions([ - [1,0,0], - [0,0,1], - [1,0,0], - ]), 1; - -is special-positions([ - [1,0,0], - [0,1,0], - [0,0,1], - ]), 3; - -sub special-positions(@m) -{ - @m .= grep(*.one); - + ([Z] @m).grep(*.one) -} |