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

ans = 0
prev = -9
n.times{|i|
  ans += b[a[i]-1]
  ans += c[prev] if prev+1 == a[i]-1
  prev = a[i]-1
}
p ans