(egs :all
     (eg '(demo :2.2)
	 :of "using lisp to define a simple grammer")
     (eg '(demo :2.3)
	 :of "using a rule base solution to defin a simple grammer")
     (eg '(demo :2.5)
         :of "using a bigger grammar set"))



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