memory.lisp initial version ready