(defun mapear (func lista) (if (null lista) nil (cons (funcall func (first lista)) (mapear func (rest lista)))))
Esta função já existe em Lisp e denomina-se mapcar.