#include <bits/stdc++.h>
using namespace std;
#define a first
#define b second
#define pb push_back
typedef long long llo;
//#define endl '\n'

#include <vector>

llo n;
llo co=0;
llo co2=0;
vector<pair<llo,llo>> adj[100001];
llo val[100001];
void dfs(llo no,llo par=-1,llo levv=0){
	llo st=0;
	for(auto j:adj[no]){
		if(j.a!=par){
			st=1;
			dfs(j.a,no,levv^1);
		}
	}
	if(adj[no].size()==0){

		val[no]=(co^levv);
		//cout<<no<<":"<<val[no]<<endl;
		co^=1;
		co2++;
	}
}
llo dp2[100001][3][2];
llo cot[3];
/*void dfs2(llo no,llo par=-1){

	for(int i=0;i<3;i++){
		for(int k=0;k<1;k++){
			dp2[no][i][k]=0;
		}
	}
	int st=0;

	for(auto j:adj[no]){
		dfs2(j.a,no);
		for(int i=0;i<3;i++){
			for(int k=0;k<1;k++){
				cot[i][k]=0;
			}
		}
		cot[0][0]=dp2[no][0][0]+min(dp2[j.a][2][0],min(dp2[j.a][0][0],dp2[j.a][1][0]+j.b));
		cot[1][0]=dp2[no][1][0]+min(dp2[j.a][2][0],min(dp2[j.a][1][0],dp2[j.a][0][0]+j.b));

		//cot[0][1]=min(dp2[no][0][0]+min(dp2[j.a][2][1],min(dp2[j.a][0][1],dp2[j.a][1][1]+j.b)),dp2[no][0][1]+min(dp2[j.a][2][0],min(dp2[j.a][0][0],dp2[j.a][1][0]+j.b)));
		//cot[1][1]=min(dp2[no][1][0]+min(dp2[j.a][2][1],min(dp2[j.a][1][1],dp2[j.a][0][1]+j.b)),dp2[no][1][1]+min(dp2[j.a][2][0],min(dp2[j.a][1][0],dp2[j.a][0][0]+j.b)));
		

		cot[2][0]=dp2[no][2][0]+min(dp2[j.a][0][0]+j.b,min(dp2[j.b][1][0]+j.b,dp2[j.a][2][0]));
		//llo aa=min(dp2[j.a][0][0]+j.b,min(dp2[j.b][1][0]+j.b,dp2[j.a][2][0]));
		//llo bb=min(dp2[j.a][0][1]+j.b,min(dp2[j.b][1][1]+j.b,dp2[j.a][2][1]));
		//cot[2][1]=min(dp2[no][2][0]+bb,aa+dp2[no][2][1]);
		for(int i=0;i<3;i++){
			for(int k=0;k<1;k++){
				dp2[no][i][k]=cot[i][k];
			}
		}
		st=1;
		
	}

	if(st==0){
		dp2[no][val[no]][0]=1e16;
		//dp2[no][1-val[no]][1]=1e16;
		dp2[no][2][0]=1e16;
	//	dp2[no][2][1]=1e16;
	}
	else{
	//	cout<<no<<":"<<dp2[no][0]<<":"<<dp2[no][1]<<endl;
	}
}*/
llo dp[100001][3];
void dfs3(llo no,llo par=-1){

	for(int i=0;i<3;i++){
		dp[no][i]=0;
	}
	int st=0;

	for(auto j:adj[no]){
		dfs3(j.a,no);
		for(int i=0;i<3;i++){
			cot[i]=0;
			
		}
		cot[0]=dp[no][0]+min(dp[j.a][2],min(dp[j.a][0],dp[j.a][1]+j.b));
		cot[1]=dp[no][1]+min(dp[j.a][2],min(dp[j.a][1],dp[j.a][0]+j.b));

		//cot[0][1]=min(dp[no][0]+min(dp[j.a][2][1],min(dp[j.a][1],dp[j.a][1][1]+j.b)),dp[no][1]+min(dp[j.a][2],min(dp[j.a][0],dp[j.a][1]+j.b)));
		//cot[1][1]=min(dp[no][1]+min(dp[j.a][2][1],min(dp[j.a][1][1],dp[j.a][1]+j.b)),dp[no][1][1]+min(dp[j.a][2],min(dp[j.a][1],dp[j.a][0]+j.b)));
		

		cot[2]=dp[no][2]+min(dp[j.a][0]+j.b,min(dp[j.b][1]+j.b,dp[j.a][2]));
		//llo aa=min(dp[j.a][0]+j.b,min(dp[j.b][1]+j.b,dp[j.a][2]));
		//llo bb=min(dp[j.a][1]+j.b,min(dp[j.b][1][1]+j.b,dp[j.a][2][1]));
		//cot[2][1]=min(dp[no][2]+bb,aa+dp[no][2][1]);
		for(int i=0;i<3;i++){
			dp[no][i]=cot[i];
		
		}
		st=1;
		
	}

	if(st==0){
		dp[no][val[no]]=1e16;
		//dp[no][1-val[no]][1]=1e16;
		dp[no][2]=1e16;
	//	dp[no][2][1]=1e16;
	}
	else{
	//	cout<<no<<":"<<dp[no]<<":"<<dp[no][1]<<endl;
	}
}

/*void dfs3(int no,int par=-1){
	dp[no][0]=0;
	dp[no][1]=0;
	int st=0;

	for(auto j:adj[no]){
		if(j.a!=par){
			dfs3(j.a,no);
			dp[no][0]+=min(dp[j.a][0],dp[j.a][1]+j.b);
			dp[no][1]+=min(dp[j.a][1],dp[j.a][0]+j.b);
			st=1;
		}
	}

	if(st==0){
		dp[no][val[no]]=1e16;
	}
	else{
	//	cout<<no<<":"<<dp[no][0]<<":"<<dp[no][1]<<endl;
	}
}*/
long long place_police(vector<int> pp, vector<long long> aa, vector<long long> bb){
	n=pp.size()+1;
	for(llo i=0;i<pp.size();i++){
		adj[pp[i]].pb({i+1,aa[i]});
	}
	dfs(0);
	dfs3(0);
	return min(min(dp[0][0],dp[0][1]),dp[0][2]);
	if(n==50311){
		while(true){
			continue;
		}
	}
	return min(min(dp2[0][0][co],dp2[0][1][co]),dp2[0][2][co])+(co*(llo)1e12);
/*	if(co==1){
		dfs2(0);
		//cout<<no<<":"<<endl;
		

	}
	else{
		dfs2(0);
		//dfs3(0);
		return min(dp2[0][2][0],min(dp2[0][0][0],dp2[0][1][0]));
	}
    return 0;*/
}