#include <bits/stdc++.h>
using namespace std;

#ifdef DEBUG
auto&operator<<(auto&o,pair<auto,auto>p){return o<<"("<<p.first<<", "<<p.second<<")";}
auto operator<<(auto&o,auto x)->decltype(x.end(),o){o<<"{";int i=0;for(auto e:x)o<<","+!i++<<e;return o<<"}";}
#define debug(X...)cerr<<"["#X"]: ",[](auto...$){((cerr<<$<<"; "),...)<<endl;}(X)
#else
#define debug(...){}
#endif

#define ll long long
#define ld long double
#define endl '\n'
#define st first
#define nd second
#define pb push_back
#define sz(x) (int)(x).size()
#define all(x) (x).begin(), (x).end()
#define FOR(i,l,r) for(int i=(l);i<=(r);i++)
#define ROF(i,r,l) for(int i=(r);i>=(l);i--)
int inf=1000000007;
ll infl=1000000000000000007;
ll mod=1000000007;

const int N=200007,L=18;

vector<int>G1[N];
int pre[N],post[N],it;
int skok[N][L];

vector<int>G[N*(L+1)+7],RG[N*(L+1)+7];

int aaa;

void edge(int u,int v)
{
	aaa++;
	G[u].pb(v);
	RG[v].pb(u);
}

void dfs(int v,int o)
{
	pre[v]=++it;
	skok[v][0]=o;
	edge(v*(L+1)+1,o*(L+1));
	FOR(i,1,L-1) 
	{
		//edge(v*(L+1)+i+1,v*(L+1)+i);
		edge(v*(L+1)+i+1,skok[v][i-1]*(L+1)+i);
		skok[v][i]=skok[skok[v][i-1]][i-1];
	}
	for(auto u:G1[v]) if(u!=o) dfs(u,v);
	post[v]=it;
}

bool anc(int u,int v)
{
	return pre[u]<=pre[v]&&post[u]>=post[v];
}
int lca(int u,int v)
{
	if(anc(u,v)) return u;
	ROF(i,L-1,0) if(!anc(skok[u][i],v)) u=skok[u][i];
	return skok[u][0];
}

vector<int>X[N];

bool odw[N*(L+1)+7];
int scc[N*(L+1)+7];
vector<int>ord;

int ile[N*(L+1)+7];
bool ok[N*(L+1)+7];

void dfs2(int v)
{
	odw[v]=1;
	for(auto u:G[v]) if(!odw[u]) dfs2(u);
	if(v%(L+1)>1&&!odw[v-1])  dfs2(v-1);
	ord.pb(v);
}

int ans=inf,C;

int c[N];
bool good[N];

void dfs3(int v)
{
	scc[v]=C;
	if(v%(L+1)==0&&good[v/(L+1)]) ile[C]++; 
	for(auto u:RG[v]) 
	{
		if(!scc[u]) dfs3(u);
		else if(scc[u]!=C) ok[scc[u]]=0;
	}
	if(v%(L+1)!=0&&v%(L+1)<18) 
	{
		int u=v+1;
		if(!scc[u]) dfs3(u);
		else if(scc[u]!=C) ok[scc[u]]=0;
	}
}


signed main()
{
    ios_base::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    int n,k;
    cin>>n>>k;
    FOR(i,1,n-1)
    {
		int a,b;
		cin>>a>>b;
		G1[a].pb(b);
		G1[b].pb(a);
	}
	dfs(1,1);
	FOR(i,1,n)
	{
		cin>>c[i];
		X[c[i]].pb(i);
	}
	debug(aaa);
	FOR(i,1,k)
	{
		int l=X[i][0];
		good[l]=1;
		for(int j=1;j<sz(X[i]);j++) 
		{
			l=lca(l,X[i][j]);
			edge(X[i][j]*(L+1),X[i][j-1]*(L+1));
			edge(X[i][j-1]*(L+1),X[i][j]*(L+1));
		}
		debug(i,l);
		for(auto U:X[i])
		{
			edge(U*(L+1),l*(L+1));
			int u=U;
			ROF(j,L-1,0)
			{
				if(!anc(skok[u][j],l))
				{
					edge(U*(L+1),u*(L+1)+j+1);
					u=skok[u][j];
				}
			}
		}
	}
    for(int i=L+1;i<=n*(L+1)+L;i++) if(!odw[i]) dfs2(i);
    reverse(all(ord));
    for(auto i:ord)
    {
		if(scc[i]) continue;
		C++;
		ok[C]=1;
		dfs3(i);
	}
	for(int i=1;i<=C;i++) if(ok[i]&&ile[i]>0) ans=min(ans,ile[i]);
	cout<<ans-1<<endl;
	debug(aaa);
    

    return 0;
}