added environmentalise.lisp