import Control.Monad
import qualified Data.ByteString.Char8 as BS
import Data.Maybe (fromJust)
import Data.List as List

solve :: Int -> Int -> Int -> String
solve a b c
    | c >= a && c <= b = "Yes"
    | otherwise = "No"
    

main :: IO()
main = do
    [a, b, c] <- map (fst . fromJust . BS.readInt) . BS.words <$> BS.getLine
    putStrLn $ solve a b c
