2008-05-18 22:25:58 -04:00
|
|
|
USING: sequences.repeating tools.test ;
|
|
|
|
|
IN: sequences.repeating.tests
|
|
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ { 1 2 3 1 2 } } [ { 1 2 3 } 5 cycle ] unit-test
|
|
|
|
|
{ { 1 2 3 1 2 3 1 2 3 } } [ { 1 2 3 } 9 cycle ] unit-test
|
2012-07-10 19:47:33 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ { } } [ { 1 2 3 } 0 repeat ] unit-test
|
|
|
|
|
{ { 1 2 3 } } [ { 1 2 3 } 1 repeat ] unit-test
|
|
|
|
|
{ { 1 1 2 2 3 3 } } [ { 1 2 3 } 2 repeat ] unit-test
|
|
|
|
|
{ { 1 1 1 2 2 2 3 3 3 } } [ { 1 2 3 } 3 repeat ] unit-test
|
|
|
|
|
{ { 1 1 1 1 2 2 2 2 3 3 3 3 } } [ { 1 2 3 } 4 repeat ] unit-test
|
