#define MD 998244353
ll@N,@A[N],Y[N],L=0,M=0;pair<ll,ll>X[N];rep[A,i](a,N){string@b;if(b>"A")Y[M++]=a;else if(b.back()<65)X[L++]={a,stoi(b)};}Mint D[1530]={1};rep[X]([a,b],L)rrep(i,a,5)rrep(c,1,9)rrep(j,b,34)D[306i+34c+j]+=D[(i-a)*306+34c-34+j-b];wt(sum[i,0,M](D[1529-Y[i]*306]));