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>
const int mod = 998244353, g = 3, _g = 332748118, maxn = 1e6 + 9;
inline long long Pow(long long base, long long b) {
  long long ret(1);
  while (b) {
    if (b & 1) ret = 1ll * ret * base % mod;
    base = 1ll * base * base % mod;
    b >>= 1;
  }
  return ret;
}
long long r[maxn];
inline long long Fir(long long n) {
  long long limit(1), len(0), up(n << 1);
  while (limit < up) {
    limit <<= 1;
    ++len;
  }
  for (long long i = 0; i < limit; ++i)
    r[i] = (r[i >> 1] >> 1) | ((i & 1) << len - 1);
  return limit;
}
inline void NTT(long long *a, long long n, long long type) {
  for (long long i = 0; i < n; ++i)
    if (i < r[i]) std::swap(a[i], a[r[i]]);
  for (long long mid = 1; mid < n; mid <<= 1) {
    long long wn(Pow(type ? g : _g, (mod - 1) / (mid << 1)));
    for (long long R = mid << 1, j = 0; j < n; j += R)
      for (long long k = 0, w = 1; k < mid; ++k, w = w * wn % mod) {
        long long x(a[j + k]), y(1ll * w * a[j + mid + k] % mod);
        a[j + k] = 1ll * (x + y) % mod;
        a[j + mid + k] = 1ll * (x - y + mod) % mod;
      }
  }
}
long long T[maxn], F[maxn], H[maxn], G[maxn], fac[maxn], fav[maxn], tmp[maxn],
    sum[maxn], B[maxn];
inline long long Mul(long long n, long long *a, long long *b, long long *ans) {
  long long limit(Fir(n));
  NTT(a, limit, 1);
  NTT(b, limit, 1);
  for (long long i = 0; i < limit; ++i) ans[i] = 1ll * a[i] * b[i] % mod;
  NTT(ans, limit, 0);
  for (long long i = ((n - 1) << 1) + 1; i < limit; ++i) a[i] = b[i] = 0;
  return Pow(limit, mod - 2);
}
inline void Solve(long long n, long long *a) {
  if (!n) {
    a[0] = 1;
    return;
  }
  if (n == 1) {
    a[1] = 1;
    return;
  }
  long long len(n / 2);
  Solve(len, a);
  for (long long i = 0; i <= len; ++i) {
    F[i] = 1ll * Pow(len, i) * fav[i] % mod;
    H[i] = 1ll * fac[i] * a[i] % mod;
  }
  for (long long i = 0; i <= (len >> 1); ++i) std::swap(H[i], H[len - i]);
  long long limit(Fir(len + 1));
  for (long long i = len + 1; i < limit; ++i) F[i] = H[i] = 0;
  NTT(F, limit, 1);
  NTT(H, limit, 1);
  for (long long i = 0; i < limit; ++i) G[i] = 1ll * F[i] * H[i] % mod;
  NTT(G, limit, 0);
  long long ty(Pow(limit, mod - 2));
  for (long long i = 0; i <= len; ++i)
    tmp[i] = 1ll * G[len - i] * ty % mod * Pow(fac[i], mod - 2) % mod;
  long long val(Mul(len + 1, a, tmp, B));
  for (long long i = 0; i <= (len << 1); ++i) a[i] = 1ll * B[i] * val % mod;
  if (n & 1) {
    for (long long i = 0; i < n; ++i) T[i] = a[i];
    for (long long i = 1; i <= n; ++i)
      a[i] = 1ll * (T[i - 1] + 1ll * (n - 1) * T[i] % mod) % mod;
  }
}
inline long long Get_c(long long n, long long m) {
  return 1ll * fac[n] * fav[m] % mod * fav[n - m] % mod;
}
long long n, a, b;
long long ans[maxn];
int main() {
  scanf("%d%d%d", &n, &a, &b);
  fac[0] = fac[1] = 1;
  for (long long i = 2; i <= n; ++i) fac[i] = 1ll * fac[i - 1] * i % mod;
  fav[n] = Pow(fac[n], mod - 2);
  for (long long i = n; i >= 1; --i) fav[i - 1] = 1ll * fav[i] * i % mod;
  Solve(n - 1, ans);
  printf("%d\n", 1ll * ans[a + b - 2] * Get_c(a + b - 2, a - 1) % mod);
}