anchor.diff:  (defalias cut subseq)
   (defalias rev reverse)
   (defalias nrev nreverse)
  -
  
positive.code: ;;; special forms
  (defalias fn lambda) ; doesn't allow for literal in function position ie ((fn ...) ...)
  (defalias def defun)
  
negative.code: (defalias -- decf)
  (defalias mvb multiple-value-bind)
  (defalias mvl multiple-value-list)
  (defalias do  progn)
  (defalias do1 prog1)
  (defalias do2 prog2)
  (defalias = setf)
  
  ;;; functions
  (defalias is eql)
  (defalias iso equalp)
  (defalias no not)
  (defalias len length)
  (defalias map mapcar)
  (defalias isa typep)
  (defalias uniq gensym)
  (defalias even evenp)
  