main :: IO ()
main = do
    [a, b] <- map read . words <$> getLine
    let r = abs $ pred (b - a)
    putStrLn $ (if r == 0 then "YES\n" else "NO\n") ++ show r