#include "friend.h"
#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
#define MASK(i) (1LL << (i))
#define GETBIT(mask, i) (((mask) >> (i)) & 1)
#define ALL(v) (v).begin(), (v).end()
#define block_of_code if(true)
ll max(ll a, ll b){return (a > b) ? a : b;}
ll min(ll a, ll b){return (a < b) ? a : b;}
ll gcd(ll a, ll b){return __gcd(a, b);}
ll lcm(ll a, ll b){return a / gcd(a, b) * b;}
ll LASTBIT(ll mask){return (mask) & (-mask);}
int pop_cnt(ll mask){return __builtin_popcountll(mask);}
int ctz(ull mask){return __builtin_ctzll(mask);}
int logOf(ull mask){return 63 - __builtin_clzll(mask);}
mt19937_64 rng(chrono::high_resolution_clock::now().time_since_epoch().count());
ll rngesus(ll l, ll r){return l + (ull) rng() % (r - l + 1);}
double rngesus_d(double l, double r){
double cur = rngesus(0, MASK(60) - 1);
cur /= MASK(60) - 1;
return l + cur * (r - l);
}
template <class T1, class T2>
bool maximize(T1 &a, T2 b){
if (a < b) {a = b; return true;}
return false;
}
template <class T1, class T2>
bool minimize(T1 &a, T2 b){
if (a > b) {a = b; return true;}
return false;
}
template <class T>
void printArr(T container, string separator = " ", string finish = "\n", ostream &out = cout){
for(auto item: container) out << item << separator;
out << finish;
}
template <class T>
void remove_dup(vector<T> &a){
sort(ALL(a));
a.resize(unique(ALL(a)) - a.begin());
}
const int N = 1e5 + 69;
int n;
int a[N];
int p[N], q[N];
namespace Sub1{
bool check(){
return (n <= 10);
}
int solve(){
bool graph[n][n];
memset(graph, 0, sizeof graph);
for(int i= 1; i<n; ++i){
int j = p[i];
if (q[i] == 0){
graph[i][j] = graph[j][i] = 1;
}
else if (q[i] == 2) {
for(int k = 0; k<i; ++k) graph[i][k] = graph[k][i] = graph[j][k];
graph[i][j] = graph[j][i] = 1;
}
else{
for(int k = 0; k<i; ++k) graph[i][k] = graph[k][i] = graph[j][k];
}
}
int ans = 0;
for(int mask = 0; mask < MASK(n); ++mask){
int cur = 0;
for(int j = 0; j< n; ++j) if (GETBIT(mask, j)) cur += a[j];
bool check = true;
for(int i = 0; i < n; ++i) if (GETBIT(mask, i))
for(int j = 0; j<n; ++j) if (GETBIT(mask, j))
if (graph[i][j]) check = false;
if (check) maximize(ans, cur);
}
return ans;
}
}
namespace Sub2{
bool check(){
for(int i = 1; i<n; ++i) if (q[i] != 1) return false;
return true;
}
int solve(){
int ans = 0;
for(int i = 0; i<n; ++i) ans += a[i];
return ans;
}
}
namespace Sub3{
bool check(){
for(int i = 1; i<n; ++i) if (q[i] != 2) return false;
return true;
}
int solve(){
int ans = 0;
for(int i = 0; i<n; ++i) maximize(ans, a[i]);
return ans;
}
}
namespace Sub4{
bool check(){
for(int i = 1; i<n; ++i) if (q[i] != 0) return false;
return true;
}
vector<int> graph[N];
int dp[N][2];
void dfs(int u){
dp[u][1] = a[u];
for(int v: graph[u]){
dfs(v);
dp[u][0] += max(dp[v][0], dp[v][1]);
dp[u][1] += dp[v][0];
}
}
int solve(){
for(int i= 1; i<n; ++i) graph[p[i]].push_back(i);
dfs(0);
return max(dp[0][0], dp[0][1]);
}
}
int findSample(int _n, int confidence[], int host[], int protocol[]){
n = _n;
for(int i = 0; i < n; ++i) a[i] = confidence[i];
for(int i = 1; i<n; ++i){
p[i] = host[i];
q[i] = protocol[i];
}
if (Sub2::check()) return Sub2::solve();
if (Sub3::check()) return Sub3::solve();
if (Sub4::check()) return Sub4::solve();
if (Sub1::check()) return Sub1::solve();
return -1;
}
// int main(void){
// ios::sync_with_stdio(0);cin.tie(0); cout.tie(0);
// clock_t start = clock();
// cerr << "Time elapsed: " << clock() - start << " ms\n";
// return 0;
// }
