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;
using ll = long long;
namespace _buff {
constexpr size_t BUFF = 1 << 19;
char buff[BUFF], *begin = buff, *end = buff;
char getc() {
  if (begin == end) {
    begin = buff;
    end = buff + fread(buff, 1, BUFF, stdin);
  }
  return begin == end ? -1 : *begin++;
}
}  // namespace _buff
ll read() {
  using namespace _buff;
  ll ret = 0;
  bool pos = true;
  char c = getc();
  for (; (c < '0' || c > '9') && c != '-'; c = getc()) {
    assert(~c);
  }
  if (c == '-') {
    pos = false;
    c = getc();
  }
  for (; c >= '0' && c <= '9'; c = getc()) {
    ret = (ret << 3) + (ret << 1) + (c ^ 48);
  }
  return pos ? ret : -ret;
}
constexpr size_t N = 1 << 18 | 5;
constexpr ll MOD = 998244353;
constexpr ll OMEGA = 3;
ll qpow(ll base, ll e) {
  ll ret = 1;
  for (; e; e >>= 1) {
    if (e & 1) {
      ret = ret * base % MOD;
    }
    base = base * base % MOD;
  }
  return ret;
}
namespace Stirling {
ll pre_wn[N][2];
ll get_wn(int i, int j) {
  ll &ret = pre_wn[i][j];
  if (ret) return ret;
  ret = qpow(OMEGA, j ? MOD - 1 - (MOD - 1) / i : (MOD - 1) / i);
  return ret;
}
void ntt(int n, ll a[], int fl) {
  static int rev[N], rev_lg;
  static int lg, i, j, m, l, _;
  lg = 0;
  for (; (1 << lg) < n; ++lg) {
  }
  if (rev_lg != lg) {
    for (i = 0, _ = 1 << lg; i < _; ++i) {
      rev[i] = (rev[i >> 1] >> 1) | ((i & 1) << (lg - 1));
    }
    rev_lg = lg;
  }
  for (i = 0; i < n; ++i) {
    if (i < rev[i]) {
      swap(a[i], a[rev[i]]);
    }
  }
  for (m = 1, l = 2; m < n; m <<= 1, l <<= 1) {
    static ll wn;
    wn = get_wn(l, !~fl);
    for (i = 0; i < n; i += l) {
      static ll w;
      w = 1;
      for (j = 0; j < m; ++j) {
        assert(i + j + m < n);
        static ll x, y;
        x = a[i + j];
        y = w * a[i + j + m] % MOD;
        a[i + j] = x + y;
        a[i + j + m] = x - y;
        if (a[i + j] >= MOD) a[i + j] -= MOD;
        if (a[i + j + m] < 0) a[i + j + m] += MOD;
        w = w * wn % MOD;
      }
    }
  }
  if (!~fl) {
    static ll inv;
    inv = qpow(n, MOD - 2);
    for (i = 0; i < n; ++i) {
      a[i] = a[i] * inv % MOD;
    }
  }
}
void mul(int n, int m, ll a[], ll b[], ll c[]) {
  static ll ta[N], tb[N], tc[N];
  static int i, tot, _;
  tot = 1;
  for (_ = n + m - 1; tot < _; tot <<= 1) {
  }
  memset(ta, 0, sizeof(ll) * tot);
  memset(tb, 0, sizeof(ll) * tot);
  memcpy(ta, a, sizeof(ll) * n);
  memcpy(tb, b, sizeof(ll) * m);
  ntt(tot, ta, 1);
  ntt(tot, tb, 1);
  for (i = 0; i < tot; ++i) {
    tc[i] = ta[i] * tb[i] % MOD;
  }
  ntt(tot, tc, -1);
  for (int i = 0; i < _; ++i) {
    c[i] = tc[i];
  }
}
ll arr[N];
void divide(int vl, int vr) {
  if (vl + 1 == vr) {
    arr[vl << 1] = vl;
    arr[vl << 1 | 1] = 1;
    return;
  }
  int mid = (vl + vr) >> 1;
  divide(vl, mid);
  divide(mid, vr);
  mul(mid - vl + 1, vr - mid + 1, &arr[vl << 1], &arr[mid << 1], &arr[vl << 1]);
}
ll Stir(int n, int m) {
  if (n < m) return 0;
  if (!n) return 1;
  divide(0, n);
  return arr[m];
}
}  // namespace Stirling
namespace Comb {
constexpr size_t N = 1e5 + 5;
ll fac[N], inv[N], finv[N];
void prep() {
  static bool done = false;
  if (done) return;
  fac[0] = inv[0] = finv[0] = fac[1] = inv[1] = finv[1] = 1;
  for (int i = 2; i < N; ++i) {
    fac[i] = fac[i - 1] * i % MOD;
    inv[i] = MOD - MOD / i * inv[MOD % i] % MOD;
    finv[i] = finv[i - 1] * inv[i] % MOD;
  }
  done = true;
}
ll C(int n, int m) {
  if (n < m) return 0;
  prep();
  return fac[n] * finv[m] % MOD * finv[n - m] % MOD;
}
}  // namespace Comb
int main() {
  int n = read(), a = read(), b = read();
  if (n - 1 < a + b - 2 || a + b - 2 < 0) return puts("0"), 0;
  printf("%lld\n",
         Stirling::Stir(n - 1, a + b - 2) * Comb::C(a + b - 2, a - 1) % MOD);
  return 0;
}