while gets
	n,k = $_.split.map(&:to_i)
	break if n == 0 
	l = gets.split.to_a.map(&:to_i)
	n.times do
		m = gets.split.to_a.map(&:to_i)
		k.times do |i|
			l[i] -= m[i]
		end
	end
	puts l.all?{|i| i >= 0} ? "yes" : "no"
end