#include<cstdio>//scau 1138 代码等式

 #include<cstring>

 #include<cstdlib>

 #include<cmath>

 int fa[],length[],beg[];

 int find(int x)

 {

     return (x==fa[x]?x:find(fa[x]));

 }

 void Union(int m, int n)//这里可以优化，将深度大的合并到深度低的，这样查找速度会加快。用迭代。

 {

     m = find(m);

     n = find(n);

     if(m!=n)

         fa[m] = n;

 }

 int main()

 {

     int n, s1[],s2[],len1 = ,len2 = ;

     scanf("%d",&n);

     scanf("%d",&length[]);

     beg[] = ;

     for(int i = ; i<n; i++)//为每个字母变量分配相应长度的单位变量，与此同时，每个单位变量都与数组的下标形成了一一对应的关系

     {

         scanf("%d",&length[i]);

         beg[i] = beg[i-] + length[i-];

     }

     char ch;

     getchar();

     while((ch= getchar())!='=')//处理等式，将其转换成以单位变量为形式的串，并将串存到数组中，等待并查集

     {

         if(ch=='' || ch=='')

             s1[len1++] = ch-'';

         else

         {

             for(int i = ; i<length[ch-'a']; i++)

                 s1[len1++] = beg[ch-'a'] + i;

         }

     }

     while((ch= getchar())!='\n')

     {

         if(ch=='' || ch=='')

             s2[len2++] = ch-'';

         else

         {

             for(int i = ; i<length[ch-'a']; i++)

                 s2[len2++] = beg[ch-'a'] + i;

         }

     }

     if(len1!=len2)

     {

         printf("0\n");

         return ;

     }

     for(int i = ; i<beg[n-]+length[n-]; i++) //初始化每个单位变量的集合为自己

         fa[i] = i;

     for(int i = ; i<len1; i++)//并查集

     {

         if(s1[i]+s2[i]==)

         {

             printf("0\n");

             return ;

         }

         Union(s1[i],s2[i]);

     }

     int ans = ;

     for(int i = ; i<beg[n-]+length[n-]; i++)//遍历每个单位变量，统计集合个数

         if(fa[i]==i) ans++;

     printf("%.0lf\n",pow(,ans-));

     return ;

 }