(display (let* ((a (read)) (b (read)) (c (read)) (d (read)))
           (if (> c b) "NO\n" "YES\n")))