首先看两条链怎么合并，贪心可得是从大到小取max，多条链同理
所以dfs合并子树的大根堆即可，注意为了保证复杂度，合并的时候要合并到最长链上，证明见长链剖分
#include<iostream>
#include<cstdio>
#include<queue>
using namespace std;
const int N=200005;
int n,a[N],h[N],cnt,id[N],tot,p[N];
long long ans;
priority_queue<int>q[N];
struct qwe
{
int ne,to;
}e[N<<1];
int read()
{
int r=0,f=1;
char p=getchar();
while(p>'9'||p<'0')
{
if(p=='-')
f=-1;
p=getchar();
}
while(p>='0'&&p<='9')
{
r=r*10+p-48;
p=getchar();
}
return r*f;
}
void add(int u,int v)
{
cnt++;
e[cnt].ne=h[u];
e[cnt].to=v;
h[u]=cnt;
}
void dfs(int u)
{//cerr<<u<<endl;
id[u]=++tot;
for(int i=h[u];i;i=e[i].ne)
{
dfs(e[i].to);
if(q[id[e[i].to]].size()>q[id[u]].size())
swap(id[e[i].to],id[u]);
int len=q[id[e[i].to]].size();
for(int j=1;j<=len;j++)
{
p[j]=max(q[id[e[i].to]].top(),q[id[u]].top());
q[id[e[i].to]].pop();
q[id[u]].pop();
}
for(int j=1;j<=len;j++)
q[id[u]].push(p[j]);
}
q[id[u]].push(a[u]);
}
int main()
{
n=read();
for(int i=1;i<=n;i++)
a[i]=read();
for(int i=2;i<=n;i++)
{
int x=read();
add(x,i);
}
dfs(1);
while(!q[id[1]].empty())
ans+=q[id[1]].top(),q[id[1]].pop();
printf("%lld\n",ans);
return 0;
}