#include<cstdio>
#include<vector>
using namespace std;
typedef long long ll;
inline int read(){
	int x=0;
	int f=0,ch=0;
	while(ch<48||ch>57) f=(ch=='-'),ch=getchar();
	while(ch>47&&ch<58) x=(x<<3)+(x<<1)+(ch&15),ch=getchar();
	return f?-x:x;
}
inline void write(int x,char end=' '){
	if(x==0){
		putchar('0');
		putchar(end);
		return;
	}
	if(x<0) putchar('-'),x=-x;
	int ch[70]={0},cnt=0;
	while(x){
		ch[cnt++]=(int)(x%10);
		x/=10;
	}
	while(cnt--) putchar(ch[cnt]+48);
	putchar(end);
}
const ll mod=64123;
const int N=2005;
int n,k,w;
int d[N],fa[N];
struct node{
	int to,nxt;
}e[N<<1];
int head[N],cnt;
inline void add(int u,int v){
	e[++cnt].to=v;
	e[cnt].nxt=head[u];
	head[u]=cnt;
}
int du[N];
ll ans;
inline void dfs1(int u){
	for(int i=head[u];i;i=e[i].nxt){
		int v=e[i].to;
		if(v==fa[u]) continue;
		fa[v]=u;
		dfs1(v);
	}
}
vector<int> vec;
int sz;
inline void ins(int x){
	if(sz==0){
		vec.push_back(x),++sz;
		return;
	}
	int l=0,r=sz;
	while(l<r){
		int mid=(l+r)>>1;
		if(vec[mid]<x) r=mid;
		else l=mid+1;
	}
	vec.insert(vec.begin()+l,x);
	++sz;
}
inline void del(int x){
	int l=0,r=sz;
	while(l<r){
		int mid=(l+r)>>1;
		if(vec[mid]<=x) r=mid;
		else l=mid+1;
	}
	vec.erase(vec.begin()+l);
	--sz;
}
inline void dfs2(int u){
	ins(d[u]);
	if(sz>=k) ans=(ans+vec[k-1])%mod;
	for(int i=head[u];i;i=e[i].nxt){
		int v=e[i].to;
		if(v==fa[u]) continue;
		dfs2(v);
	}
	del(d[u]);
}
int main(){
	n=read(),k=read(),w=read();
	for(int i=1;i<=n;++i) d[i]=read();
	for(int i=1;i<n;++i){
		int u=read(),v=read();
		add(u,v);
		add(v,u);
		du[u]++,du[v]++;
	}
	int rt=0;
	for(int i=1;i<=n;++i){
		if(du[i]==1){
			rt=i;
			break;
		}
	}
	dfs1(rt);
	for(int i=1;i<=n;++i) dfs2(i);
	write(ans%mod);
	return 0;
}