(def a (read))
(def b (read))
(def c (read))
(def d (read))

(def ac (Math/abs (- a c)))
(def ab (Math/abs (- a b)))
(def bc (Math/abs (- b c)))
(defn check [target] (if (<= target d) true false))
(def resultac (check ac))
(def resultab (check ab))
(def resultbc (check bc))
(if (or resultac (and resultab resultbc)) (println "Yes") (println "No"))