(defun weird-science (project)
(cond ((= project 0) (two-liter-twister)) ((= project 1) (phil)) ((= project 2) (mad-lisp)) (t (bonus))))
(cond ((= project 0) (two-liter-twister))
((= project 1) (phil)) ((= project 2) (mad-lisp)) (t (bonus))))
((= project 1) (phil))
((= project 2) (mad-lisp))
(t (bonus))))