#include<bits/stdc++.h>
#define N 351493
using namespace std;
int n,d[N+5],fa[N+5];
long long f[N+5][3][2]; //x±»Ë­³ÔÁË£»faÊÇ·ñ±»x³ÔÁË 
vector<int> e[N+5];
inline void dfs(int x)
{
	static long long w[3][2];
	for(int y:e[x]) dfs(y);
	auto getw=[&](bool type)
	{
		memset(w,0,32),w[1][0]=(type?-d[x]:d[x]),w[2][0]=-1e18;
		for(int y:e[x])
		{
			int temp=max({f[y][0][0]+(type?d[y]:-d[y]),f[y][1][0],f[y][2][0]});
			w[0][0]+=temp,w[1][0]+=max({f[y][0][0]+(type?d[y]:-d[y]),f[y][2][0]});
			w[2][0]+=max(w[2][0]+temp,w[2][1]+max(f[y][1][1],f[y][2][1])),w[2][1]+=temp;
		}
		w[1][1]=w[1][0]+(type?d[fa[x]]:-d[fa[x]]),w[2][1]=w[2][0]+(type?d[fa[x]]:-d[fa[x]]);
	};
	getw(1),memcpy(f[x],w,32),getw(0);
	for(int i=0;i<3;++i) for(int j=0;j<2;++j) f[x][i][j]=max(f[x][i][j],w[i][j]);
}
int main()
{
	scanf("%d",&n);
	for(int i=1;i<=n;++i) scanf("%d",d+i);
	for(int i=2;i<=n;++i) scanf("%d",fa+i),e[fa[i]].push_back(i);
	dfs(1),printf("%lld\n",max(f[1][1][0],f[1][2][0]));
	return 0;
}