#include <bits/stdc++.h>
//#include <atcoder/modint>

using namespace std;
//using namespace atcoder;
using ll = long long;
//using mint = modint998244353;

int main(){
    cin.tie(nullptr);
    ios_base::sync_with_stdio(false);

    /*
       葉の頂点の純粋さの多重集合を持っておく。
       これから純粋さが最大のものを答えに足し、多重集合から取り除く。
       時刻iに汚染されるような葉の頂点の集合v(i)を求めておき、(i<=10^5)
       取り除くたびにiをインクリメントしてv(i)に対応する純粋さを多重集合から取り除く。
    */

    ll N, M;
    cin >> N >> M;
    vector<ll> P(N);
    for (int i=0; i<N; i++) cin >> P[i];
    vector<vector<ll>> E(N);
    for (int i=0; i<N-1; i++){
        ll a, b;
        cin >> a >> b;
        a--; b--;
        E[a].push_back(b);
        E[b].push_back(a);
    }
    vector<ll> C(M);
    for (int i=0; i<M; i++){
        cin >> C[i];
        C[i]--;
    }

    vector<ll> dist(N, 1e9);
    queue<ll> que;
    for (int i=0; i<M; i++){
        dist[C[i]] = 0;
        que.push(C[i]);
    }
    while(!que.empty()){
        auto from = que.front();
        que.pop();
        for (auto to : E[from]){
            if (dist[to] == 1e9){
                dist[to] = dist[from]+1;
                que.push(to);
            }
        }
    }
    multiset<ll> st;
    vector<vector<ll>> v(N+1);
    for (int i=0; i<N; i++){
        if (E[i].size() == 1){
            if (dist[i] > 0) st.insert(P[i]);
            v[dist[i]].push_back(i);
        }
    }
    ll ans=0, now=1, val;
    while(!st.empty() && now <= N){
        val = *st.rbegin();
        ans += val;
        st.erase(st.find(val));
        for (auto x : v[now]) if (st.count(P[x])) st.erase(st.find(P[x]));
        now++;
    }
    cout << ans << endl;

    return 0;
}