#include<bits/stdc++.h>
#define ll long long
#define ull unsigned long long
#define lll __int128
#define pc __builtin_popcount
#define pr pair<int,int>
#define pb push_back
#define mp make_pair
#define x first
#define y second
#define lb(x) x&-x
using namespace std;
mt19937 rnd(chrono::steady_clock::now().time_since_epoch().count());
ll rint(ll l,ll r){return uniform_int_distribution<ll>(l,r)(rnd);}
const int maxn=2e5+10,maxc=1e6+10,C=1e6;
int n,fa[maxn],c[maxn],tim,L[maxn],R[maxn],dfh[maxn],cnt,root[maxn];
ll f[maxn],tag[maxn],sm[maxn];
vector<int> e[maxn];
void modify(int x,ll val)
{
	for(;x<=n;x+=lb(x)) f[x]+=val;
}
ll query(int x)
{
	ll res=0;
	for(;x;x-=lb(x)) res+=f[x];
	return res;
}
struct line
{
	int k;
	ll b;
	line(){}
	line(int K,ll B){k=K,b=B;}
	ll y(int x){return 1ll*k*x+b;}
};
struct node
{
	int l,r;
	line X;
}t[maxc<<5];//not enough
void modify2(int l,int r,int id,line X)
{
	int mid=(l+r)>>1;
	if(t[id].X.y(mid)>X.y(mid)) swap(t[id].X,X);
	if(t[id].X.y(l)>X.y(l))
	{
		if(t[id].l) modify2(l,mid,t[id].l,X);
		else cnt++,t[cnt].X=X,t[id].l=cnt;
	}
	else if(t[id].X.y(r)>X.y(r))
	{
		if(t[id].r) modify2(mid+1,r,t[id].r,X);
		else cnt++,t[cnt].X=X,t[id].r=cnt;
	}
}
ll query2(int l,int r,int id,int loc)
{
	if(!id) return 1e18;
	if(l==r) return t[id].X.y(loc);
	int mid=(l+r)>>1;
	if(loc<=mid) return min(t[id].X.y(loc),query2(l,mid,t[id].l,loc));
	return min(t[id].X.y(loc),query2(mid+1,r,t[id].r,loc));
}
void dfs(int now)
{
	int son=0;
	ll tot=0;
	L[now]=tim+1;
	for(int i:e[now])
	{
		dfs(i),sm[i]=query2(1,C,root[i],c[now])+tag[i],tot+=sm[i];
		if(son==0||R[i]-L[i]>R[son]-L[son]) son=i;
	}
	if(!son)
	{
		tim++,dfh[tim]=now,R[now]=tim,cnt++,root[now]=cnt,t[cnt].X=line(c[now],0);
//		cerr<<"now="<<now<<" L "<<L[now]<<" -> R "<<R[now]<<" root="<<root[now]<<endl;
//		for(int i=L[now];i<=R[now];i++) cerr<<dfh[i]<<endl;
//		for(int i=L[now];i<=R[now];i++) cerr<<dfh[i]<<":"<<query(i)<<endl;
		return;
	}
	root[now]=root[son],tag[now]=tag[son]+tot-sm[son],modify(L[son],tot-sm[son]),modify(R[son]+1,sm[son]-tot);
	for(int i:e[now])
	{
		if(i!=son)
		{
			modify(L[i],tot-sm[i]),modify(R[i]+1,sm[i]-tot);
			for(int j=L[i];j<=R[i];j++) modify2(1,C,root[now],line(c[dfh[j]],query(j)-tag[now]));
		}
	}
	R[now]=tim;
//	cerr<<"now="<<now<<" L "<<L[now]<<" -> R "<<R[now]<<" root="<<root[now]<<endl;
//	for(int i=L[now];i<=R[now];i++) cerr<<dfh[i]<<":"<<query(i)<<endl;
}
/*
4
1 1 2
2 1 3 2
*/
int main()
{
//	freopen(".in","r",stdin);
//	freopen(".out","w",stdout);
	scanf("%d",&n);
	for(int i=2;i<=n;i++) scanf("%d",&fa[i]),e[fa[i]].pb(i);
	for(int i=1;i<=n;i++) scanf("%d",&c[i]);
	dfs(1),printf("%lld\n",query2(1,C,root[1],c[1])+tag[1]);
	return 0;
}