2012-09-09 14:38:59 -04:00
|
|
|
! Copyright (C) 2012 John Benediktsson
|
|
|
|
! See http://factorcode.org/license.txt for BSD license
|
2015-05-05 19:08:55 -04:00
|
|
|
USING: kernel tools.test ;
|
2012-09-09 14:38:59 -04:00
|
|
|
IN: math.transforms.bwt
|
|
|
|
|
2015-04-28 22:28:14 -04:00
|
|
|
{ "asdf" } [ "asdf" bwt ibwt ] unit-test
|
2015-05-05 19:08:55 -04:00
|
|
|
|
|
|
|
{ t } [ "hello" [ bwt nip ] [ bwt* ] bi = ] unit-test
|