(defun main (&rest argv) (declare (ignorable argv)) (let* ((x (read))) (format t "~a~%" (if (or (= x 0) (= x 4) (= x 10)) "Yes" "No")))) (main)