func main()
	var ss: [][]char
	do ss :: cui@input().split(".")
	var abc0: int :: ss[0].toInt(&) * 1000000 + ss[1].toInt(&) * 1000 + ss[2].toInt(&)
	do ss :: cui@input().split(".")
	var abc1: int :: ss[0].toInt(&) * 1000000 + ss[1].toInt(&) * 1000 + ss[2].toInt(&)
	var ans: bool :: abc0 >= abc1
	do cui@print(ans ?("YES\n", "NO\n"))
end func