#include <bits/stdc++.h>
#define IOS ios::sync_with_stdio(0), cin.tie(0)
#define int long long
#define endl '\n'
#define lowbit(x) (x)&(-x)
#define pii pair<int,int>
#define all(s) s.begin(), s.end()
#define ls(x) (x<<1)
#define rs(x) (x<<1|1) 
#define here system("pause")
using namespace std;

const int N = 3e5+5;
const int mod = 1e9+7;
const int INF = 1e15+7;
const double eps = 1e-6;
inline int pow(int a, int b, int p){ int res = 1%p; while(b){ if(b&1) res=res*a%p; a=a*a%p, b>>=1;} return res;}
inline int inv(int a, int p){ return pow(a,p-2,p)%p;}

int n, q;
vector<int> g[N];
int anc[N][20], dep[N], ask[N<<1], indeg[N];

inline void sol(){
	cin >> n;
	for(int i=2;i<=n;i++){
		cin >> anc[i][0];
	}
	for(int i=1;i<=n;i++){
		dep[i]=dep[anc[i][0]]+1;
	}
	
	for(int j=1;j<20;j++){
		for(int i=1;i<=n;i++){
			anc[i][j] = anc[anc[i][j-1]][j-1];
		}
	}
	
	cin >> q;
	while(q--){
		bool flag = 1;
		int num;
		cin >> num;
		set<int> dots;
		for(int i=1;i<=num;i++){
			cin >> ask[i];
			dots.insert(ask[i]);
			if(i!=1 && dep[ask[i]] < dep[ask[i-1]]) flag = 0;
		}
		
		if(dots.size()!=num) flag = 0;		
		if(!flag){
			cout << "No\n";
			continue;
		}
		
		set<int> st;
		for(int i=2;i<=num;i++){
			if(dep[ask[i-1]] == dep[ask[i]]){
				int a = ask[i-1], b = ask[i];
				for(int i=19;i>=0;i--){
					if(anc[a][i] != anc[b][i]) a = anc[a][i], b = anc[b][i]; 
				}
				st.insert(a), st.insert(b);
				g[a].push_back(b);
				++indeg[b];
			}
		}
		
		queue<int> q;
		for(int k:st){
			if(!indeg[k]) q.push(k);
		}
		while(q.size()){
			int now = q.front();
			q.pop();
			for(int nxt:g[now]){
				--indeg[nxt];
				if(!indeg[nxt]) q.push(nxt);
			}
		}
		
		for(int k:st){
			if(indeg[k]) flag = 0;
		}
		
		if(flag) cout << "Yes\n";
		else cout << "No\n";
		
		for(int k:st){
			g[k].clear();
			indeg[k] = 0;
		}
	}
}
/*

11
1 1 1 1 1 1 1 1 1 2
6
2 2 1
4 1 3 2 10
4 2 3 2 7
3 2 3 2
6 1 2 7 9 4 10
*/
signed main(){
	IOS;
	int tc = 1;
	while(tc--){
		sol();
	}
	return 0;
}