IN: scratchpad
USE: lists
USE: kernel
USE: math
USE: random
USE: test
[ ] [ [ 100000 [ 0 10000 random-int , ] times ] make-list [ > ] sort drop ] unit-test