(defun main () (let ((a (read)) (b (read))) (if (or (< (* 2 a) b) (< (* 2 b) a)) (format t "~a~%" "No") (format t "~a~%" "Yes")))) (main)