Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (setq Lst
- (by '(NIL (rand)) sort
- (make
- (for I 9999
- (link (cons (/ I 100) I)) ) ) ) )
- (bench
- (do 1000 (group Lst)) )
- (bye)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
