Matrix multiplication: Difference between revisions

Added Uiua solution
(Added Easylang)
(Added Uiua solution)
 
(2 intermediate revisions by one other user not shown)
Line 2,018:
=={{header|EasyLang}}==
<syntaxhighlight>
procfunc[][] matmul . m1[][] m2[][] r[][] .
r[][] = [ ]
for i to len m1[][]
r[][] &= [ ]
Line 2,029 ⟶ 2,028:
.
.
return r[][]
.
mat1a[][] = [ [ 1 2 3 ] [ 4 5 6 ] ]
mat2b[][] = [ [ 1 2 ] [ 3 4 ] [ 5 6 ] ]
print matmul mat1[][] mat2a[][] ergb[][]
print erg[][]
</syntaxhighlight>
 
Line 6,355 ⟶ 6,354:
[50, 40, 30, 20, 10],
[50, 40, 30, 20, 10]]
</pre>
 
=={{header|Uiua}}==
<syntaxhighlight lang="uiua">
MatMul ← ≡(≡(/+×)¤:⍉)¤
[[2 1 4]
[0 1 1]]
 
[[6 3 ¯1 0]
[1 1 0 4]
[¯2 5 0 2]]
MatMul
</syntaxhighlight>
{{out}}
<pre>
╭─
╷ 5 27 ¯2 12
¯1 6 0 6
</pre>
 
163

edits