#include <bits/stdc++.h>
using namespace std;
#define rep(i, n) for(int i = 0; i < n; i++)
#define rep2(i, x, n) for(int i = x; i <= n; i++)
#define rep3(i, x, n) for(int i = x; i >= n; i--)
#define each(e, v) for(auto &e: v)
#define pb push_back
#define eb emplace_back
#define all(x) x.begin(), x.end()
#define rall(x) x.rbegin(), x.rend()
#define sz(x) (int)x.size()
using ll = long long;
using pii = pair<int, int>;
using pil = pair<int, ll>;
using pli = pair<ll, int>;
using pll = pair<ll, ll>;
const int MOD = 1000000007;
//const int MOD = 998244353;
const int inf = (1<<30)-1;
const ll INF = (1LL<<60)-1;
template<typename T> bool chmax(T &x, const T &y) {return (x < y)? (x = y, true) : false;};
template<typename T> bool chmin(T &x, const T &y) {return (x > y)? (x = y, true) : false;};

struct io_setup{
    io_setup(){
        ios_base::sync_with_stdio(false);
        cin.tie(NULL);
        cout << fixed << setprecision(15);
    }
} io_setup;

template<bool directed = false>
struct Graph{
    struct edge{
        int to, id;
        edge(int to, int id) : to(to), id(id) {}
    };

    vector<vector<edge>> es;
    const int n;
    int m;

    vector<int> a;
    vector<ll> b;
    vector<map<int, ll>> mp;

    Graph(int n) : es(n), n(n), m(0), a(n), b(n), mp(n) {}

    void add_edge(int from, int to){
        es[from].emplace_back(to, m);
        if(!directed) es[to].emplace_back(from, m);
        m++;
    }

    void dfs(int now){
        int id = -1, M = -1;

        each(e, es[now]){
            dfs(e.to);
            if(chmax(M, sz(mp[e.to]))) id = e.to;
        }

        if(id != -1) swap(mp[now], mp[id]);

        each(e, es[now]){
            if(e.to == id) continue;

            each(u, mp[e.to]){
                mp[now][u.first] += u.second;
            }
        }

        mp[now][a[now]] += b[now];
        ll S = b[now];
        
        for(auto it = mp[now].find(a[now]); it != begin(mp[now]) && S > 0;){
            --it;
            if(S >= it->second){
                S -= it->second;
                it = mp[now].erase(it);
            }
            else{
                it->second -= S;
                S = 0;
            }
        }
    }

    void solve(){
        dfs(0);
        ll ans = 0;
        each(e, mp[0]) ans += e.second;

        cout << ans << '\n';
    }
};

int main(){
    int N; cin >> N;

    Graph<true> G(N);

    rep2(i, 1, N-1){
        int p; cin >> p; p--;
        G.add_edge(p, i);
    }

    rep(i, N) cin >> G.a[i];
    rep(i, N) cin >> G.b[i];

    G.solve();
}