蝉时雨 化成淡墨渲染暮色
渗透着 勾勒出足迹与车辙
欢笑声 与漂浮的水汽饱和
隔着窗 同城市一并模糊了
拨弄着 旧吉他 哼着四拍子的歌
回音中 一个人 仿佛颇悠然自得
等凉雨 的温度 将不安燥热中和
寻觅着 风的波折
我仍然在 无人问津的阴雨霉湿之地
和着雨音 唱着没有听众的歌曲
人潮仍是漫无目的地向目的地散去
忙碌着 无为着 继续
等待着谁能够将我的心房轻轻叩击
即使是你 也仅仅驻足了片刻便离去
想着或许 下个路口会有谁与我相遇
哪怕只 一瞬的 奇迹
（……盯着方寸泛光屏幕的学生、打着一丝不苟领结的憔悴文员、衣摆溅上泥点的工人在街上短暂交汇，又匆匆向各自的目的地散去。我不知道他们正忙碌着什么，尽管忙碌很大一部分面对自己的未来却相当茫然，漫无目的地走在他们即将被横刀切断的人生道路上，日复一日……
然而即使是我最近有些在意的那个女孩，也只是心不在焉地听一小会，脸上大写着“嫌弃”白我一眼，就转起伞拖踏着步子走远了。当时我竟然对那个女人以外的人感到了不甘心，清清嗓子坐直，刚准备好好唱一首，就发现弹出的第一个音已经不准了……
她专注于烟花短暂但接连不断的枯荣，瞳孔里倒映出夜空和她身侧的我。那时我的心脏好像被羽尾缠绕，顷刻裂开了一条小缝，但破土而出的是丝丝让人不知所措的甜蜜欣悦，而非疼痛。我祈祷着这次的结局会有所不同，不要让我们来之不易的“现实”和回忆悉数归零……）
夏夜空 出现在遥远的记忆
绽放的 璀璨花火拥着繁星
消失前 做出最温柔的给予
一如那些模糊身影的别离
困惑地 拘束着 如城市池中之鱼
或哽咽 或低泣 都融进了泡沫里
拖曳疲惫身躯 沉入冰冷的池底
注视着 色彩褪去
我仍然在无人问津的阴雨霉湿之地
和着雨音 唱着没有听众的歌曲
人潮仍是漫无目的地向目的地散去
忙碌着 无为着 继续
祈求着谁 能够将我的 心房轻轻叩击
今天的你 是否会留意并尝试去靠近
因为或许 下个路口仍是同样的结局
不存在刹那的奇迹
极夜与永昼
别离与欢聚
脉搏与呼吸
找寻着意义
我仍然在无人问津的阴雨霉湿之地
和着雨音 唱着卖不出去的歌曲
浮游之人也挣扎不已执着存在下去
追逐着 梦想着 继续
请别让我独自匍匐于滂沱世末之雨
和着雨音 唱着见证终结的歌曲
人们终于 结束了寻觅呆滞伫立原地
哭泣着 乞求着 奇迹
用这双手 拨出残缺染了锈迹的弦音
都隐没于淋漓的雨幕无声无息
曲终之时 你是否便会回应我的心音
将颤抖的双手牵起
迎来每个人的结局

#include<bits/stdc++.h>
#define int unsigned long long
namespace IO{
    inline void close(){
        std::ios::sync_with_stdio(0);
        std::cin.tie(0);
        std::cout.tie(0);
    }
    inline void Fire(){
        freopen("data.in","r",stdin);
        freopen("data.out","w",stdout);
    }
    inline int read(){
        int s = 0,w = 1;char ch = getchar();
        while(ch<'0'||ch>'9'){ if(ch == '-') w = -1;ch = getchar();}
        while(ch>='0'&&ch<='9'){ s=(s<<3)+(s<<1)+ch-'0';ch = getchar();}
        return s*w;
    }
    inline void write(int x){
        char F[200];int tmp=x>0?x:-x,cnt=0;
        if(x<0)putchar('-');while(tmp>0){F[cnt++]=tmp%10+'0';tmp/=10;}
        if(cnt==0)putchar('0');while(cnt>0)putchar(F[--cnt]);putchar(' ');
    }
}   
using namespace IO;
const int N=1e4+10,P=1e9+7;
int n,a[N],l,f[110][N],ans;
const int P1=1502436281;
char s[N],t[N];
struct Hash{
	int h1[N],h2[N],z1[N],z2[N];
	inline void Init(char *s){
		z1[0]=z2[0]=1;
		int length=strlen(s+1);
		for(int i(1);i<=length;i++){
			z1[i]=z1[i-1]*1009%P1;
			z2[i]=z2[i-1]*1009;
			h1[i]=(h1[i-1]*1009+(s[i]-'A'+1)%P1)%P1;
			h2[i]=h2[i-1]*1009+(s[i]-'A'+1);
		}
	}
	inline int GetHash1(int l,int r){
        return (h1[r]-h1[l-1]*z1[r-l+1]%P1+P1)%P1;
    }
	inline int GetHash2(int l,int r){
        return h2[r]-h2[l-1]*z2[r-l+1];
    }
}d;
signed main(){
    n=read();scanf("%s",s+1);
    d.Init(s);l=strlen(s+1);
    for(int i(1);i<=n;i++){
        int a(read());
        for(int j(1);j<=a;j++){
            scanf("%s",t+1);
            int len=strlen(t+1);
            int s1(0),s2(0);
            for(int i(1);i<=strlen(t+1);i++) 
                s1=(s1*1009+t[i]-'A'+1)%P1,
                s2=s2*1009+t[i]-'A'+1;
            for(int k(len);k<=l;k++){
                f[i][k]=((d.GetHash1(k-len+1,k)!=s1)||(d.GetHash2(k-len+1,k)!=s2))?
                        f[i][k]:((f[i][k]+f[i-1][k-len])%P)+((i==1&&!f[i-1][k-len])?1:0);
            }
        }
    }
    for(int i(1);i<=l;i++)
        ans=(ans+f[n][i])%P;
    write(ans);
}