RosettaCodeData/Task/Matrix-multiplication/EasyLang/matrix-multiplication.easy

16 lines
333 B
Text
Raw Permalink Normal View History

2024-07-13 15:19:22 -07:00
func[][] matmul m1[][] m2[][] .
2024-03-06 22:25:12 -08:00
for i to len m1[][]
r[][] &= [ ]
for j = 1 to len m2[1][]
r[i][] &= 0
for k to len m2[][]
r[i][j] += m1[i][k] * m2[k][j]
.
.
.
2024-07-13 15:19:22 -07:00
return r[][]
2024-03-06 22:25:12 -08:00
.
2024-07-13 15:19:22 -07:00
a[][] = [ [ 1 2 3 ] [ 4 5 6 ] ]
b[][] = [ [ 1 2 ] [ 3 4 ] [ 5 6 ] ]
print matmul a[][] b[][]