Problem: There are n students in a class working on group projects. The students will divide into groups (some students may be in groups alone), work on their independent pieces, and then discuss the results together. It takes the i-th student ai minutes to finish his/her independent piece.

If students work at different paces, it can be frustrating for the faster students and stressful for the slower ones. In particular, the imbalance of a group is defined as the maximum ai in the group minus the minimum ai in the group. Note that a group containing a single student has an imbalance of 0. How many ways are there for the students to divide into groups so that the total imbalance of all groups is at most k?

Two divisions are considered distinct if there exists a pair of students who work in the same group in one division but different groups in the other.

Input

The first line contains two space-separated integers n and k (1 ≤ n ≤ 200, 0 ≤ k ≤ 1000) — the number of students and the maximum total imbalance allowed, respectively.

The second line contains n space-separated integers ai (1 ≤ ai ≤ 500) — the time it takes the i-th student to complete his/her independent piece of work.

Output

Print a single integer, the number of ways the students can form groups. As the answer may be large, print its value modulo 109 + 7.

Examples

Input

3 2
2 4 5


Output

3


Input

4 3
7 8 9 10


Output

13


Input

4 0
5 10 20 21


Output

1

Note

In the first sample, we have three options: 

  * The first and second students form a group, and the third student forms a group. Total imbalance is 2 + 0 = 2. 
  * The first student forms a group, and the second and third students form a group. Total imbalance is 0 + 1 = 1. 
  * All three students form their own groups. Total imbalance is 0. 



In the third sample, the total imbalance must be 0, so each student must work individually.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <typename T>
T sqr(T x) {
  return x * x;
}
template <typename T>
T abs(T x) {
  return x < 0 ? -x : x;
}
template <typename T>
T gcd(T a, T b) {
  return b ? gcd(b, a % b) : a;
}
template <typename T>
void chmin(T &x, const T y) {
  if (x > y) {
    x = y;
  }
}
template <typename T>
void chmax(T &x, const T y) {
  if (x < y) {
    x = y;
  }
}
template <typename U, typename V>
ostream &operator<<(ostream &s, const pair<U, V> &x) {
  s << "(" << x.first << ", " << x.second << ")";
  return s;
}
template <typename U>
ostream &operator<<(ostream &s, const vector<U> &x) {
  s << "[";
  bool was = false;
  for (auto it : x) {
    if (was) {
      s << ", ";
    }
    was = true;
    s << it;
  }
  s << "]";
  return s;
}
template <typename U>
ostream &operator<<(ostream &s, const set<U> &x) {
  s << "{";
  bool was = false;
  for (auto it : x) {
    if (was) {
      s << ", ";
    }
    was = true;
    s << it;
  }
  s << "}";
  return s;
}
struct TState {
  int d, g, v;
  TState(int d = 0, int g = 0, int v = 0) : d(d), g(g), v(v) {}
};
const int MOD = (int)1e+9 + 7;
const int MAXN = 203;
const int MAXK = 1003;
const int MAXA = 503;
const int MAXD = MAXN / 2 * MAXA + MAXK * 2;
const int MAXG = MAXN / 2;
int _p[MAXD][MAXG];
int (*p)[MAXG];
int a[MAXN];
int s[MAXN];
int n, k;
vector<TState> v, q;
void addmod(int &x, const int d) {
  x += d;
  if (x >= MOD) {
    x -= MOD;
  }
}
int add(int i, int d, int g, int v) {
  if (n - i < g) {
    return 1;
  }
  if (d - (s[i + g - 1] - s[i - 1]) < -k) {
    return 2;
  }
  int &index = p[d][g];
  if (index == 0) {
    q.push_back({d, g, v});
    index = q.size();
  } else {
    addmod(q[index - 1].v, v);
  }
  return 0;
}
int main(int, char **) {
  ios_base::sync_with_stdio(false);
  while (cin >> n >> k) {
    for (int i = 0; i < n; ++i) {
      cin >> a[i];
    }
    sort(a, a + n);
    s[0] = a[0];
    for (int i = 1; i < n; ++i) {
      s[i] = s[i - 1] + a[i];
    }
    memset(_p, 0, sizeof(_p));
    p = _p + MAXK;
    q.clear();
    v.clear();
    add(0, 0, 0, 1);
    for (int i = 0; i < n; ++i) {
      v.swap(q);
      q.clear();
      for (auto &s : v) {
        p[s.d][s.g] = 0;
      }
      for (auto &s : v) {
        assert(0 <= s.g && s.g <= n - i);
        assert(-k <= s.d && s.d < MAXD - MAXK);
        add(i + 1, s.d, s.g, s.v * (long long)(s.g + 1) % MOD);
        add(i + 1, s.d + a[i], s.g + 1, s.v);
        if (s.g > 0) {
          add(i + 1, s.d - a[i], s.g - 1, s.v * (long long)s.g % MOD);
        }
      }
    }
    int ans = 0;
    for (auto &s : q) {
      assert(s.g == 0);
      assert(-k <= s.d && s.d <= 0);
      addmod(ans, s.v);
    }
    cout << ans << endl;
  }
  fprintf(stderr, "Time execute: %.3lf sec\n",
          clock() / (double)CLOCKS_PER_SEC);
  return 0;
}