(load "mcmops.lsp")
(load "mccoach.lsp")
(clear-memory)
(load "mcmops.mops")
(load "mccoach.mops")
(coach-demo)