(defun is (x) x)
(egs :1.1
     (eg '(append '(Pat Kim) '(Robin Sandy))
         :of "appends two lists"
         :out '(PAT KIM ROBIN SANDY)) ;[1] <== was " :out PAT KIM ROBIN SANDY) "

     (eg '(is '(Pat Kim)) ;[2] <== was  " '(Pat Kim) "
         :of "Outputs a list"
         :out '(PAT KIM)) ;[1]  <= was " :out PATH KIM) "
     (eg '(is 'John)    ;; <== was " 'John "
         :of "symbol"
         :out 'JOHN)
     (eg '(is '(John Q Public)) ;[2] <= was " '(John Q Public) "
         :of "list example"
         :out '(JOHN Q PUBLIC))
     (eg '2
         :of "number"
         :out 2)
     (eg 2
         :of "number"
         :out 2)
     (eg '(+ 2 2)
         :of "list"
         :out (+ 2 2))
     (eg (+ 2 2)
         :of "performs an operation"
         :out 4)
     ;(eg John)
     ;(eg (John Q Public))
     (eg '(append '(Pat Kim) (list '(John Q Public) 'Sandy))
         :of "shows list functionality"
         :out '(PAT KIM (JOHN Q PUBLIC) SANDY)) ;[1] was " :out PAT KIM (JOHN Q PUBLIC) SANDY) "
     (eg '(length (append '(Pat Kim) (list '(John Q Public) 'Sandy)))
         :of "shows length function"
         :out 4)
     )