RosettaCodeData/Task/Matrix-multiplication/Raku/matrix-multiplication-2.raku
2023-07-01 13:44:08 -04:00

11 lines
189 B
Raku

sub mmult(\a,\b) {
[
for ^a -> \r {
[
for ^b[0] -> \c {
[+] a[r;^b] Z* b[^b;c]
}
]
}
]
}