2008-11-09 21:42:01 -05:00
|
|
|
USING: math.transforms.haar tools.test ;
|
|
|
|
|
IN: math.transforms.haar.tests
|
2008-11-06 23:21:19 -05:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ { 3 2 -1 -2 3 0 4 1 } } [ { 7 1 6 6 3 -5 4 2 } haar ] unit-test
|
|
|
|
|
{ { 7 1 6 6 3 -5 4 2 } } [ { 3 2 -1 -2 3 0 4 1 } rev-haar ] unit-test
|
