#include<bits/stdc++.h>
using namespace std;
constexpr int S1=1<<20;
char buf1[S1],*l1,*r1;
#define getchar() ((l1==r1&&(r1=(l1=buf1)+fread(buf1,1,S1,stdin)),l1!=r1)?*l1++:EOF)
template<typename T=int>inline T read()
{
	T x=0;
	char c=getchar();
	while(c<'0'||c>'9')
		c=getchar();
	while(c>='0'&&c<='9')
	{
		x=c-'0'+x*10;
		c=getchar();
	}
	return x;
}
constexpr int MN=200005,inf=0x3f3f3f3f;
int n,m,a[MN],cnt,dfn[MN],rnk[MN],siz[MN],hson[MN];
vector<int>g[MN];
set<int>st;
struct node
{
	int l,r,k;
};
vector<node>ch[MN];
struct segt
{
	int l,r,tg;
	vector<int>v;
}T[MN*4];
inline void addrect(int l1,int r1,int l2,int r2,int k)
{
	ch[l2].push_back({l1-1,r1-1,k});
	ch[r2+1].push_back({l1-1,r1-1,-k});
}
inline void addnd(int x,int k)
{
	x=a[x];
	auto it=st.lower_bound(x);
	int r=*it,l=*(--it);
	addrect(l+1,x,x,r-1,k);
	st.insert(x);
}
void dfs1(int x,int f)
{
	siz[x]=1;
	dfn[x]=++cnt;
	rnk[cnt]=x;
	for(int y:g[x])
	{
		if(y==f)
			continue;
		dfs1(y,x);
		siz[x]+=siz[y];
		if(siz[y]>siz[hson[x]])
			hson[x]=y;
	}
}
void dfs2(int x,int f,int d)
{
	for(int y:g[x])
		if(y!=f&&y!=hson[x])
		{
			dfs2(y,x,1);
			st.clear();
			st.insert(0),st.insert(n+1);
		}
	if(hson[x])
		dfs2(hson[x],x,d+1);
	addnd(x,d);
	for(int y:g[x])
		if(y!=f&&y!=hson[x])
			for(int i=0;i<siz[y];i++)
				addnd(rnk[dfn[y]+i],d);
}
inline void up(int i)
{
	for(int j=0;j<m;j++)
		T[i].v[j]=max(T[i<<1].v[j],T[i<<1|1].v[j]);
}
inline void down(int i)
{
	int&x=T[i].tg;
	if(!x)
		return;
	for(int j=0;j<m;j++)
	{
		T[i<<1].v[j]+=x;
		T[i<<1|1].v[j]+=x;
	}
	T[i<<1].tg+=x;
	T[i<<1|1].tg+=x;
	x=0;
}
void build(int i,int l,int r)
{
	T[i].l=l,T[i].r=r;
	T[i].v.resize(m,-inf);
	if(l==r)
		return;
	int mid=(l+r)>>1;
	build(i<<1,l,mid);
	build(i<<1|1,mid+1,r);
}
void change(int i,int x,vector<int>y)
{
	if(T[i].l==T[i].r)
	{
		for(int j=0;j<m;j++)
			T[i].v[j]=y[j]+T[i].tg;
		return;
	}
	down(i);
	if(x>T[i<<1].r)
		change(i<<1|1,x,y);
	else
		change(i<<1,x,y);
	up(i);
}
void add(int i,int l,int r,int x)
{
	if(l<=T[i].l&&T[i].r<=r)
	{
		for(int j=0;j<m;j++)
			T[i].v[j]+=x;
		T[i].tg+=x;
		return;
	}
	down(i);
	if(l<=T[i<<1].r)
		add(i<<1,l,r,x);
	if(r>T[i<<1].r)
		add(i<<1|1,l,r,x);
	up(i);
}
int main()
{
	n=read(),m=read();
	for(int i=1;i<=n;i++)
		a[read()]=i;
	for(int i=1;i<n;i++)
	{
		int x=read(),y=read();
		g[x].push_back(y);
		g[y].push_back(x);
	}
	dfs1(1,0);
	st.insert(0),st.insert(n+1);
	dfs2(1,0,0);
	build(1,0,n);
	vector<int>f;
	f.resize(m,-inf);
	f[0]=0;
	change(1,0,f);
	for(int i=1;i<=n;i++)
	{
		for(auto e:ch[i])
			add(1,e.l,e.r,e.k);
		f=T[1].v;
		f.insert(f.begin(),-inf);
		change(1,i,f);
	}
	printf("%d\n",2*f[m]);
	return 0;
}