#include<bits/stdc++.h>
#define ff first
#define ss second
#define pb push_back
using namespace std;
typedef long long ll;
typedef pair<int,int> pii;

const int mod=998244353;
inline int add(int x,int y){int ret=x+y;if(ret>=mod)ret-=mod;return ret;}
inline int sub(int x,int y){int ret=x-y;if(ret<0)ret+=mod;return ret;}
inline int mul(int x,int y){return ((ll)x*y)%mod;}
inline int step(int base,int pw){int ret=1;while(pw){if(pw&1)ret=mul(ret,base);base=mul(base,base);pw>>=1;}return ret;}
inline int invv(int x){return step(x,mod-2);}

inline char gc() { // like getchar()
	static char buf[1 << 16];
	static size_t bc, be;
	if (bc >= be) {
		buf[0] = 0, bc = 0;
		be = fread(buf, 1, sizeof(buf), stdin);
	}
	return buf[bc++]; // returns 0 on EOF
}

int readInt() {
	int a, c;
	while ((a = gc()) < 40);
	if (a == '-') return -readInt();
	while ((c = gc()) >= 48) a = a * 10 + c - 480;
	return a - 48;
}

struct fenwick{

    vector<ll>bit;
    int n;

    fenwick(){
        n=0;
    }
    fenwick(int n){
        bit.resize(n+1);
        this->n=n;
    }

    void add(int x,ll val){
        while(x<=n){
            bit[x]+=val;
            x+=(x&(-x));
        }
    }
    ll get(int x){
        ll ret=0;
        while(x){
            ret+=bit[x];
            x-=(x&(-x));
        }
        return ret;
    }
    ll get(int l,int r){
        return get(r)-get(l-1);
    }

};


const int maxn=2e5+10;


int n,q;
vector<int>vect[2][maxn];
struct qqq{
    int tip;
    int id,x,y;
    int p,nval,rez;
};
vector<qqq>qrys;
int nstart[2][maxn],nend[2][maxn],ctm[2],niz[2][maxn];

void dfs(int x,int cc){
    nstart[cc][x]=++ctm[cc];
    niz[cc][ctm[cc]]=x;
    for(int i=0;i<vect[cc][x].size();i++){
        int id=vect[cc][x][i];
        dfs(id,cc);
    }
    nend[cc][x]=ctm[cc];
}
void build_dfsorder(){
    dfs(1,0);
    dfs(1,1);
}

void upisi_qry_sz(){
    fenwick BIT(n);
    for(int i=1;i<=n;i++)BIT.add(i,1);
    for(int i=qrys.size()-1;i>=0;i--){
        qqq &qc=qrys[i];
        if(qc.tip==1)BIT.add(nstart[0][qc.x],-1);
        else qc.rez=BIT.get(nend[0][qc.p])-BIT.get(nstart[0][qc.p]-1);
    }
}


struct node{
    vector<int>vals;
    fenwick BIT;

    node(){
        ///printf("NNN %d\n",n+1);
        vals.pb(0);vals.pb(maxn);
    }

    void ubaci(int x){
        int pos=lower_bound(vals.begin(),vals.end(),x)-vals.begin();
        BIT.add(pos,1);

    }

    void ispis(){
        for(int i=0;i<vals.size();i++)printf("%d ",vals[i]);
        printf(" VALS\n");
    }
    int get(int x){

        int pos=lower_bound(vals.begin(),vals.end(),x)-vals.begin();

        if(vals[pos]==x){}
        else pos--;

        //ispis();
        //printf("%d %d | %d POS\n",x,pos,BIT.get(pos));

        return BIT.get(pos);
    }

}tree[maxn*4];

void init_ubaci(int x,int l,int r,int id,int val){
    tree[x].vals.pb(val);
    if(l==r)return;
    int mid=(l+r)/2;
    if(id<=mid)init_ubaci(x*2,l,mid,id,val);
    else init_ubaci(x*2+1,mid+1,r,id,val);
}
void pripremi_BIT(int x,int l,int r){
    sort(tree[x].vals.begin(),tree[x].vals.end());
    tree[x].BIT=fenwick(tree[x].vals.size());
    if(l==r)return;
    int mid=(l+r)/2;
    pripremi_BIT(x*2,l,mid);
    pripremi_BIT(x*2+1,mid+1,r);
}
void init_nodes(){

    for(int i=1;i<=n;i++)
        init_ubaci(1,1,n,nstart[0][i],i);
    pripremi_BIT(1,1,n);

}
void upd(int x,int l,int r,int id,int val){
    tree[x].ubaci(val);
    if(l==r)return;
    int mid=(l+r)/2;
    if(id<=mid)upd(x*2,l,mid,id,val);
    else upd(x*2+1,mid+1,r,id,val);
}
int qry(int x,int l,int r,int lp,int rp,int vp){
    if(l>rp || r<lp)return 0;
    if(l>=lp && r<=rp){
        ///printf("%d %d - %d %d | val= %d \n",l,r,lp,rp,tree[x].get(vp));
        return tree[x].get(vp);
    }
    int mid=(l+r)/2;
    return qry(x*2,l,mid,lp,rp,vp)+qry(x*2+1,mid+1,r,lp,rp,vp);
}
vector<pair<pii,pair<int,pii> >>ofq[maxn];
void cepaj(){

    for(int i=1;i<=n;i++){
        int id=niz[1][i];
        upd(1,1,n,nstart[0][id],id);

        for(int j=0;j<ofq[i].size();j++){

            int lp=ofq[i][j].ff.ff;
            int rp=ofq[i][j].ff.ss;
            int nval=ofq[i][j].ss.ff;
            int coef=ofq[i][j].ss.ss.ff;
            int id=ofq[i][j].ss.ss.ss;

            qrys[id].rez+=coef*qry(1,1,n,lp,rp,nval);

            ///printf("%d | %d %d %d | %d  val= %d | %d \n",i,lp,rp,nval,coef,-coef*qry(1,1,n,lp,rp,nval),id);

        }

    }

}

int main(){

    freopen("company.in","r",stdin);
    freopen("company.out","w",stdout);

    n=readInt();
    for(int i=2;i<=n;i++){
        int a;
        a=readInt();
        vect[0][a].pb(i);
    }
    for(int i=2;i<=n;i++){
        int a;
        a=readInt();
        vect[1][a].pb(i);
    }

    q=readInt();


    int ccnt=n;
    for(int i=0;i<q;i++){

        int tip;
        tip=readInt();
        if(tip==1){
            ccnt++;

            int x,y,id;

            id=readInt();
            x=readInt();
            y=readInt();
            qrys.pb({tip,id,x,y,0,0,0});

            vect[0][x].pb(id);
            vect[1][y].pb(id);
        }
        else{
            int p;
            p=readInt();
            qrys.pb({tip,0,0,0,p,ccnt,0});
        }



    }
    n=ccnt;


    build_dfsorder();
    upisi_qry_sz();

    init_nodes();

    for(int i=0;i<qrys.size();i++){
        qqq &qc=qrys[i];

        if(qc.tip==2){
            ofq[nstart[1][qc.p]-1].pb({{ nstart[0][qc.p],nend[0][qc.p] },{qc.nval,{1,i} } } );
            ofq[nend[1][qc.p]].pb({{ nstart[0][qc.p],nend[0][qc.p] },{qc.nval,{-1,i} } } );

            ///printf("%d %d \n",i,qc.rez);
        }

    }

    /*for(int i=0;i<2;i++){
        for(int j=1;j<=n;j++){
            printf("%d ",niz[i][j]);
        }
        printf(" | %d ORDER\n",i);
    }*/

    cepaj();

    for(int i=0;i<q;i++){
        if(qrys[i].tip==2)printf("%d\n",qrys[i].rez);
    }

    return 0;
}