(egs :all
       (eg '(demo :degree)
           :of "Degree Generations"))



(defun show-of ()
  (demo :all))