|
|
|
USING: enigma kernel math sequences sorting tools.test ;
|
|
|
|
{ t } [ <reflector> natural-sort 26 <iota> sequence= ] unit-test
|
|
|
|
{ "" } [ "" 4 <enigma> encode ] unit-test
|
|
|
|
{ "hello, world" } [
|
|
"hello, world" 4 <enigma> [ encode ] keep reset-cogs encode
|
|
] unit-test
|