n, m = gets.split.map(&:to_i)
a = []
b = []
n.times do
    a << gets.to_i
end
m.times do 
    b << gets.to_i
end
a = a.map.with_index.to_a
cnt = [0] * n
b.each do |x|
    cnt[ a.select{ |elem, idx| x >= elem }[0][1] ] += 1
end

puts cnt.map.with_index.to_a.max[1] + 1