#include<bits/stdc++.h>
using namespace std;
vector<int>T[100005];
int p[100005],d[100005],sz[100005];
int c1[100005],c2[100005];
int cmp(int x,int y){
	return c1[x]-c2[x]<c1[y]-c2[y];
}
void dfs(int rt){
	int l=T[rt].size();
	sz[rt]=1;
	c1[rt]++;
	if(l==0)return;
	for(int i=0;i<l;i++){
		int v=T[rt][i];
		dfs(v);
		sz[rt]+=sz[v];
	}
	sort(T[rt].begin(),T[rt].end(),cmp);
	int cnt=0,tot=0;;
	for(int i=0;i<l;i++){
		int v=T[rt][i];
		if(sz[v]&1){
			if(cnt&1){
				c1[rt]+=c2[v];
				c2[rt]+=c1[v];
			}
			else{
				c1[rt]+=c1[v];
				c2[rt]+=c2[v];
			}
			cnt++;
		}
		else if(c1[v]<c2[v]){
			c1[rt]+=c1[v];
			c2[rt]+=c2[v];
		}
	}
	for(int i=0;i<l;i++){
		int v=T[rt][i];
		if((!(sz[v]&1)) && c1[v]>=c2[v]){
			if(cnt&1){
				c1[rt]+=c2[v];
				c2[rt]+=c1[v];
			}
			else{
				c1[rt]+=c1[v];
				c2[rt]+=c2[v];
			}
		}
	}
}
int main(){
	int n;
	scanf("%d",&n);
	for(int i=2;i<=n;i++)scanf("%d",&p[i]);
	for(int i=2;i<=n;i++)T[p[i]].push_back(i);
	dfs(1);
	printf("%d\n",c1[1]);
	return 0;
}
#include <bits/stdc++.h>
using namespace std;
 
using ll = long long;
 
#define ff first
#define ss second
#define all(x) (x).begin(), (x).end()
#define len(x) int((x).size())
 
mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());
#define randint(n) uniform_int_distribution<int>(1, (n))(rng)

const int mxn=200100;

int link[mxn];
int sz[mxn];
map<int,int> M[mxn];

int C[mxn];

int head(int u)
{
	while(u!=link[u]) u=link[u];
	return u;
}

void join(int a, int b)
{
	a=head(a);
	b=head(b);
	if(a==b) return;

	if(sz[a]<sz[b]) swap(a,b);
	sz[a]+=sz[b];
	link[b]=a;

	// if(len(M[b])>len(M[a])) swap(M[a],M[b]);

	for(auto thing:M[b]){
		M[a][thing.ff] += thing.ss;
	}
}

int main()
{
	ios_base::sync_with_stdio(0);
	cin.tie(0);
 
	#ifdef ARTHUR_LOCAL
		ifstream cin("input.txt");
	#endif

	int n,q;
	cin>>n>>q;

	// cout << len(M[200]);

	for(int i=1; i<=n; i++) cin>>C[i];

	for(int i=1; i<=n; i++){
		link[i]=i;
		sz[i]=1;
		M[i][C[i]] = 1;
	}

	while(q--){
		int t;
		cin>>t;

		if(t==1){
			int a,b;
			cin>>a>>b;

			join(a,b);
		}

		else{
			int x,y;
			cin>>x>>y;

			cout << M[head(x)][y] << "\n";
		}
	}
}