;;; -*- Mode:LISP; Package:USER; Readtable:CL; Base:10 -*-



(defun foo ()
  'map)