#include<bits/stdc++.h>
#define ll long long
using namespace std;
const int MAXN=305,MOD=998244353;
ll ksm(ll a,ll b=MOD-2) { ll s=1; for(;b;a=a*a%MOD,b>>=1) if(b&1) s=s*a%MOD; return s; }
inline void add(ll &x,const ll &y) { x=(x+y>=MOD)?x+y-MOD:x+y; }
int n,m,a[MAXN];
char str[MAXN*2];
ll fac[MAXN],ifac[MAXN];
ll f[MAXN][MAXN][2],g[MAXN][MAXN][2];
ll A(int x,int y) { return fac[x]*ifac[x-y]%MOD; }
//max not pop = j, now inq = k, [j inq?]
signed main() {
	scanf("%d%d%s",&n,&m,str+1);
	for(int i=1;i<=m;++i) scanf("%d",&a[i]);
	for(int i=fac[0]=ifac[0]=1;i<=n;++i) ifac[i]=ksm(fac[i]=fac[i-1]*i%MOD);
	f[m][0][0]=1;
	for(int i=1,ci=0,ce=0;i<=n+m;++i) {
		memset(g,0,sizeof(g));
		if(str[i]=='+') {
			for(int j=0;j<=m;++j) for(int k=0;k<=min(i,j);++k) {
				for(int o:{0,1}) {
					int cnt=(n-a[j])-(m-j)-(ci-ce-k);
					if(cnt>0&&ci-ce-k>=0) add(g[j][k][o],f[j][k][o]*cnt%MOD);
					add(g[j][k+1][o],f[j][k][o]);
				}
				add(g[j][k+1][1],f[j][k][0]);
			}
			++ci;
		} else {
			for(int j=0;j<=m;++j) {
				for(int k=1;k<=min(i,j);++k) for(int o:{0,1}) if(k>1||!o) add(g[j][k-1][o],f[j][k][o]);
				int cnt=ce-(m-j);
				for(int nj=j-1;~nj;--nj) if(j-nj-1<=cnt) {
					add(g[nj][0][0],f[j][1][1]*A(cnt,j-nj-1)%MOD);
				}
			}
			++ce;
		}
		memcpy(f,g,sizeof(f));
	}
	printf("%lld\n",f[0][0][0]);
	return 0;
}