2 USING: effects tools.test ;
4 [ t ] [ 1 1 <effect> 2 2 <effect> effect<= ] unit-test
5 [ f ] [ 1 0 <effect> 2 2 <effect> effect<= ] unit-test
6 [ t ] [ 2 2 <effect> 2 2 <effect> effect<= ] unit-test
7 [ f ] [ 3 3 <effect> 2 2 <effect> effect<= ] unit-test
8 [ f ] [ 2 3 <effect> 2 2 <effect> effect<= ] unit-test
9 [ t ] [ 2 3 <effect> f effect<= ] unit-test