removed the (sort) call from (symbol) -- Bapropos sorts already

(defun symbols ()

  "return a sorted list of all symbols"

  (sort (apropos ".") #'string<))

  (apropos "."))

(defun caar (pair)

  "return the car of the car of PAIR"