Problem: In Republic of AtCoder, Snuke Chameleons (Family: Chamaeleonidae, Genus: Bartaberia) are very popular pets. Ringo keeps N Snuke Chameleons in a cage.

A Snuke Chameleon that has not eaten anything is blue. It changes its color according to the following rules:

* A Snuke Chameleon that is blue will change its color to red when the number of red balls it has eaten becomes strictly larger than the number of blue balls it has eaten.
* A Snuke Chameleon that is red will change its color to blue when the number of blue balls it has eaten becomes strictly larger than the number of red balls it has eaten.



Initially, every Snuke Chameleon had not eaten anything. Ringo fed them by repeating the following process K times:

* Grab either a red ball or a blue ball.
* Throw that ball into the cage. Then, one of the chameleons eats it.



After Ringo threw in K balls, all the chameleons were red. We are interested in the possible ways Ringo could have thrown in K balls. How many such ways are there? Find the count modulo 998244353. Here, two ways to throw in balls are considered different when there exists i such that the color of the ball that are thrown in the i-th throw is different.

Constraints

* 1 \leq N,K \leq 5 \times 10^5
* N and K are integers.

Input

Input is given from Standard Input in the following format:


N K


Output

Print the possible ways Ringo could have thrown in K balls, modulo 998244353.

Examples

Input

2 4


Output

7


Input

3 7


Output

57


Input

8 3


Output

0


Input

8 10


Output

46


Input

123456 234567


Output

857617983

Solution (in CPP):

Solution:
#include<algorithm>
#include<iostream>
#include<vector>
using namespace std;
typedef long long lint;
typedef vector<int>vi;
typedef pair<int,int>pii;
#define rep(i,n)for(int i=0;i<(int)(n);++i)

// 解説を読んだ
const lint mo=998244353;
const int N=1000000;
lint fact[N],invfact[N];
lint powmod(lint x,lint y){
  lint ans=1;
  for(int i=63;i>=0;--i){
    ans=ans*ans%mo;
    if(y&1LL<<i)ans=ans*x%mo;
  }
  return ans;
}

lint comb(int x,int y){
  if(y<0||y>x)return 0;
  return fact[x]*(invfact[y]*invfact[x-y]%mo)%mo;
}

lint catalan(int r,int b,int lim){
  if(b-r>lim)return 0;
  if(lim<0)return 0;
  return (comb(r+b,b)-comb(r+b,r+lim+1)+mo)%mo;
}

int main(){
  fact[0]=1;
  for(int i=1;i<N;++i)fact[i]=fact[i-1]*i%mo;
  invfact[N-1]=powmod(fact[N-1],mo-2);
  for(int i=N-2;i>=0;--i)invfact[i]=invfact[i+1]*(i+1)%mo;
  int n,k;
  cin>>n>>k;
  lint ans=0;
  for(int b=0;b<=k;++b){
    int r=k-b;
    if(r<b)continue;
    if(r==b)ans+=catalan(r,b-1,r-n);
    if(r>b)ans+=catalan(r,b,r-n);
    ans%=mo;
  }
  cout<<ans<<endl;
}