Update week1.lisp