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