#pragma GCC optimize("Ofast")
#include<bits/stdc++.h>
using namespace std;

const int N=35005;
const int mod=1e9+7;

vector<int> adj[N];
int deg[N];
int a[N],n,X;

inline void addx(int &x,int y){if((x+=y)>=mod)x-=mod;}

// f[u]: not choose u
// g[u][st]: choose u, state = st
int f[N],g[N][16];
int good[N][16],coef[N];
void dfs(int u,int fa){
    vector<int> son;
    for(auto v:adj[u]){
        if(v==fa)continue;
        dfs(v,u);
        son.push_back(v);
    }

    // not choose u
    f[u]=1;
    for(auto v:son){
        int ret=f[v];
        for(int j=0;j<16;j++)ret=(ret+g[v][j])%mod;
        f[u]=1ll*f[u]*ret%mod;
        for(int j=0;j<16;j++){
            if(a[u]+good[v][j]<=0)
                addx(coef[v],g[v][j]);
        }
    }
    // choose u
    int len=son.size();
    for(int st=0;st<1<<len;st++){
        int num=st?__builtin_popcount(st):0;
        static int s[5];
        int p=0,global_ways=1;

        static int ttmp[5];

        int _=a[u];
        for(int i=0;i<len;i++){
            if(st>>i&1){
                s[p]=son[i];
                ttmp[p]=a[son[i]];
                p++;
                _+=max(0,a[son[i]]);
            }else{
                global_ways=1ll*global_ways*f[son[i]]%mod;
            }
        }
        good[u][st]=_;
        
        sort(ttmp,ttmp+p,greater<int>());
        bool global_ok=1;
        int global_cur=a[u];
        for(int i=0;i<p;i++){
            global_cur+=ttmp[i];
            if(global_cur>0)global_ok=0;
        }
        if(!global_ok)continue;

        int ways=1;
        for(int i=0;i<p;i++)
            ways=1ll*ways*coef[s[i]]%mod;
        addx(g[u][st],1ll*ways*global_ways%mod);
    }
}

void sc(){
    memset(f,0,sizeof(f));
    memset(g,0,sizeof(g));
    memset(good,0,sizeof(good));
    memset(coef,0,sizeof(coef));

    scanf("%d%d",&n,&X);
    for(int i=1;i<=n;i++)adj[i].clear(),deg[i]=0;
    for(int i=1;i<=n;i++)scanf("%d",&a[i]),a[i]-=X;
    for(int i=1;i<n;i++){
        int u,v;scanf("%d%d",&u,&v);
        adj[u].push_back(v),adj[v].push_back(u);
        deg[u]++,deg[v]++;
    }
    int root=0;
    for(int i=1;i<=n;i++)
        if(deg[i]==1)root=i;
    dfs(root,0);
    int ans=f[root];
    for(int st=0;st<16;st++)addx(ans,g[root][st]);
    printf("%d\n",ans);
}

int main(){
    int T;scanf("%d",&T);
    while(T--)sc();
    return 0;
}