C や Java で言うところの、switch 文のようなものが Lisp にもある。 以下のように記述する。 (defun janken (x) (cond ( (= 0 x) 'GOO) ( (= 1 x) 'CHOKI) ( (= 2 x) 'PAA) ( t '???) ))