toInt :: (String -> Int)
toInt x = read x ::Int

getInts :: IO [Int]
getInts = do
    x <- getLine
    let y = (map$toInt)$words x
    return y

main :: IO ()
main = do
    ns <- getInts
    let [d, t, s] = ns
    let r = if t * s >= d then "Yes" else "No"
    putStrLn r
