Problem: Japate, while traveling through the forest of Mala, saw N bags of gold lying in a row. Each bag has some distinct weight of gold between 1 to N. Japate can carry only one bag of gold with him, so he uses the following strategy to choose a bag.

Initially, he starts with an empty bag (zero weight). He considers the bags in some order. If the current bag has a higher weight than the bag in his hand, he picks the current bag.

Japate put the bags in some order. Japate realizes that he will pick A bags, if he starts picking bags from the front, and will pick B bags, if he starts picking bags from the back. By picking we mean replacing the bag in his hand with the current one.

Now he wonders how many permutations of bags are possible, in which he picks A bags from the front and B bags from back using the above strategy.

Since the answer can be very large, output it modulo 998244353.

Input

The only line of input contains three space separated integers N (1 ≤ N ≤ 105), A and B (0 ≤ A, B ≤ N).

Output

Output a single integer — the number of valid permutations modulo 998244353.

Examples

Input

1 1 1


Output

1

Input

2 1 1


Output

0

Input

2 2 1


Output

1

Input

5 2 2


Output

22

Note

In sample case 1, the only possible permutation is [1]

In sample cases 2 and 3, only two permutations of size 2 are possible:{[1, 2], [2, 1]}. The values of a and b for first permutation is 2 and 1, and for the second permutation these values are 1 and 2. 

In sample case 4, out of 120 permutations of [1, 2, 3, 4, 5] possible, only 22 satisfy the given constraints of a and b.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int MAXN = 262144;
const int mod = 998244353;
int n, A, B;
int f[MAXN], fac[MAXN], ifac[MAXN], a[MAXN], b[MAXN], g[MAXN];
template <typename T>
inline void chkmin(T &x, T y) {
  x = min(x, y);
}
template <typename T>
inline void chkmax(T &x, T y) {
  x = max(x, y);
}
template <typename T>
inline void read(T &x) {
  T f = 1;
  x = 0;
  char c = getchar();
  for (; !isdigit(c); c = getchar())
    if (c == '-') f = -f;
  for (; isdigit(c); c = getchar()) x = (x << 3) + (x << 1) + c - '0';
  x *= f;
}
inline int power(int a, int n) {
  int b = a, res = 1;
  while (n > 0) {
    if (n & 1) res = (long long)res * b % mod;
    b = (long long)b * b % mod;
    n >>= 1;
  }
  return res;
}
namespace Poly {
const int MAXN = 262144;
const int G = 3;
int N, Log;
int bckward[25], forward[25], inv[25], home[MAXN];
inline void preinit() {
  forward[0] = bckward[0] = inv[0] = 1;
  for (int lg = 0, len = 1; len <= MAXN; ++lg, len <<= 1) {
    forward[lg] = power(G, (mod - 1) / len);
    bckward[lg] = power(G, mod - 1 - (mod - 1) / len);
    inv[lg] = power(len, mod - 2);
  }
}
inline void NTTinit() {
  for (int i = 0; i < N; ++i) {
    int tmp = i, ans = 0;
    for (int j = 1; j <= Log; ++j) {
      ans <<= 1;
      ans += tmp & 1;
      tmp >>= 1;
    }
    home[i] = ans;
  }
}
inline void NTT(int *a, int mode) {
  for (int i = 0; i < N; ++i)
    if (i < home[i]) swap(a[i], a[home[i]]);
  for (int len = 2, lg = 1; len <= N; len <<= 1, ++lg) {
    int delta;
    if (mode == 1)
      delta = forward[lg];
    else
      delta = bckward[lg];
    for (int i = 0; i < N; i += len) {
      int now = 1;
      for (int j = i, k = i + len / 2; k < i + len; ++j, ++k) {
        int tmp = a[j];
        int tnp = 1ll * a[k] * now % mod;
        a[j] = (tmp + tnp) % mod;
        a[k] = (tmp - tnp % mod + mod) % mod;
        now = 1ll * now * delta % mod;
      }
    }
  }
  if (mode == -1) {
    for (int i = 0; i < N; ++i) a[i] = 1ll * a[i] * inv[Log] % mod;
  }
}
inline void times(int *a, int sa, int *b, int sb) {
  N = 1, Log = 0;
  while (N <= sa + sb) {
    N <<= 1;
    ++Log;
  }
  NTTinit();
  NTT(a, 1);
  NTT(b, 1);
  for (int i = 0; i < N; ++i) a[i] = (long long)a[i] * b[i] % mod;
  NTT(a, -1);
  return;
}
inline void clear(int *a) {
  for (int i = 0; i < N; ++i) a[i] = 0;
  return;
}
};  // namespace Poly
inline void solve(int n) {
  if (n == 0) f[0] = 1;
  if (n == 1 || n == 0) {
    f[1] = 1;
    return;
  }
  int mid = n >> 1;
  solve(mid);
  for (int i = 0; i <= mid; ++i) a[mid - i] = (long long)f[i] * fac[i] % mod;
  for (int i = 0; i <= mid; ++i)
    b[i] = (long long)power(mid, i) * ifac[i] % mod;
  Poly ::times(a, mid + 1, b, mid + 1);
  for (int i = 0; i <= mid; ++i) g[i] = (long long)a[mid - i] * ifac[i] % mod;
  Poly ::clear(a);
  Poly ::clear(b);
  Poly ::times(f, mid + 1, g, mid + 1);
  Poly ::clear(g);
  if (n & 1) {
    for (int i = n; i; --i)
      f[i] = (f[i - 1] + (long long)f[i] * (n - 1) % mod) % mod;
    return;
  }
  return;
}
inline int binom(int n, int m) {
  if (n < m)
    return 0;
  else
    return (long long)fac[n] * ifac[m] % mod * ifac[n - m] % mod;
}
int main() {
  read(n);
  read(A);
  read(B);
  fac[0] = 1;
  for (int i = 1; i <= max(A + B, n); ++i)
    fac[i] = (long long)fac[i - 1] * i % mod;
  ifac[max(A + B, n)] = power(fac[max(A + B, n)], mod - 2);
  for (int i = max(A + B, n) - 1; i >= 0; --i)
    ifac[i] = (long long)ifac[i + 1] * (i + 1) % mod;
  Poly ::preinit();
  solve(n - 1);
  int ans = (long long)binom(A + B - 2, A - 1) * f[A + B - 2] % mod;
  printf("%d\n", ans);
  return 0;
}