[bzoj 1898--ZJOI2005]沼泽鳄鱼

潘塔纳尔沼泽地号称世界上最大的一块湿地，它地位于巴西中部马托格罗索州的南部地区。每当雨季来临，这里碧波荡漾、生机盎然，引来不少游客。为了让游玩更有情趣，人们在池塘的中央建设了几座石墩和石桥，每座石桥连接着两座石墩，且每两座石墩之间至多只有一座石桥。这个景点造好之后一直没敢对外开放，原因是池塘里有不少危险的食人鱼。豆豆先生酷爱冒险，他一听说这个消息，立马赶到了池塘，想做第一个在桥上旅游的人。虽说豆豆爱冒险，但也不敢拿自己的性命开玩笑，于是他开始了仔细的实地勘察，并得到了一些惊人的结论：食人鱼的行进路线有周期性，这个周期只可能是2，3或者4个单位时间。每个单位时间里，食人鱼可以从一个石墩游到另一个石墩。每到一个石墩，如果上面有人它就会实施攻击，否则继续它的周期运动。如果没有到石墩，它是不会攻击人的。借助先进的仪器，豆豆很快就摸清了所有食人鱼的运动规律，他要开始设计自己的行动路线了。每个单位时间里，他只可以沿着石桥从一个石墩走到另一个石墩，而不可以停在某座石墩上不动，因为站着不动还会有其它危险。如果豆豆和某条食人鱼在同一时刻到达了某座石墩，就会遭到食人鱼的袭击，他当然不希望发生这样的事情。现在豆豆已经选好了两座石墩Start和End，他想从Start出发，经过K个单位时间后恰好站在石墩End上。假设石墩可以重复经过（包括Start和End），他想请你帮忙算算，这样的路线共有多少种（当然不能遭到食人鱼的攻击）。

这道题看到k的范围这么大，便不难想到要矩阵乘法加上快速幂。如果这道题抛开食人鱼，就变成这道水题。但事实上不是这样啊，那其实也没差多少。因为我们发现它只有2,3,4这三种情况，所以只需要取它们的最小公倍数12，然后逐个判断这12种情况，如果这个时间段有食人鱼，那就把这一列都清0就可以了。那这道题就解决了。

#include<cstdio>
#include<cstring>
#include<cstdlib>
#include<cmath>
#include<algorithm>
#define mod 10000
using namespace std;
struct node
{
    int a[55][55];
    node(){memset(a,0,sizeof(a));}
}p[20];
int n,m,st,ed,t,k,wy[15];
node chengfa(node a,node b)
{
    node c;
    for(int i=1;i<=n;i++)
    {
        for(int j=1;j<=n;j++)
        {
            for(int k=1;k<=n;k++)
            {
                c.a[i][j]=(c.a[i][j]+a.a[i][k]*b.a[k][j])%mod;
            }
        }
    }
    return c;
}
int main()
{
    node per,ans;
    scanf("%d%d%d%d%d",&n,&m,&st,&ed,&k);st++;ed++;
    for(int i=1;i<=m;i++)
    {
        int x,y;
        scanf("%d%d",&x,&y);x++;y++;
        per.a[x][y]=per.a[y][x]=1; 
    }
    for(int i=1;i<=12;i++)p[i]=per;
    scanf("%d",&t);
    while(t--)
    {
        int tt;
        scanf("%d",&tt);
        for(int i=1;i<=tt;i++)
        {
            int x;
            scanf("%d",&x);x++;wy[i]=x;
        }
        for(int i=1;i<=12;i++)
        {
            for(int j=1;j<=n;j++)p[i].a[j][wy[i%tt+1]]=0;
        }
    }
    for(int i=1;i<=n;i++)
    {
        for(int j=1;j<=n;j++)
        {
            if(i==j)per.a[i][i]=1;
            else per.a[i][j]=0;
        }
    }
    for(int i=1;i<=n;i++)ans.a[i][i]=1;
    for(int i=1;i<=12;i++)per=chengfa(per,p[i]);
    int s=k/12,ss=k%12;
    while(s>0)
    {
        if(s%2==1)ans=chengfa(per,ans);
        per=chengfa(per,per);
        s/=2;
    }
    for(int i=1;i<=ss;i++)ans=chengfa(ans,p[i]);
    printf("%d\n",ans.a[st][ed]);
    return 0;
}