2008-03-01 17:00:45 -05:00
|
|
|
IN: math.vectors.tests
|
2007-09-20 18:09:08 -04:00
|
|
|
USING: math.vectors tools.test ;
|
|
|
|
|
|
|
|
|
|
[ { 1 2 3 } ] [ 1/2 { 2 4 6 } n*v ] unit-test
|
|
|
|
|
[ { 1 2 3 } ] [ { 2 4 6 } 1/2 v*n ] unit-test
|
|
|
|
|
[ { 1 2 3 } ] [ { 2 4 6 } 2 v/n ] unit-test
|
|
|
|
|
[ { 1/1 1/2 1/3 } ] [ 1 { 1 2 3 } n/v ] unit-test
|
2008-09-12 12:29:12 -04:00
|
|
|
|
2008-09-12 16:52:43 -04:00
|
|
|
[ 5 ] [ { 1 2 } norm-sq ] unit-test
|
|
|
|
|
[ 13 ] [ { 2 3 } norm-sq ] unit-test
|
2008-09-12 12:29:12 -04:00
|
|
|
|
