P25 (*) Generate a random permutation of the elements of a list.

问题描述

sash> (rnd-permu '(a b c d e f))
   -> (b a d c e f)

Hint: Use the solution of problem P23.

解法

(define rnd-permu
    (lambda (ls)
      (rnd-select ls (length ls))))