(load "/s/bach/a/class/cs440/a-edit.lisp" :verbose nil)
(load "/s/bach/a/class/cs440/a-sdraw.lisp" :verbose nil)
(load "/s/bach/a/class/cs440/a-dtrace.lisp" :verbose nil)
(load "/s/bach/a/class/cs440/ppmx.lsp" :verbose nil)
(format t "CS440 functions loaded:

   emacs         vi
   sdraw         sdraw-loop      scrawl
   dtrace        duntrace
")