Problem: Devu wants to decorate his garden with flowers. He has purchased n boxes, where the i-th box contains fi flowers. All flowers in a single box are of the same color (hence they are indistinguishable). Also, no two boxes have flowers of the same color.

Now Devu wants to select exactly s flowers from the boxes to decorate his garden. Devu would like to know, in how many different ways can he select the flowers from each box? Since this number may be very large, he asks you to find the number modulo (109 + 7). 

Devu considers two ways different if there is at least one box from which different number of flowers are selected in these two ways.

Input

The first line of input contains two space-separated integers n and s (1 ≤ n ≤ 20, 0 ≤ s ≤ 1014).

The second line contains n space-separated integers f1, f2, ... fn (0 ≤ fi ≤ 1012).

Output

Output a single integer — the number of ways in which Devu can select the flowers modulo (109 + 7).

Examples

Input

2 3
1 3


Output

2


Input

2 4
2 2


Output

1


Input

3 5
1 3 2


Output

3

Note

Sample 1. There are two ways of selecting 3 flowers: {1, 2} and {0, 3}.

Sample 2. There is only one way of selecting 4 flowers: {2, 2}.

Sample 3. There are three ways of selecting 5 flowers: {1, 2, 2}, {0, 3, 2}, and {1, 3, 1}.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
template <class T>
inline T read(const T sample) {
  T x = 0;
  int f = 1;
  char s;
  while ((s = getchar()) > '9' || s < '0')
    if (s == '-') f = -1;
  while (s >= '0' && s <= '9')
    x = (x << 1) + (x << 3) + (s ^ 48), s = getchar();
  return x * f;
}
template <class T>
inline void write(const T x) {
  if (x < 0) return (void)(putchar('-'), write(-x));
  if (x > 9) write(x / 10);
  putchar(x % 10 ^ 48);
}
template <class T>
inline T Max(const T x, const T y) {
  if (x > y) return x;
  return y;
}
template <class T>
inline T Min(const T x, const T y) {
  if (x < y) return x;
  return y;
}
template <class T>
inline T fab(const T x) {
  return x > 0 ? x : -x;
}
template <class T>
inline T gcd(const T x, const T y) {
  return y ? gcd(y, x % y) : x;
}
template <class T>
inline T lcm(const T x, const T y) {
  return x / gcd(x, y) * y;
}
template <class T>
inline T Swap(T &x, T &y) {
  x ^= y ^= x ^= y;
}
const int mod = 1e9 + 7;
int n;
long long s, f[22];
int qkpow(int x, int y) {
  int r = 1;
  while (y) {
    if (y & 1) r = 1ll * r * x % mod;
    x = 1ll * x * x % mod;
    y >>= 1;
  }
  return r;
}
int C(int n, int m) {
  if (n < m) return 0;
  if (m > n - m) m = n - m;
  int up = 1, down = 1;
  for (register signed i = (0), _end = (m - 1); i <= _end; ++i) {
    up = 1ll * up * (n - i) % mod;
    down = 1ll * down * (i + 1) % mod;
  }
  return 1ll * up * qkpow(down, mod - 2) % mod;
}
int Lucas(long long n, long long m) {
  if (m == 0) return 1;
  return 1ll * Lucas(n / mod, m / mod) * C(n % mod, m % mod) % mod;
}
int work() {
  long long tot, ans = 0, sign;
  for (register signed i = (0), _end = ((1 << n) - 1); i <= _end; ++i) {
    tot = s;
    sign = 1;
    for (register signed j = (1), _end = (n); j <= _end; ++j)
      if ((1 << j - 1) & i) {
        tot -= f[j] + 1;
        sign = -sign;
      }
    if (tot < 0) continue;
    ans = ((ans + sign * Lucas(tot + n - 1, n - 1)) % mod + mod) % mod;
  }
  return ans;
}
int main() {
  n = read(9), s = read(9ll);
  for (register signed i = (1), _end = (n); i <= _end; ++i) f[i] = read(9ll);
  write(work()), putchar('\n');
  return 0;
}