let f (s:string) =
    let arr = s.Split('.') |> Array.map int
    arr.[0] * 1000000 + arr.[1] * 1000 + arr.[2]
let N = f <| stdin.ReadLine()
let M = f <| stdin.ReadLine()
printfn "%s" <| if N >= M then "YES" else "NO"