altered scene.lisp