#include<bits/stdc++.h>
using namespace std;

typedef long long ll;
const ll N=303,H=998244353;
ll n,m,jc[N],ij[N],iv[N],a[N],f[N][N][2],g[N][N][2];
char ch[N*2];
void Add(ll &x,ll y){x=(x+y)%H;}
int main()
{
	cin>>n>>m;jc[0]=ij[0]=iv[0]=iv[1]=1;
	for(int i=2;i<N;i++)iv[i]=H-H/i*iv[H%i]%H;
	for(int i=1;i<N;i++)jc[i]=jc[i-1]*i%H,ij[i]=ij[i-1]*iv[i]%H;
	for(int i=1;i<=n+m;i++)cin>>ch[i];
	for(int i=1;i<=m;i++)cin>>a[i];
	f[m][0][0]=1;
	for(int t=1,c0=0,c1=0;t<=n+m;t++)
	{
		memcpy(g,f,sizeof(g));memset(f,0,sizeof(f));
		for(int i=0;i<=m;i++)for(int j=0;j<=i;j++)for(int o:{0,1})if(g[i][j][o])
		{
			ll val=g[i][j][o];
			if(ch[t]=='+')
			{
				Add(f[i][j][o],val*((n-a[i])-(m-i)-(c1-c0-j)));
				if(j<i-(o==0))Add(f[i][j+1][o],val);
				if(!o)Add(f[i][j+1][1],val);
			}
			else
			{
				if(j==1&&o==1)
				{
					int x=c0-(m-i);
					for(int k=i-x-1;k<i;k++)Add(f[k][0][0],val*jc[x]%H*ij[x-(i-k-1)]);
				}
				else if(j)Add(f[i][j-1][o],val);
			}
		}
		ch[t]=='+'?c1++:c0++;
	}
	cout<<f[0][0][0];
}