#pragma GCC target("avx2") #pragma GCC optimize("O3") #pragma GCC optimize("unroll-loops") #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include using namespace std; using namespace atcoder; typedef long long ll; #define rep(i, n) for (int i = 0; i < (int)(n); i++) #define repr(i, n) for (int i = (int)(n) - 1; i >= 0; i--) #define repk(i, k, n) for (int i = k; i < (int)(n); i++) #define all(v) v.begin(), v.end() #define mod1 1000000007 #define mod2 998244353 #define mod3 100000007 #define vi vector #define vs vector #define vc vector #define vl vector #define vb vector #define vvi vector> #define vvc vector> #define vvl vector> #define vvb vector> #define vvvi vector>> #define vvvl vector>> #define pii pair #define pil pair #define pli pair #define pll pair #define vpii vector> #define vpll vector> #define vvpii vector>> #define vvpll vector>> using mint = modint998244353; template void debug(T e) { cerr << e << endl; } template void debug(vector &v) { rep(i, v.size()) { cerr << v[i] << " "; } cerr << endl; } template void debug(vector> &v) { rep(i, v.size()) { rep(j, v[i].size()) { cerr << v[i][j] << " "; } cerr << endl; } } template void debug(vector> &v) { rep(i, v.size()) { cerr << v[i].first << " " << v[i].second << endl; } } template void debug(set &st) { for (auto itr = st.begin(); itr != st.end(); itr++) { cerr << *itr << " "; } cerr << endl; } template void debug(multiset &ms) { for (auto itr = ms.begin(); itr != ms.end(); itr++) { cerr << *itr << " "; } cerr << endl; } template void debug(map &mp) { for (auto itr = mp.begin(); itr != mp.end(); itr++) { cerr << itr->first << " " << itr->second << endl; } } void debug_out() { cerr << endl; } template void debug_out(Head H, Tail... T) { cerr << H << " "; debug_out(T...); } void dfs(vector &isvisited, vector> &graph, vector &e_cols, vector &v_cols, ll v) { isvisited[v] = true; ll col = 0; ll next_col = 0; for (ll i = 0; i < graph[v].size(); i++) { ll x = graph[v][i].first; ll x_col = e_cols[graph[v][i].second]; if (isvisited[x]) { col = x_col; continue; } else { next_col ^= x_col; dfs(isvisited, graph, e_cols, v_cols, x); } } v_cols[v] = col ^ next_col; } int main() { ll N; cin >> N; vector P(N - 1); for (ll i = 0; i < N - 1; i++) { cin >> P[i]; P[i]--; } string S; cin >> S; vector e_cols(N - 1, 0); for (ll i = 0; i < N - 1; i++) { if (S[i] == '#') { e_cols[i] = 1; } } ll Q; cin >> Q; vector U(Q); vector V(Q); for (ll i = 0; i < Q; i++) { cin >> U[i] >> V[i]; U[i]--; V[i]--; } vector> graph(N, vector(0)); for (ll i = 0; i < N - 1; i++) { graph[i + 1].push_back(pll(P[i], i)); graph[P[i]].push_back(pll(i + 1, i)); } vector v_cols(N, -1); vector isvisited(N, false); dfs(isvisited, graph, e_cols, v_cols, 0); // debug(v_cols); dsu tree(N); for (ll i = 0; i < Q; i++) { tree.merge(U[i], V[i]); } vector cc_cols(N, 0); for (ll i = 0; i < N; i++) { cc_cols[tree.leader(i)] += v_cols[i]; } bool ans = true; for (ll i = 0; i < N; i++) { if (cc_cols[i] % 2 != 0) { ans = false; } } if (ans) { cout << "Yes" << endl; } else { cout << "No" << endl; } }