# ?§£?????????????????????????????????????????????

a, b = gets.split.map(&:to_i)
as = gets.split.map(&:to_i)
bs = gets.split.map(&:to_i)

ans = 0
b.times do |i|
  len = 0
  as.each do |n|
    if n == bs[i]
      i += 1
      len += 1
    end
  end

  ans = [len, ans].max
end

puts ans