lisp泛型编程跟开挂一样

(define (duple n x)

   (if (= n 0)

         '()

         (cons x (duple (- n 1) x))))

(duple 3 3)得出（3 3 3）

(duple 10 "hello")得出("hello" "hello" "hello" "hello" "hello" "hello" "hello" "hello" "hello" "hello")。