Merge branch 'master' of git@github.com:prunedtree/factor
Conflicts: basis/math/matrices/matrices.factordb4
commit
bf15648b4d
basis/math/matrices
|
@ -106,4 +106,7 @@ USING: math.matrices math.vectors tools.test math ;
|
|||
[ { 1 0 0 } ] [ { 1 1 0 } { 1 0 0 } proj ] unit-test
|
||||
|
||||
[ { { { 1 "a" } { 1 "b" } } { { 2 "a" } { 2 "b" } } } ]
|
||||
[ { 1 2 } { "a" "b" } cross-zip ] unit-test
|
||||
[ { 1 2 } { "a" "b" } cross-zip ] unit-test
|
||||
|
||||
[ { { 4181 6765 } { 6765 10946 } } ]
|
||||
[ { { 0 1 } { 1 1 } } 20 m^n ] unit-test
|
||||
|
|
|
@ -139,4 +139,4 @@ PRIVATE>
|
|||
|
||||
: m^n ( m n -- n )
|
||||
make-bits over first length identity-matrix
|
||||
[ [ dupd m. ] when [ dup m. ] dip ] reduce nip ;
|
||||
[ [ dupd m. ] when [ dup m. ] dip ] reduce nip ;
|
Loading…
Reference in New Issue