(in-package :user)

(load (ut:system-pathname :xit "../xact/defsystem"))
(pmds::load-system :xact)

#+(and lucid clos (not pcl))
(pmds::load-system :lucid-clos-patch)

(load (ut:system-pathname :xam "init"))
(load (ut:system-pathname :xact "init"))
