Data update
This commit is contained in:
parent
ed705008a8
commit
0df55f9f24
2196 changed files with 32999 additions and 3075 deletions
|
|
@ -0,0 +1,16 @@
|
|||
proc matmul . m1[][] m2[][] r[][] .
|
||||
r[][] = [ ]
|
||||
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]
|
||||
.
|
||||
.
|
||||
.
|
||||
.
|
||||
mat1[][] = [ [ 1 2 3 ] [ 4 5 6 ] ]
|
||||
mat2[][] = [ [ 1 2 ] [ 3 4 ] [ 5 6 ] ]
|
||||
matmul mat1[][] mat2[][] erg[][]
|
||||
print erg[][]
|
||||
|
|
@ -1,4 +1,2 @@
|
|||
sub infix:<×>(@A, @B) {
|
||||
cross(@A, ([Z] @B), with => { [+] @^a Z* @^b })
|
||||
.rotor(@B);
|
||||
}
|
||||
sub infix:<·> { [+] @^a Z* @^b }
|
||||
sub infix:<×>(@A, @B) { (@A X· [Z] @B).rotor(@B) }
|
||||
|
|
|
|||
|
|
@ -1,5 +1,5 @@
|
|||
import "/matrix" for Matrix
|
||||
import "/fmt" for Fmt
|
||||
import "./matrix" for Matrix
|
||||
import "./fmt" for Fmt
|
||||
|
||||
var a = Matrix.new([
|
||||
[1, 2],
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue