judge :: [Double] -> String
judge (p : q : _) = if q * (1 - p) < p * q * (1 - q) then "YES" else "NO"

main :: IO ()
main = putStrLn . judge . map read . words =<< getLine