1 USING: kernel math.order tools.test ;
4 [ +lt+ ] [ "ab" "abc" <=> ] unit-test
5 [ +gt+ ] [ "abc" "ab" <=> ] unit-test
6 [ +lt+ ] [ 3 4 <=> ] unit-test
7 [ +eq+ ] [ 4 4 <=> ] unit-test
8 [ +gt+ ] [ 4 3 <=> ] unit-test
10 [ 20 ] [ 20 0 100 clamp ] unit-test
11 [ 0 ] [ -20 0 100 clamp ] unit-test
12 [ 100 ] [ 120 0 100 clamp ] unit-test