# frozen_string_literal: true

n = gets.to_i
a = gets.split.map(&:to_i)
b = gets.split.map(&:to_i)
c = gets.split.map(&:to_i)

sum = 0
0.upto(n - 1).each do |i|
  j = a[i] - 1
  sum += b[j]
  sum += c[j] if j < n - 1 && i < n - 1
end
puts sum
