\[ disup[v]=disup[u]+10^{dep[u]}*w\]
\[ disdown[v]=10 \cdot disdown[u]+w \]
void pre_dfs(int u,int f) {
for(int i=head[u]; ~i; i=e[i].nxt)if(e[i].to!=f) {
int v=e[i].to,w=e[i].w;
disup[v]=disup[u]+po[dep[u]]*w;
disdown[v]=10*disdown[u]+w;
dep[v]=dep[u]+1;
pre_dfs(v,u);
}
}
\[ up= \frac {disup[u]-disup[lca]}{10^{dep[lca]}} \]
\[ down=disdown[u]-disdown[lca]\cdot 10^{dep[u]-dep[lca]} \]
\[ up \ \cdot \ 10^{dep[end]-dep[lca]} \ + \ down \equiv \ 0 \pmod{m}\]
\[ \frac {(disup[begin]-disup[lca]) \cdot 10^{dep[end]} }{10^{2 \cdot dep[lca]}} + \frac {disdown[end]-disdown[lca]\cdot 10^{dep[end]}} {10^{dep[lca]}} \]
\[ disup[begin] = disdown[lca] \cdot 10^{dep[lca]} - \frac{disdown[end] \cdot 10^{2 \cdot dep[lca]} }{10^{dep[end]}}+disup[lca]\]
\[ \frac{disdown[end]}{10^{dep[end]}} = \frac {disdown[lca]}{10^{dep[lca]}} - \frac {disup[begin]-disup[lca]}{10^{2 \cdot dep[lca]}} \]
#include<cstdio>
#include<vector>
#include<map>
#include<algorithm>
#include<iostream>
#include<cstring>
using namespace std;
const int N=2e5+100;
typedef long long ll;
int n,m;
void Exgcd(ll a,ll b,ll &x,ll &y) {
if(!b)x=1,y=0;
else Exgcd(b,a%b,y,x),y-=a/b*x;
}
ll Inv(ll a) {
ll x,y;
Exgcd(a,m,x,y);
x=(x%m+m)%m;
return x;
}
int po[N]= {1};
struct Edge {
int to,nxt,w;
} e[N<<1];
int head[N],ecnt;
inline void AddEdge(int u,int v,int w) {
e[++ecnt].nxt=head[u];
e[ecnt].to=v;
e[ecnt].w=w;
head[u]=ecnt;
}
int cnt[N],son[N],dep[N];
ll disup[N],disdown[N];
void pre_dfs(int u,int f) {
cnt[u]=1;
for(int i=head[u]; ~i; i=e[i].nxt)if(e[i].to!=f) {
int v=e[i].to,w=e[i].w;
disup[v]=(disup[u]+1ll*po[dep[u]]%m*w)%m;
disdown[v]=(10ll*disdown[u]%m+w)%m;
dep[v]=dep[u]+1;
pre_dfs(v,u);
cnt[u]+=cnt[v];
if(cnt[son[u]]<cnt[v])son[u]=v;
}
}
map<int,int> U,D;
ll ans;
void Calc(int u,int LCA) {
ll Ub=disup[u],pl=po[dep[LCA]],pe=po[dep[u]],Dl=disdown[LCA],De=disdown[u],Ul=disup[LCA];
ll x = ((1ll*Dl* pl %m -1ll* De *pl %m* pl %m *Inv(pe) %m+1ll*Ul)%m+m)%m;
x=(x+m)%m;
ll y =(1ll* Dl * Inv(pl) %m+1ll*(Ul-Ub)*Inv(pl)%m*Inv(pl)%m)%m;
y=(y+m)%m;
ans+=U[x];
ans+=D[y];
}
void Add(int u) {
ll x=disup[u],y=1ll*disdown[u]*Inv(po[dep[u]])%m;
U[x]++,D[y]++;
}
void Upd(int u,int f,int LCA,int k) {
// cout<<"Now in"<<' '<<u<<' '<<up<<' '<<down<<endl;
// cout<<"U"<<u<<endl;
if(k)Calc(u,LCA);
else Add(u);
// cout<<"Upd"<<' '<<x<<' '<<y<<' '<<k<<endl;
for(int i=head[u]; ~i; i=e[i].nxt) {
int v=e[i].to;
if(v==f)continue;
Upd(v,u,LCA,k);
}
// Add(u);
// s+=k*2;
}
void dfs_getans(int u,int f,int h) {
for(int i=head[u]; ~i; i=e[i].nxt)
if(e[i].to!=f&&e[i].to!=son[u])
dfs_getans(e[i].to,u,0);
if(son[u])dfs_getans(son[u],u,1);
// int lst=ans;
for(int i=head[u]; ~i; i=e[i].nxt) if(e[i].to!=f&&e[i].to!=son[u]) {
Upd(e[i].to,u,u,1);
Upd(e[i].to,u,u,0);
}
Calc(u,u);
Add(u);
if(!h)U.clear(),D.clear();
}
int main() {
scanf("%d%d",&n,&m);
memset(head,-1,sizeof head);
for(int i=1; i<=n+3; i++)po[i]=1LL*po[i-1]*10%m;
for(int i=2,u,v,w; i<=n; i++) {
scanf("%d%d%d",&u,&v,&w);
u++,v++;
AddEdge(u,v,w);
AddEdge(v,u,w);
}
// dep[1]=1;
pre_dfs(1,0);
dfs_getans(1,0,1);
printf("%lld\n",ans);
return 0;
}
原文:https://www.cnblogs.com/chasedeath/p/11259407.html