#include <bits/stdc++.h>
using namespace std;
#define int long long
const int MXN = 1e5+5;
vector<int> E[MXN];
int num[MXN], cnt[MXN];
void dfs(int x){
    int mxc = -1;
    for(int i : E[x]) {
        dfs(i);
        cnt[num[i]]++;
        if(mxc == -1 || cnt[num[i]]>cnt[num[mxc]]) mxc = num[i];
    }
    if(mxc!=-1) num[x] = mxc;
}
signed main() {
    cin.tie(0)->sync_with_stdio(0);
    int n, k; cin >> n >> k;
    vector<int> v(k);
    for(auto &i : v) cin >> i;
    sort(v.begin(),v.end());
    for(int i=1;i<n;i++){
        int p; cin >> p;
        E[p].push_back(i);
    }
    int s = 0;
    for(int i=0;i<n;i++) if(E[i].size()==0)
        num[i] = s++;
    dfs(0);
    sort(cnt,cnt+k);
    int ans = 0;
    for(int i=0;i<k;i++) {
        ans += v[i]*cnt[i];
    }
    cout << ans;
}