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>
using namespace std;
inline int read() {
  int w = 0, x = 0;
  char c = getchar();
  while (!isdigit(c)) w |= c == '-', c = getchar();
  while (isdigit(c)) x = x * 10 + (c ^ 48), c = getchar();
  return w ? -x : x;
}
namespace star {
const int maxn = 4e6 + 10, mod = 998244353;
inline int fpow(int a, int b) {
  int ans = 1;
  for (; b; b >>= 1, a = 1ll * a * a % mod)
    if (b & 1) ans = 1ll * ans * a % mod;
  return ans;
}
int n, m, mul[maxn], inv[maxn], f[maxn];
inline int C(int n, int m) {
  return 1ll * mul[n] * inv[m] % mod * inv[n - m] % mod;
}
inline int Inv(int x) { return 1ll * inv[x] * mul[x - 1] % mod; }
inline void work() {
  n = read(), m = read();
  int N = n + m;
  mul[0] = inv[0] = 1;
  for (int i = 1; i <= N; i++) mul[i] = 1ll * mul[i - 1] * i % mod;
  inv[N] = fpow(mul[N], mod - 2);
  for (int i = N - 1; i; i--) inv[i] = 1ll * inv[i + 1] * (i + 1) % mod;
  int t = 0, ans = 0;
  for (int i = 1; i <= n + 1; i++)
    f[i] = (1ll - f[i - 1] + mod) * m % mod * Inv(m + n - i + 1) % mod,
    t = (t + 1ll * i * f[i]) % mod, f[i] = (f[i] + f[i - 1]) % mod;
  for (int i = 1; i <= n; i++)
    ans = (ans +
           (i & 1 ? 1ll : mod - 1ll) * C(n, i) % mod * (i + m) % mod * Inv(i)) %
          mod;
  printf("%lld\n", 1ll * t * ans % mod);
}
}  // namespace star
signed main() {
  star::work();
  return 0;
}