1 (defun square-list-solo (items)
2   (if (null items)
3       nil
4       (cons (square (car items))
5 	    (square-list-solo (cdr items)))))
6 (defun square-list-map (items)
7   (mapcar #'square items))