anchor.diff:      interactive-stream-p
       intern ((intern *) 2)
       intersection ((intersection *) 2)
  +    nintersection ((nintersection *) 2)
       invoke-restart
       invoke-restart-interactively
       isqrt
  
positive.code:     make-two-way-stream (make-two-way-stream *)
      (map 3) (map *)
      (map-into 3) (map-into *)
      (mapc 2) (mapc *) ; caution, todo
      (mapcar 2) (mapcar *) (mapcan 2) (mapcan *)
      mapl ; caution, todo
      (maplist 2) (maplist *) (mapcon 2) (mapcon *)
      maphash ; caution, todo
      (maskfield 2)
      max (max *)
      (member 2) (member-if 2) (member-if-not 2) ; caution
  
negative.code:     elt (elt *)
      endp
      enough-namestring ((enough-namestring *) 2)
      ensure-directories-exist	       ; supplied for 2nd return value
      ensure-generic-function
      eq (eq *)
      eql (eql *)
  