题意:从@开始走,走到任何一个字母节点可以捡起>=1个字母,找到给定字符串集合中的任一个字符串的最小步数。
分析:对给出的字符串建ac自动机,从@开始走,dp[i][j][k]代表在自动机的节点i,位于(j,k)点走的最小步数,用spfa转移。
#include<iostream>
#include<cstdio>
#include<cstring>
#include<stack>
#include<queue>
#include<set>
#include<map>
#include<cmath>
#include<vector>
#include<algorithm>
#define inf 1000000000
#define eps 1e-8
const int maxn=20005;
typedef long long LL;
using namespace std;
char s[25][25];
int dp[maxn][25][25];
bool vis[maxn][25][25];
int dir[4][2]={{1,0},{-1,0},{0,1},{0,-1}};
int n,m;
struct Tire
{
int sz;
int ch[maxn][26];
int fail[maxn];
int val[maxn];
void init()
{
sz=1;
memset(ch[0],0,sizeof(ch[0]));
memset(val,0,sizeof(val));
}
void insert(char* s,int v)
{
int len=strlen(s);
int u=0;
for(int i=0;i<len;i++)
{
if(ch[u][s[i]-'A']==0)
{
memset(ch[sz],0,sizeof(ch[sz]));
val[sz]=0;
ch[u][s[i]-'A']=sz++;
}
u=ch[u][s[i]-'A'];
}
val[u]=v;
}
void getFail()
{
queue<int>que;
for(int i=0;i<26;i++)
{
if(ch[0][i])
{
fail[ch[0][i]]=0;
que.push(ch[0][i]);
}
}
while(!que.empty())
{
int u=que.front();
que.pop();
for(int i=0;i<26;i++)
{
if(ch[u][i]==0)
{
ch[u][i]=ch[fail[u]][i];
}
else
{
fail[ch[u][i]]=ch[fail[u]][i];
que.push(ch[u][i]);
val[ch[u][i]]|=val[fail[ch[u][i]]];
}
}
}
}
};
Tire ac;
struct Node
{
int k,a,b;
Node(int p,int q,int r):k(p),a(q),b(r){}
};
void spfa(int k,int a,int b)
{
memset(vis,0,sizeof(vis));
queue<Node>que;
que.push(Node(k,a,b));
vis[k][a][b]=1;
while(!que.empty())
{
Node u=que.front();
que.pop();
int d=u.k;
int x=u.a;
int y=u.b;
vis[d][x][y]=0;
for(int i=0;i<4;i++)
{
int xx=x+dir[i][0];
int yy=y+dir[i][1];
if(xx>=0&&xx<n&&yy>=0&&yy<m)
{
if(s[xx][yy]=='#')
continue;
if(s[xx][yy]=='.')
{
if(dp[d][xx][yy]>dp[d][x][y]+1)
{
dp[d][xx][yy]=dp[d][x][y]+1;
if(vis[d][xx][yy]==0)
{
vis[d][xx][yy]=1;
que.push(Node(d,xx,yy));
}
}
}
else
{
int dd=ac.ch[d][s[xx][yy]-'A'];
if(dp[dd][xx][yy]>dp[d][x][y]+1)
{
dp[dd][xx][yy]=dp[d][x][y]+1;
if(vis[dd][xx][yy]==0)
{
vis[dd][xx][yy]=1;
que.push(Node(dd,xx,yy));
}
}
}
}
}
if(s[x][y]>='A'&&s[x][y]<='Z')
{
int dd=ac.ch[d][s[x][y]-'A'];
if(dp[dd][x][y]>dp[d][x][y])
{
dp[dd][x][y]=dp[d][x][y];
if(vis[dd][x][y]==0)
{
vis[dd][x][y]=1;
que.push(Node(dd,x,y));
}
}
}
}
}
int main()
{
int t;
int w;
scanf("%d",&t);
while(t--)
{
ac.init();
scanf("%d%d",&n,&m);
for(int i=0;i<n;i++)
{
scanf("%s",s[i]);
}
scanf("%d",&w);
char str[105];
for(int i=0;i<w;i++)
{
scanf("%s",str);
ac.insert(str,1);
}
ac.getFail();
int a,b;
for(int i=0;i<n;i++)
{
for(int j=0;j<m;j++)
{
if(s[i][j]=='@')
{
a=i;b=j;
s[i][j]='.';
break;
}
}
}
memset(dp,0x3f3f3f3f,sizeof(dp));
dp[0][a][b]=0;
spfa(0,a,b);
int ans=0x3f3f3f3f;
for(int i=0;i<ac.sz;i++)
{
if(ac.val[i])
{
for(int j=0;j<n;j++)
{
for(int k=0;k<m;k++)
{
ans=min(ans,dp[i][j][k]);
}
}
}
}
if(ans==0x3f3f3f3f)
printf("-1\n");
else
printf("%d\n",ans);
}
return 0;
}