対話によるCommon Lisp 2.29
CL-USER> (defun abs$ (x) (if (< x 0) (- x) x)) ABS$ CL-USER> (abs (- 2 5)) 3
user=> (defn abs$ [x] (if (< x 0) (- x) x)) #'user/abs$ user=> (abs$ (- 2 5)) 3
CL-USER> (defun abs$ (x) (if (< x 0) (- x) x)) ABS$ CL-USER> (abs (- 2 5)) 3
user=> (defn abs$ [x] (if (< x 0) (- x) x)) #'user/abs$ user=> (abs$ (- 2 5)) 3