loop do
    n, d = gets.split.map(&:to_i)
    break if n == 0 && d == 0
    m = Array.new(n)
    sum = Array.new(n)
    n.times do |i|
        _, *m[i] = gets.split.map(&:to_i)
        sum[i] = m[i].inject(:+)
    end
    max = sum.max
    e = false
    loop do
        break if m.all?{|e| e.size == 0}
        e = false
        n.times do |i|
            next if m[i].size == 0
            sum[i] -= m[i][0]
            max = sum.max
            if max - sum[i] <= d
                m[i].shift
                e = true
            else
                sum[i] += m[i][0]
            end
        end
        break if !e
    end
    puts e ? "Yes" : "No"
end