#include <bits/stdc++.h>
using namespace std;
const int N = 2005, mod = 998244353;
int ksm(int a, int b) {
  int c = 1;
  while (b) {
    if (b & 1) c = 1ll * c * a % mod;
    a = 1ll * a * a % mod;
    b >>= 1;
  }
  return c;
}
int a[N], n, K, sum[N][N], f[2][N][N], fac[N], inv[N];
int main() {
  scanf("%d%d", &n, &K);
  for (int i = 1; i <= n; i++) scanf("%d", &a[i]);
  int _ = 0;
  if (max(0, a[1] - K) <= 1 && min(n, a[1] + K) >= 1)
    f[_ ^ 1][1][0] = 1, sum[1][1] = 1;
  if (max(0, a[1] - K) <= 0 && min(n, a[1] + K) >= 0)
    f[_ ^ 1][0][1] = 1, sum[1][0] = 1;
  for (int i = 1; i <= n; i++) sum[1][i] += sum[1][i - 1];
  fac[0] = inv[0] = 1;
  for (int i = 1; i < N; i++)
    fac[i] = 1ll * fac[i - 1] * i % mod, inv[i] = ksm(fac[i], mod - 2);
  for (int i = 2; i <= n; i++, _ ^= 1) {
    for (int j = max(0, a[i] - K); j <= min(i, a[i] + K); j++) {
      for (int k = 0; j + k - 1 <= i; k++) {
        f[_][j][k] = (1ll * f[_ ^ 1][j][k] * (j + k) + f[_][j][k]) % mod;
        (f[_][j][k + 1] += f[_ ^ 1][j][k]) % mod;
        if (j)
          f[_][j][k] =
              (1ll * sum[j - 1 + k][min(j - 1, min(i, a[i - 1] + K))] * inv[k] +
               f[_][j][k]) %
              mod;
      }
    }
    for (int j = max(0, a[i - 1] - K); j <= min(i, a[i - 1] + K); j++)
      for (int k = 0; k <= i; k++) f[_ ^ 1][j][k] = 0;
    for (int k = i; k >= 0; k--)
      for (int j = max(0, a[i - 1] - K); j <= min(i, a[i - 1] + K); j++)
        sum[k][j] = 0;
    for (int k = i; k >= 0; k--)
      for (int j = max(0, a[i] - K); j <= min(i, a[i] + K); j++)
        sum[k][j] = (sum[k][j - 1] +
                     (k >= j ? 1ll * f[_][j][k - j] * fac[k - j] % mod : 0)) %
                    mod;
  }
  _ ^= 1;
  int ans = 0;
  for (int j = 0; j <= n; j++)
    for (int k = 0; k + j <= n; k++)
      (ans += 1ll * f[_][j][k] * fac[n - j] % mod * inv[n - j - k] % mod) %=
          mod;
  printf("%d", ans);
  return 0;
}

### Prompt

Your task is to create a cpp solution to the following problem:

For an array c of nonnegative integers, MEX(c) denotes the smallest nonnegative integer that doesn't appear in it. For example, MEX([0, 1, 3]) = 2, MEX([42]) = 0.

You are given integers n, k, and an array [b_1, b_2, …, b_n].

Find the number of arrays [a_1, a_2, …, a_n], for which the following conditions hold:

  * 0 ≤ a_i ≤ n for each i for each i from 1 to n.

  * |MEX([a_1, a_2, …, a_i]) - b_i| ≤ k for each i from 1 to n.




As this number can be very big, output it modulo 998 244 353.

Input

The first line of the input contains two integers n, k (1 ≤ n ≤ 2000, 0 ≤ k ≤ 50).

The second line of the input contains n integers b_1, b_2, …, b_n (-k ≤ b_i ≤ n+k) — elements of the array b.

Output

Output a single integer — the number of arrays which satisfy the conditions from the statement, modulo 998 244 353.

Examples

Input


4 0
0 0 0 0


Output


256


Input


4 1
0 0 0 0


Output


431


Input


4 1
0 0 1 1


Output


509


Input


5 2
0 0 2 2 0


Output


6546


Input


3 2
-2 0 4


Output


11

### Response

```cpp
#include <bits/stdc++.h>
using namespace std;
const int N = 2005, mod = 998244353;
int ksm(int a, int b) {
  int c = 1;
  while (b) {
    if (b & 1) c = 1ll * c * a % mod;
    a = 1ll * a * a % mod;
    b >>= 1;
  }
  return c;
}
int a[N], n, K, sum[N][N], f[2][N][N], fac[N], inv[N];
int main() {
  scanf("%d%d", &n, &K);
  for (int i = 1; i <= n; i++) scanf("%d", &a[i]);
  int _ = 0;
  if (max(0, a[1] - K) <= 1 && min(n, a[1] + K) >= 1)
    f[_ ^ 1][1][0] = 1, sum[1][1] = 1;
  if (max(0, a[1] - K) <= 0 && min(n, a[1] + K) >= 0)
    f[_ ^ 1][0][1] = 1, sum[1][0] = 1;
  for (int i = 1; i <= n; i++) sum[1][i] += sum[1][i - 1];
  fac[0] = inv[0] = 1;
  for (int i = 1; i < N; i++)
    fac[i] = 1ll * fac[i - 1] * i % mod, inv[i] = ksm(fac[i], mod - 2);
  for (int i = 2; i <= n; i++, _ ^= 1) {
    for (int j = max(0, a[i] - K); j <= min(i, a[i] + K); j++) {
      for (int k = 0; j + k - 1 <= i; k++) {
        f[_][j][k] = (1ll * f[_ ^ 1][j][k] * (j + k) + f[_][j][k]) % mod;
        (f[_][j][k + 1] += f[_ ^ 1][j][k]) % mod;
        if (j)
          f[_][j][k] =
              (1ll * sum[j - 1 + k][min(j - 1, min(i, a[i - 1] + K))] * inv[k] +
               f[_][j][k]) %
              mod;
      }
    }
    for (int j = max(0, a[i - 1] - K); j <= min(i, a[i - 1] + K); j++)
      for (int k = 0; k <= i; k++) f[_ ^ 1][j][k] = 0;
    for (int k = i; k >= 0; k--)
      for (int j = max(0, a[i - 1] - K); j <= min(i, a[i - 1] + K); j++)
        sum[k][j] = 0;
    for (int k = i; k >= 0; k--)
      for (int j = max(0, a[i] - K); j <= min(i, a[i] + K); j++)
        sum[k][j] = (sum[k][j - 1] +
                     (k >= j ? 1ll * f[_][j][k - j] * fac[k - j] % mod : 0)) %
                    mod;
  }
  _ ^= 1;
  int ans = 0;
  for (int j = 0; j <= n; j++)
    for (int k = 0; k + j <= n; k++)
      (ans += 1ll * f[_][j][k] * fac[n - j] % mod * inv[n - j - k] % mod) %=
          mod;
  printf("%d", ans);
  return 0;
}

```