steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

math.matrices: use any? and all? directly in tests.

master
John Benediktsson 2020-01-28 20:44:19 -08:00
parent 464f0a11ef
commit dfdbde9f33
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basis/math/matrices/matrices-tests.factor
View File

@ -33,7 +33,7 @@ PRIVATE>
{ { { } } } { { { } } }
{ { } { } { } } { { } { } { } }
{ { { } } { { { } } } } { { { } } { { { } } } }
} [ null-matrix? ] map [ ] all? } [ null-matrix? ] all?
] unit-test ] unit-test
{ f } [ { { f } [ {
@ -41,7 +41,7 @@ PRIVATE>
{ { 1 2 } } { { 1 2 } }
{ { 1 } { 2 } } { { 1 } { 2 } }
{ { { 1 } } { 2 } { } } { { { 1 } } { 2 } { } }
} [ null-matrix? ] map [ ] any? } [ null-matrix? ] any?
] unit-test ] unit-test
{ t } [ 10 dup <zero-matrix> zero-matrix? ] unit-test { t } [ 10 dup <zero-matrix> zero-matrix? ] unit-test
@ -345,7 +345,7 @@ PRIVATE>
{ { { } } } { { { } } }
{ { } { } { } } { { } { } { } }
{ { { } } { { { } } } } { { { } } { { { } } } }
} [ null-matrix? ] map [ ] all? } [ null-matrix? ] all?
] unit-test ] unit-test
{ f } [ { { f } [ {
@ -353,7 +353,7 @@ PRIVATE>
{ { 1 2 } } { { 1 2 } }
{ { 1 } { 2 } } { { 1 } { 2 } }
{ { { 1 } } { 2 } { } } { { { 1 } } { 2 } { } }
} [ null-matrix? ] map [ ] any? } [ null-matrix? ] any?
] unit-test ] unit-test
{ t } [ 10 dup <zero-matrix> zero-matrix? ] unit-test { t } [ 10 dup <zero-matrix> zero-matrix? ] unit-test