© Copyright 1998 Robert Strandh
(strandh@labri.u-bordeaux.fr)
Conditions de distribution
[
précedent,
suivant
]
Différences par rapport à Scheme
Définitions de fonctions
(defun fac (n)
(cond ((= n 0) 1)
(t (* n (fac (- n 1))))))
[[ defun
cond
]]
Utilisation de lambda
-expressions et noms de fonctions
(mapcar #'(lambda (x) (+ x 1)) lst)
[[ mapcar
#'
lambda
]]
(remove-if #'evenp *list-of-integers*)
[[ remove-if
#'
evenp
]]
Appele d'une fonction valeur d'une variable
(defun my-mapcar (fun lst)
(cond ((endp lst) nil)
(t (cons (funcall fun (car lst))
(my-mapcar fun (cdr lst))))))
[[ endp
funcall
]]