The only difference between the two versions of the problem is that there are no updates in the easy version.

There are n spools of thread placed on the rim of a circular table. The spools come in two types of thread: the first thread is black and the second thread is white.

For any two spools of the same color, you can attach them with a thread of that color in a straight line segment. Define a matching as a way to attach spools together so that each spool is attached to exactly one other spool.

Coloring is an assignment of colors (white and black) to the spools. A coloring is called valid if it has at least one matching. That is if the number of black spools and the number of white spools are both even.

Given a matching, we can find the number of times some white thread intersects some black thread. We compute the number of pairs of differently colored threads that intersect instead of the number of intersection points, so one intersection point may be counted multiple times if different pairs of threads intersect at the same point. If c is a valid coloring, let f(c) denote the minimum number of such intersections out of all possible matchings.

<image> The circle above is described by the coloring bwbbbwww. After matching the spools as shown, there is one intersection between differently colored threads. It can be proven that it is the minimum possible, so f(bwbbbwww) = 1. 

You are given a string s representing an unfinished coloring, with black, white, and uncolored spools. A coloring c is called s-reachable if you can achieve it by assigning colors to the uncolored spools of s without changing the others.

A coloring c is chosen uniformly at random among all valid, s-reachable colorings. Compute the [expected value](https://en.wikipedia.org/wiki/Expected_value) of f(c). You should find it by modulo 998244353.

There will be m updates to change one character of s. After each update, you should again compute the expected value of f(c).

We can show that each answer can be written in the form p/q where p and q are relatively prime integers and qnot≡ 0\pmod{998244353}. The answer by modulo 998244353 is equal to (p⋅ q^{-1}) modulo 998244353.

Input

The first line contains two integers n, m (2≤ n≤ 2⋅ 10^5, n is even, 0≤ m≤ 2⋅ 10^5) — the number of spools and the number of updates, respectively.

The second line contains a string s of length n — the unfinished coloring of the spools. The i-th character will be 'w', 'b', or '?', describing if the i-th spool is white, black, or uncolored, respectively.

Each of the next m lines contains an integer i (1 ≤ i ≤ n) — the position of the character in s to be updated, and a character c (c ∈ \{w, b, ?\}) — the new color of the spool i after the update.

It is guaranteed there exists at least one uncolored spool initially and after each update.

Output

Print m+1 lines: the expected value of f(c) initially and after each update. All values should be found by modulo 998244353.

Examples

Input


8 0
bwbb?www


Output


1


Input


10 3
???ww?wb??
4 ?
5 ?
2 w


Output


436731905
218365953
374341633
530317313


Input


4 3
bw?b
1 w
2 b
1 w


Output


0
0
1
1

Note

The first test corresponds closely to the image. Coloring '?' as 'w' does not create a valid coloring because the number of black spools is odd. Then the only reachable valid coloring is 'bwbbbwww' and f(bwbbbwww) = 1, so the expected value is 1.

In the second test, the string after each update is:

  1. ????w?wb??
  2. ??????wb??
  3. ?w????wb??



In the third test, the string after each update is:

  1. ww?b
  2. wb?b
  3. wb?b
//starusc
#include<bits/stdc++.h>
using namespace std;
inline int read(){
	int x=0,f=1,c=getchar();
	while(!isdigit(c)){if(c=='-')f=-1;c=getchar();}
	while(isdigit(c)){x=(x<<1)+(x<<3)+(c^48);c=getchar();}
	return f==1?x:-x;
}
#define ll long long
const int mod=998244353,inv2=(mod+1)>>1;
inline int fix(int x){return x+((x>>31)&mod);}
inline int add(int x,int y){return fix(x+y-mod);}
inline int dec(int x,int y){return fix(x-y);}
inline int mul(int x,int y){return (ll)x*y%mod;}
inline void ADD(int &x,int y){x=fix(x+y-mod);}
inline void DEC(int &x,int y){x=fix(x-y);}
inline void MUL(int &x,int y){x=(ll)x*y%mod;}
inline int ksm(int x,int r){int ret=1;for(int i=0;(1ll<<i)<=r;i++){if((r>>i)&1)MUL(ret,x);MUL(x,x);}return ret;}
inline int inv(int x){return ksm(x,mod-2);}

const int N=2e5+4;
int n,Q,t,cnt,ans,fac[N],ifac[N];
char s[N],ss[4];
inline void prepare(){
	fac[0]=fac[1]=ifac[0]=ifac[1]=1;
	for(int i=2;i<=n;i++)fac[i]=mul(fac[i-1],i);
	ifac[n]=inv(fac[n]);
	for(int i=n-1;i;i--)ifac[i]=mul(ifac[i+1],i+1);
}
inline int C(int x,int y){
	return (x<y||y<0)?0:mul(fac[x],mul(ifac[y],ifac[x-y]));
}
struct node{
	int cnt,t,ans=1;
	inline void cntup(){
		ans=dec(add(ans,ans),C(cnt++,t));
		if(!cnt)ADD(ans,t>=0);
	}
	inline void cntdw(){
		ans=mul(add(ans,C(--cnt,t)),inv2);
		if(cnt<0)ans=0;
	}
	inline void tup(){
		ADD(ans,C(cnt,++t));
	}
	inline void tdw(){
		DEC(ans,C(cnt,t--));
	}
}a,b,c,d;
inline void tup(){a.tup();b.tup();t++;}
inline void tdw(){a.tdw();b.tdw();t--;}
inline void cntup(){a.cntup();b.cntup();c.cntup();d.cntup();c.tup();d.tup();cnt++;}
inline void cntdw(){a.cntdw();b.cntdw();c.cntdw();d.cntdw();c.tdw();d.tdw();cnt--;}
inline void ins(int i,char c){
	if(c=='b'){
//		cerr<<"sdf\n";
		if(i&1)tup();
		else tdw();
	} 
	else if(c=='?'){
//		cerr<<"sdf\n";
		cntup();
		if(i&1)tup();
	}
}
inline void era(int i,char c){
	if(c=='b'){
//		cerr<<"sdf\n"; 
		if(i&1)tdw();
		else tup();
	} 
	else if(c=='?'){
//		cerr<<"sdf\n";
		cntdw();
		if(i&1)tdw();
	}
}
inline void solve(){
	if(cnt==1){
		ans=0;
		for(int i=t&1;i<=cnt;i+=2)ADD(ans,mul(C(cnt,i),abs(i-t)));
	}
	else{
		ans=add(dec(mul(mul(2,fix(t)),a.ans),mul(mul(2,cnt),b.ans)),
			dec(mul(cnt,c.ans),mul(fix(t),d.ans)));
	}
	MUL(ans,inv(ksm(2,cnt)));
	cout<<ans<<"\n"; 
}
int main(){
//	freopen("1.in","r",stdin);
	n=read();Q=read();
	prepare();
	scanf("%s",s+1);
	a.cntdw();b.cntdw();c.cntdw();d.cntdw();//加法公式
	b.cntdw();c.cntdw();b.tdw();c.tdw();// \binom{cnt-1}{i-1} 
	for(int i=1;i<=n;i++)ins(i,s[i]);
	solve();
	for(int x;Q--;){
		x=read();scanf("%s",ss);
		era(x,s[x]);
		s[x]=ss[0];
		ins(x,s[x]);
		solve();
//		cerr<<cnt<<" "<<t<<" "<<a.ans<<" "<<b.ans<<" "<<c.ans<<" "<<d.ans<<"\n";
	}
	return (0-0);
}