n = gets.to_i
a = gets.chomp.split(" ").map(&:to_i)
b = gets.chomp.split(" ").map(&:to_i)
c = gets.chomp.split(" ").map(&:to_i)
scores = 0
n.times do |i|
  scores += b[a[i]]
  if a[i-1] != nil
    if a[i-1]+1 == a[i]
      scores += c[a[i]]
    end
  end
end
puts scores