Create ex17.lisp