n = gets.to_i
c = gets.to_i
v = gets.to_i
s = gets.split.map(&:to_i)
t = gets.split.map(&:to_i)
y = gets.split.map(&:to_i)
m = gets.split.map(&:to_i)

list = []
v.times do |i|
  list << [s[i], t[i], y[i], m[i]]
end
list.sort!{|a, b| a[0] <=> b[0]}

all_pats = {}
all_pats[1] = {c => 0}
list.each do |keiro|
  if all_pats[keiro[0]]
    all_pats[keiro[0]].each do |coin, time|
      nokori = coin - keiro[2]
      if nokori >= 0
        if all_pats[keiro[1]].nil?
          all_pats[keiro[1]] = {}
        end
        if all_pats[keiro[1]][nokori].nil? ||
            all_pats[keiro[1]][nokori] > (time + keiro[3])
          all_pats[keiro[1]][nokori] = time + keiro[3]
        end
      end
    end
  end
end

min_time = nil
if all_pats[n]
  all_pats[n].each do |coin, time|
    if min_time.nil? || min_time > time
      min_time = time
    end
  end
end
puts min_time || -1