<>;$/=$",$_[<>]+=$_ for glob<>;print$_[0]<(sort{$b-$a}@_)[0]?NO:YES