cl:shuffle   scheme


Defined in:  https://github.com/lambdamusic/extempore-extensions/blob/main/init/init_lisp.xtm

Implementation

;
; trick for shuffling a list
(define (cl:shuffle l)
  (cl:sort l
        (lambda (x y)
          (equal? 0 (random 2)))))


Back to Index

Similar Entries