Select Code to Download

multi infix:<XX> (@a, @b) is equiv(&infix:<¥>) {
    @a.map: -> $a {
...
        }
    }
}

my @dir = map -> $i { [map {$i*$_}, 0..3] }, 1, 22, 21, 20;
my @data = map { .comb, 0 }, @DATA;
...
        take int [*] @data[ $^base »+« $^offs ];
    }
}