#include <bits/stdc++.h>
using namespace std;
typedef long long ll;
#include "september.h"
const int N = 2e5+5;
int in[N] , out[N] , dp[N][20];
vector<int> adj[N];
int pt = 0;
void dfs(int node){
	in[node] = ++pt;
	for(auto ch : adj[node]){
		dfs(ch);
	}
	out[node] = pt;
}
void build(vector<int> &v){
	int n = v.size();
	for(int i=0;i<n;i++) dp[i][0] = v[i];
	for(int k=1;k<20;k++){
		for(int i=0;i+(1<<k)-1<n;i++){
			dp[i][k] = max(dp[i][k-1] , dp[i+(1<<k-1)][k-1]);
		}
	}
}
int query(int l,int r){
	int lg = __lg(r-l+1);
	return max(dp[l][lg],dp[r-(1<<lg)+1][lg]);
}
struct DSU{
	int n;
	vector<int> par;
	int comps;
	DSU(int _n){
		n = _n;
		par.resize(n);
		iota(par.begin(),par.end(),0);
		comps = n;
	}
	int getP(int node){
		if(node == par[node]) return node;
		return par[node] = getP(par[node]);
	}
	void add(int a,int b){
		a = getP(a);
		b = getP(b);
		if(a == b) return;
		comps --;
		par[b] = a;
	}
};
bool check_anc(int a,int b){
	return in[a] <= in[b] && out[b] <= out[a];
}
int solve(int n, int m, std::vector<int> p, std::vector<std::vector<int>> v) {
	pt = 0;
	for(int i=0;i<=n;i++){
		in[i] = out[i] = 0;
		adj[i].clear();
	}
	for(int i=1;i<n;i++){
		adj[p[i]].push_back(i);
	}
	vector<vector<bool>> rel(n,vector<bool>(n));
	dfs(0);
	DSU ds(n);
	for(auto a : v){
		DSU tmp2(n);
		vector<int> idx(n+1);
		for(int i=0;i<n-1;i++){
			idx[a[i]] = i;
		}
		vector<int> tmp(n+1);
		for(int i=1;i<n;i++) tmp[in[i]] = idx[i];
		build(tmp);
		vector<int> sts;
		sts.push_back(0);
		int t = -1;
		for(int i=0;i<n-1;i++){
			if(i == t) sts.push_back(i);
			t = max(t , query(in[a[i]],out[a[i]]) + 1);
		}
		int sz = sts.size();
		for(int i=0;i<sz-1;i++){
			for(int j=sts[i]+1;j<sts[i+1];j++) {
				ds.add(a[j],a[j-1]);
				tmp2.add(a[j],a[j-1]);
			}
		}
		for(int i=sts.back()+1;i<n-1;i++) {
			ds.add(a[i],a[i-1]);
			tmp2.add(a[i],a[i-1]);
		}
	}
	return ds.comps - 1;
}