OJ-Problems-Source/HDOJ/4029_autoAC.cpp
2016-09-04 14:21:47 +08:00

99 lines
2.9 KiB
C++

#include<iostream>
#include<cstdio>
#include<map>
#include<cstring>
#include<cmath>
#include<vector>
#include<queue>
#include<algorithm>
#include<set>
#define inf (1ull<<63)-1
#define N 130
#define maxn 100005
#define Min(a,b) ((a)<(b)?(a):(b))
#define Max(a,b) ((a)>(b)?(a):(b))
#define pb(a) push_back(a)
#define mem(a,b) memset(a,b,sizeof(a))
#define eps 1e-9
#define zero(a) fabs(a)<eps
#define ULL unsigned long long
#define lson (step<<1)
#define rson (step<<1|1)
#define MOD 1000000007
#define mp(a,b) make_pair(a,b)
using namespace std;
const ULL hash1=26;
struct HASH{
ULL h1;
HASH(){}
HASH(ULL _h1):h1(_h1){}
}h[N][N];
int wa[maxn],wb[maxn],wv[maxn],Ws[maxn];
int cmp(int *r,int a,int b,int l)
{return r[a]==r[b]&&r[a+l]==r[b+l];}
void da(const int *r,int *sa,int n,int m){
int i,j,p,*x=wa,*y=wb,*t;
for(i=0;i<m;i++) Ws[i]=0;
for(i=0;i<n;i++) Ws[x[i]=r[i]]++;
for(i=1;i<m;i++) Ws[i]+=Ws[i-1];
for(i=n-1;i>=0;i--) sa[--Ws[x[i]]]=i;
for(j=1,p=1;p<n;j*=2,m=p){
for(p=0,i=n-j;i<n;i++) y[p++]=i;
for(i=0;i<n;i++) if(sa[i]>=j) y[p++]=sa[i]-j;
for(i=0;i<n;i++) wv[i]=x[y[i]];
for(i=0;i<m;i++) Ws[i]=0;
for(i=0;i<n;i++) Ws[wv[i]]++;
for(i=1;i<m;i++) Ws[i]+=Ws[i-1];
for(i=n-1;i>=0;i--) sa[--Ws[wv[i]]]=y[i];
for(t=x,x=y,y=t,p=1,x[sa[0]]=0,i=1;i<n;i++)
x[sa[i]]=cmp(y,sa[i-1],sa[i],j)?p-1:p++;
}
return;
}
int sa[maxn],Rank[maxn],height[maxn];
void calheight(const int *r,int *sa,int n){
int i,j,k=0;
for(i=1;i<=n;i++) Rank[sa[i]]=i;
for(i=0;i<n;height[Rank[i++]]=k)
for(k?k--:0,j=sa[Rank[i]-1];r[i+k]==r[j+k];k++);
return;
}
int tot,r[maxn],cnt;
char str[N][N];
int main(){
int t,cas=0,n,m;
scanf("%d",&t);
while(t--){
scanf("%d%d",&n,&m);
for(int i=0;i<n;i++) scanf("%s",str[i]);
mem(h,0);
ULL ans=0;
for(int w=1;w<=m;w++){
tot=1;cnt=0;
map<ULL,int> map;
map.clear();
for(int i=0;i<n;i++){
for(int j=0;j+w-1<m;j++){
h[i][j].h1=h[i][j].h1*hash1+str[i][j+w-1]-'A';
if(map.find(h[i][j].h1)==map.end())
map.insert(mp(h[i][j].h1,tot++));
}
}
for(int j=0;j+w-1<m;j++){
for(int i=0;i<n;i++){
r[cnt++]=map[h[i][j].h1];
}
r[cnt++]=tot++;
}
r[cnt]=0;
da(r,sa,cnt+1,tot);
calheight(r,sa,cnt);
ULL tmp=(n*(n+1)/2)*(m-w+1);
for(int i=1;i<=cnt;i++){tmp-=height[i];}
ans+=tmp;
}
printf("Case #%d: %I64u\n",++cas,ans);
}
return 0;
}