#include <ios>
#include <set>
#include <vector>
#define INF (int(1e9))
#define REP(i, n) for (int i=0; i<(n); ++i)
#define FOR(i, p, n) for (int i=(p); i<(n); ++i)
#define V std::vector
typedef long long ll;
typedef V <int> vi;
typedef V <ll> vll;
typedef V <bool> vb;
struct stznaj{
    vi t; // min na przedziale
    int comp;
    stznaj(int n, const vi &v){
        comp=1;
        while (comp<n)
            comp<<=1;
        t.resize(comp<<1, INF);
        --comp;
        for (size_t i=0; i<v.size(); ++i)
            t[i+comp+1]=v[i];
        for (int i=comp; i; --i)
            t[i]=std::min(t[i<<1], t[(i<<1)+1]);
    }
    int znaj(int p, int k, int w){
        // najmniejszy index w <p, k>, ze t[comp+i]<w
        ++p,++k;
        int pb=-1,kb=-1;
        for (p+=comp,k+=comp-1; p<k; p>>=1,k>>=1){
            if (p&1){
                if (t[p]<w&&pb<0)
                    pb=p;
                ++p;
            }
            if (k&1){
                --k;
                if (t[k]<w)
                    kb=k;
            }
        }
        if (pb<0)
            pb=kb;
        if (pb<0)
            return -1;
        while (pb<=comp){
            pb<<=1;
            if (t[pb]>=w)
                ++pb;
        }
        return pb-comp-1;
    }
};
struct prz{
    int p,k;
};
int main(){
    int n;
    scanf("%d", &n);
    vi kraw(n-1, -1); // kraw[i] to i->i+1
    REP(i, n-1)
        scanf("%d", &kraw[i]),--kraw[i];
    V <vi> kluzb(n, vi());
    V <std::set <int>> poz(n);
    REP(i, n){
        int l;
        scanf("%d", &l);
        while (l--){
            int p;
            scanf("%d", &p),--p;
            kluzb[i].emplace_back(p);
            poz[p].insert(i);
        }
    } // koniec wczytywania, numery zmapowane na <0,n-1>
    V <prz> wyn(n);
    { // calc wynikowych przedzialow
        vi lprp(n, -1),pprp(n, -1);
        REP(i, n-1){
            // chcemy dojsc do i krawedzia i<->i+1,
            // jak daleko na prawo musimy siegac?
            // i jezeli mamy <p, k>, to mozemy dojsc
            // do i<p, jezeli mozemy dojsc do i+1
            // oraz pprp[i]<=k
            auto itr=poz[kraw[i]].upper_bound(i);
            if (itr!=poz[kraw[i]].end())
                pprp[i]=*itr;
            else
                pprp[i]=INF;
        }
        FOR(i, 1, n){
            // chcemy dojsc do i krawedzia i-1<->i,
            // jak daleko na lewo musimy siegac?
            // i jezeli mamy <p, k>, to mozemy dojsc
            // do i>k, jezeli mozemy dojsc do i-1
            // oraz lprp[i]>=p (-1 jest ok)
            auto itr=poz[kraw[i-1]].lower_bound(i);
            if (itr!=poz[kraw[i-1]].begin()) // czyli niepusty!
                --itr,lprp[i]=*itr;
        }
        // teraz chcemy umiec pytac:
        // "mamy <p, k>, jak daleko w prawo mozemy pojsc?"
        // innymi slowy, jaki jest pierwszy >k ziom 'i'
        // o lprp[i]<p? (lub ze nie istnieje)
        // no to wrzucamy na st z minem na prz i tyle
        stznaj st(n, lprp);
        V <prz> v;
        REP(i, n){
            int p=i,k=st.znaj(p+1, n, p);
            k=k<0 ? n : k-1;
            while (v.size()&&pprp[p-1]<=k){
                // laczymy
                p=std::min(v.back().p, p);
                k=std::max(v.back().k, k);
                v.pop_back();
                // rozszerzamy
                k=st.znaj(k+1, n, p);
                k=k<0 ? n : k-1;
            }
            prz tmp={p, k};
            wyn[i]=tmp;
            v.push_back(tmp);
        }
    }
    int q;
    scanf("%d", &q);
    while (q--){
        int p,k;
        scanf("%d%d", &p, &k);
        --p,--k;
        bool w=0;
        if ((k>p&&wyn[p].k>=k)||(k<p&&wyn[p].p<=k))
            w=1;
        printf(w ? "YES\n" : "NO\n");
    }
}