main = getLine >>= putStrLn . solve . map read . words

solve :: [Double] -> String
solve [p, q]
        | 1.0 < p * (2.0 - q) = "YES"
        | otherwise = "NO"