chickadee » aima » shuffle

shuffle listprocedure

Shuffle a list.

list
The list to shuffle
(define (shuffle list)
  (let ((vector (list->vector list))) (shuffle! vector) (vector->list vector)))