似乎大家全部都用的是hash？那我讲一个不用hash的做法吧。
首先考虑只有一位不同的是哪一位，那么这一位前面的位上的字符一定是全部相同，后面的字符也是全部相同。首先考虑后面的字符。
我们对n个串的反串建trie树，这样，每一个后缀就对应一个trie树上的唯一一个节点，不同的后缀对应的就是不同的节点，这样就不用hash表了。
但是字符集很大，用trie空间太大，那么就用邻接表或map存边就好了。
然后就是令前缀全部相同。那么我们从左到右枚举每一位，按照当前位的字符进行分治，当前位不同的就通过后缀计算贡献，相同的就放在一起，继续分治即可。
然后就跑的飞快，目前是BZOJ rk2,Luogu rk1。
实现的时候有很多细节，具体请参考代码。
#include<cstdio>
#include<cstring>
#include<algorithm>
#include<queue>
#include<cctype>
#define qmin(x,y) (x=min(x,y))
#define qmax(x,y) (x=max(x,y))
#define vi vector<int>
#define vit vector<int>::iterator
#define pir pair<int,int>
#define fr first
#define sc second
#define mp(x,y) make_pair(x,y)
#define rsort(x,y) sort(x,y),reverse(x,y)
using namespace std;
inline char gc() {
// static char buf[100000],*p1,*p2;
// return (p1==p2)&&(p2=(p1=buf)+fread(buf,1,100000,stdin),p1==p2)?EOF:*p1++;
return getchar();
}
template<class T>
int read(T &ans) {
ans=0;char ch=gc();T f=1;
while(!isdigit(ch)) {
if(ch==EOF) return -1;
if(ch=='-') f=-1;
ch=gc();
}
while(isdigit(ch))
ans=ans*10+ch-'0',ch=gc();
ans*=f;return 1;
}
template<class T1,class T2>
int read(T1 &a,T2 &b) {
return read(a)!=EOF&&read(b)!=EOF?2:EOF;
}
template<class T1,class T2,class T3>
int read(T1 &a,T2 &b,T3 &c) {
return read(a,b)!=EOF&&read(c)!=EOF?3:EOF;
}
typedef long long ll;
const int Maxn=6100000;
const int Maxm=31000;
const int Maxl=210;
const int inf=0x3f3f3f3f;
int to[Maxn],nxt[Maxn],first[Maxn],tot=1;
char w[Maxn],s[Maxm][Maxl];
int p[Maxm][Maxl],n,len,x,po[Maxl][Maxl],qq[Maxl],bj[Maxl],ans;
int a[Maxm],siz[Maxl],b[Maxm],tn[Maxn],cnt=1;
queue<int> q[Maxl];
inline void add(int u,int v,char wi) {
to[tot]=v;
nxt[tot]=first[u];
w[tot]=wi;
first[u]=tot++;
}
void solve(int l,int r,int cur) {
if(l>r) return ;
if(cur==len) return ;
int cnt=0;
for(int i=l;i<=r;i++) {
int x=s[a[i]][cur];
q[x].push(a[i]);
siz[x]++;
if(!bj[x]) qq[++cnt]=x,bj[x]=1;
}
if(cnt==1) {
for(int i=1;i<=cnt;i++) bj[qq[i]]=siz[qq[i]]=0;
while(!q[qq[1]].empty()) q[qq[1]].pop();
solve(l,r,cur+1);
}
else {
int sxz,zhy=0;
for(int i=1;i<=cnt;i++) {
if(siz[qq[i]]>zhy) {
sxz=i;
zhy=siz[qq[i]];
}
}
swap(qq[cnt],qq[sxz]);
int las=l;po[cur][0]=las;
for(int i=1;i<cnt;i++) {
int x=qq[i],num=0;
while(!q[x].empty()) {
int now=q[x].front();
q[x].pop();
b[++num]=p[now][cur+1];
ans+=tn[b[num]];
a[las++]=now;
}
while(num) tn[b[num--]]++;
po[cur][i]=las;
}
while(!q[qq[cnt]].empty()) {
int now=q[qq[cnt]].front();
q[qq[cnt]].pop();
ans+=tn[p[now][cur+1]];
a[las++]=now;
} po[cur][cnt]=las;
for(int i=l;i<po[cur][cnt-1];i++) tn[p[a[i]][cur+1]]--;
for(int i=1;i<=cnt;i++) bj[qq[i]]=siz[qq[i]]=0;
for(int i=1;i<=cnt;i++)
solve(po[cur][i-1],po[cur][i]-1,cur+1);
}
}
signed main() {
// freopen("test.in","r",stdin);
read(n,len,x);
for(int i=1;i<=n;i++) {
scanf("%s",s[i]);
int now=1;
for(int j=len-1;j>=0;j--) {
int temp=0;
for(int k=first[now];k;k=nxt[k])
if(w[k]==s[i][j]) {
temp=to[k];
break;
}
if(!temp) add(now,++cnt,s[i][j]),temp=cnt;
now=temp;
p[i][j]=now;
}
}
for(int i=1;i<=n;i++) a[i]=i;
solve(1,n,0);
printf("%d
",ans);
return 0;
}