2012-08-03 18:17:50 -04:00
|
|
|
USING: kernel tools.test ;
|
2012-08-04 12:44:44 -04:00
|
|
|
IN: rosetta-code.y-combinator
|
2012-08-03 18:17:50 -04:00
|
|
|
|
2015-07-03 12:39:59 -04:00
|
|
|
{ 120 } [ 5 [ almost-fac ] Y call ] unit-test
|
|
|
|
{ 8 } [ 6 [ almost-fib ] Y call ] unit-test
|
|
|
|
{ 61 } [ 3 3 [ almost-ack ] Y call ] unit-test
|