Problem: zscoder has a deck of n+m custom-made cards, which consists of n cards labelled from 1 to n and m jokers. Since zscoder is lonely, he wants to play a game with himself using those cards. 

Initially, the deck is shuffled uniformly randomly and placed on the table. zscoder has a set S which is initially empty. 

Every second, zscoder draws the top card from the deck. 

  * If the card has a number x written on it, zscoder removes the card and adds x to the set S. 
  * If the card drawn is a joker, zscoder places all the cards back into the deck and reshuffles (uniformly randomly) the n+m cards to form a new deck (hence the new deck now contains all cards from 1 to n and the m jokers). Then, if S currently contains all the elements from 1 to n, the game ends. Shuffling the deck doesn't take time at all. 



What is the expected number of seconds before the game ends? We can show that the answer can be written in the form P/Q where P, Q are relatively prime integers and Q ≠ 0 mod 998244353. Output the value of (P ⋅ Q^{-1}) modulo 998244353.

Input

The only line of the input contains two integers n and m (1 ≤ n, m ≤ 2 ⋅ 10^{6}).

Output

Output a single integer, the value of (P ⋅ Q^{-1}) modulo 998244353.

Examples

Input


2 1


Output


5


Input


3 2


Output


332748127


Input


14 9


Output


969862773

Note

For the first sample, it can be proven that the expected time before the game ends is 5 seconds.

For the second sample, it can be proven that the expected time before the game ends is 28/3 seconds.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
#pragma GCC optimize("O3")
using namespace std;
const long long maxn = 4e6 + 100;
const long long inf = 1e16;
const long long mod = 998244353;
long long n, m, k, t;
inline long long step(long long a, long long first) {
  if (first == 0) {
    return 1;
  }
  if (first % 2 == 1) {
    return step(a, first - 1) * a % mod;
  }
  long long t = step(a, first / 2);
  return t * t % mod;
}
long long F[maxn];
long long RF[maxn];
inline long long del(long long a, long long b) {
  return a * step(b, mod - 2) % mod;
}
inline long long del1(long long a, long long b) {
  return a * F[b - 1] % mod * RF[b] % mod;
}
long long getc(long long n, long long k) {
  return del(F[n], F[k] * F[n - k] % mod);
}
int main() {
  ios_base ::sync_with_stdio(0);
  cin.tie(0);
  cout.tie(0);
  ;
  long long q, w, e, a, b, c;
  F[0] = 1;
  for (q = 1; q < maxn; q++) {
    F[q] = F[q - 1] * q % mod;
  }
  RF[maxn - 1] = del(1, F[maxn - 1]);
  for (q = maxn - 2; q >= 0; q--) {
    RF[q] = RF[q + 1] * (q + 1) % mod;
  }
  cin >> n >> m;
  long long it = 1 + m;
  for (q = 2; q <= n; q++) {
    it += del(m, q);
    it %= mod;
  }
  long long len = del(n, m + 1) + 1;
  cout << it * len % mod;
  return 0;
}