main = interact $ process 1 . map read . tail . words
process y (x0:x1:xs)
    | x0 - x1 > y = "No"
    | x0 - x1 < 0 = process 1 (x1:xs)
    | otherwise = process (y-x0+x1) (x1:xs)
process _ _ = "Yes"
