(in-package #:common-lisp-user) (setf *test6* :yes)