import Control.Applicative
import Control.Monad

main :: IO ()
main = do
    [a, b] <- map read . words <$> getLine
    putStrLn $ solve a b

solve :: Int -> Int -> String
solve a b = if a * 500 >= b then "Yes" else "No"