#include <bits/stdc++.h>

#define int long long
#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()
using namespace std;
int inf=1000000000000000007;
int mod=1000000007;
int mod1=998244353;

const bool multi=1;

const int N=500007,L=19;

int pre[N],post[N],c;
int skok[N][L];
vector<int>G[N];

void dfs(int v,int o)
{
    skok[v][0]=o;
    for(int i=1;i<L;i++) skok[v][i]=skok[skok[v][i-1]][i-1];
    pre[v]=c++;
    for(auto u:G[v]) if(u!=o) dfs(u,v);
    post[v]=c++;
}

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;
    if(anc(v,u)) return v;
    for(int i=19;i>=0;i--) if(!anc(skok[u][i],v)) u=skok[u][i];
    return skok[u][0];
}
vector<int>V[N];
int ile[N];

void dfs1(int v,int o)
{
    for(auto u:G[v])
    {
        if(u==o) continue;
        dfs1(u,v);
        ile[v]+=ile[u];
    }
}

int id[N],it;
int deg[N];

void dfs2(int v,int o)
{
    for(auto u:G[v])
    {
        if(u==o) continue;
        if(ile[u]==0)
        {
            id[u]=++it;
            deg[id[v]]++;
            deg[id[u]]++;
        }
        else id[u]=id[v];
        dfs2(u,v);
    }
}

signed main()
{
    ios_base::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    int n,k,a,b;
    cin>>n>>k;
    for(int i=1;i<n;i++)
    {
        cin>>a>>b;
        G[a].pb(b);
        G[b].pb(a);
    }
    dfs(1,1);
    for(int i=1;i<=n;i++)
    {
        cin>>a;
        V[a].pb(i);
    }
    for(int i=1;i<=n;i++)
    {
        for(int j=1;j<sz(V[i]);j++)
        {
            int l=lca(V[i][j],V[i][j-1]);
            ile[V[i][j]]++;
            ile[V[i][j-1]]++;
            ile[l]--;
        }
    }
    dfs1(1,0);
    id[1]=++it;
    dfs2(1,0);
    int ans=0;
    for(int i=1;i<=it;i++) if(deg[i]==1) ans++;
    cout<<max(0LL,ans-1);

    return 0;
}