3 lines
83 B
Raku
3 lines
83 B
Raku
multi infix:<×> (@A, @B) {
|
||
@A.map: -> @a { do [+] @a Z× @B[*;$_] for ^@B[0] }
|
||
}
|