n = gets.to_i
a = gets.split.map(&:to_i)
b = gets.split.map(&:to_i)
c = gets.split.map(&:to_i)
s = 0
for i in 0...n do
  s += b[a[i] - 1]
  if i > 0 && (a[i - 1] + 1) == a[i]
    s += c[a[i - 1] - 1]
  end
end
puts s
