4 lines
139 B
Text
4 lines
139 B
Text
(define (pick-random list)
|
|
(list-ref list (random (length list))))
|
|
(pick-random (iota 1000)) → 667
|
|
(pick-random (iota 1000)) → 179
|