1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
#include<cstdio>
#include<cstring>
#include<algorithm>
#include<iostream>
#include<queue>
#include<map>
#include<stack>
#include<cmath>
#include<set>
#include<bitset>
#include<complex>
#include<cstdlib>
#include<assert.h>
#define inc(i,l,r) for(int i=l;i<=r;i++)
#define dec(i,l,r) for(int i=l;i>=r;i--)
#define link(x) for(edge *j=h[x];j;j=j->next)
#define mem(a) memset(a,0,sizeof(a))
#define ll long long
#define eps 1e-8
#define succ(x) (1<<x)
#define lowbit(x) (x&(-x))
#define sqr(x) ((x)*(x))
#define NM 2005
#define nm 1000005
using namespace std;
const double pi=acos(-1);
const int inf=1e9+7;
ll read(){
ll x=0,f=1;char ch=getchar();
while(!isdigit(ch)){if(ch=='-')f=-1;ch=getchar();}
while(isdigit(ch))x=x*10+ch-'0',ch=getchar();
return f*x;
}
inline void reduce(ll&x){x+=x>>63&inf;}
struct edge{int t;edge*next;}e[NM<<1],*h[NM],*o=e;
void add(int x,int y){o->t=y;o->next=h[x];h[x]=o++;}
int n,m,cnt,_x,_y,a[NM],mp[nm],c[NM];
ll d[NM][NM],ans;
int size[NM],smin,tot,root;
bool v[NM];
void dfs1(int x,int f){size[x]=1;link(x)if(!v[j->t]&&j->t!=f)dfs1(j->t,x),size[x]+=size[j->t];}
void getroot(int x,int f){
int s=tot-size[x];
link(x)if(!v[j->t]&&j->t!=f)getroot(j->t,x),s=max(s,size[j->t]);
if(s<smin)smin=s,root=x;
}
void dfs(int x,int f){
link(x)if(!v[j->t]&&j->t!=f){
mem(d[j->t]);
inc(i,1,cnt)reduce(d[j->t][mp[c[i]/a[j->t]]]+=d[x][i]-inf);
dfs(j->t,x);
inc(i,1,cnt)reduce(d[x][i]+=d[j->t][i]-inf);
}
}
void div(int x){
dfs1(x,0);
tot=size[x];smin=n;
getroot(x,0);
v[root]++;
mem(d[root]);
d[root][mp[m/a[root]]]++;
dfs(root,0);
inc(i,1,cnt-1)reduce(ans+=d[root][i]-inf);
link(root)if(!v[j->t])div(j->t);
}
int main(){
int _=read();while(_--){
n=read();m=read();ans=cnt=0;
mem(h);mem(v);o=e;mem(mp);
inc(i,1,n)a[i]=read();
inc(i,2,n){_x=read();_y=read();add(_x,_y);add(_y,_x);}
inc(i,1,m+1)if(!mp[m/i])mp[m/i]=++cnt,c[cnt]=m/i;
div(1);
printf("%lld\n",ans);
}
return 0;
}
|
