4 lines
91 B
Raku
4 lines
91 B
Raku
sub infix:<×>(@A, @B) {
|
||
cross(@A, ([Z] @B), with => { [+] @^a Z* @^b })
|
||
.rotor(@B);
|
||
}
|