#include<iostream>

 #include<cstring>

 #include<cstdio>

 #include<cmath>

 #include<cstdlib>

 #include<algorithm>

 #include<queue>

 using namespace std;

 int c[][];

 int mx,nx,m,n;

 struct AC

 {

     int ch[][];

     int cnt;

     int value[],fail[],last[],next[];

     AC(){memset(next,,sizeof(next));memset(ch,,sizeof(ch));cnt=;memset(value,,sizeof(value));memset(fail,,sizeof(fail));memset(last,,sizeof(last));}

     void trie(char *s,int v)

     {

         int now=,len=strlen(s);

         for(int i=;i<len;i++)

         {

             if(!ch[now][s[i]-'a']) ch[now][s[i]-'a']=++cnt;

             now=ch[now][s[i]-'a'];

         }

         if(value[now])

         {

             next[v]=value[now];

         }

         value[now]=v;

     }

     void getfail()

     {

         queue<int>q;

         for(int i=;i<;i++){if(ch[][i]) q.push(ch[][i]);}

         while(!q.empty())

         {

             int now=q.front();q.pop();

             for(int i=;i<;i++)

             {

                 int u=ch[now][i];

                 if(!u){ch[now][i]=ch[fail[now]][i];continue;}

                 int t=fail[now];

                 while(t&&!ch[t][i]) t=fail[t];

                 fail[u]=ch[t][i];

                 last[u]=value[fail[u]]?fail[u]:last[fail[u]];

                 q.push(u);

             }

         }

     }

     void add(int now,int h,int i)

     {

         if(now)

         {

             if(h-value[now]+>=) c[h-value[now]+][i]++;

             int t=value[now];

             while(next[t])

             {

                 t=next[t];

                 if(h-t+>=) c[h-t+][i]++;

             }

             add(last[now],h,i);

         }

     }

     void find(char *s,int h)

     {

         int len=strlen(s);

         int now=;

         for(int i=;i<len;i++)

         {

             now=ch[now][s[i]-'a'];

             if(value[now]) add(now,h,i);

             else add(last[now],h,i);

         }

     }

 }ac;

 int main()

 {

     int ans=;

     char chh[][];

     scanf("%d%d",&mx,&nx);

     for(int i=;i<mx;i++)scanf("%s",chh[i]);

     scanf("%d%d",&m,&n);

     for(int i=;i<=m;i++)

     {

         char temp[];

         scanf("%s",temp);

         ac.trie(temp,i);

     }

     ac.getfail();

     for(int i=;i<mx;i++) ac.find(chh[i],i);

     for(int i=;i<mx;i++)

         for(int j=;j<nx;j++) if(c[i][j]==m) ans++;

     cout<<ans;

 }