• Sieg!
  
  Liste von Länge n bilden:
  
(defun herpsum (n)
(cond ((zerop n) 0)
(T (+ 1 (herpsum (n 1-))))))

  Listenelemente addieren:
  
(defun derpsum (L)
(cond ((null L) 0)
(T (+ (car L) (derpsum (rest L))))))

  Letztes Element einer Liste finden:
  
(defun herplast (L)
 (if (= 1 (length L)) (car L)
 (herplast (rest L))))

  Liste ohne letztes Element zurückgeben:
  
(defun herpderp (L)
 (if (or (null L) (= 1 (length L))) ()
 (cons (first L) (herpderp (rest L)))))

  (Im Radio läuft eine Sendung über Franz List. Ich werde fast wahnsinnig, ich verstehe immer LisP.)