対話によるCommon Lisp 9.28-33
CL-USER> (member-if #'evenp '(3 5 6 9 10)) (6 9 10) CL-USER> (find-if #'evenp '(3 5 6 9 10)) 6 CL-USER> (remove-if #'evenp '(3 5 6 9 10)) (3 5 9) CL-USER> (mapcar #'sqrt '(1 4 25 36)) (1 2 5 6) CL-USER> (mapcar #'length '((a b) (c d e) () (f))) (2 3 0 1) CL-USER> (mapcar #'(lambda (x) (cons 0 x)) '((1 2) (1) (2))) ((0 1 2) (0 1) (0 2))