(load "/usr/local/aplus-fsf-4.18/lisp_new/aplus")
;(load "/ms/dev/aplus/aplus/fsf/src/aplus-fsf-4.18/src/lisp.1/aplus")

