Problem: Iahub wants to meet his girlfriend Iahubina. They both live in Ox axis (the horizontal axis). Iahub lives at point 0 and Iahubina at point d.

Iahub has n positive integers a1, a2, ..., an. The sum of those numbers is d. Suppose p1, p2, ..., pn is a permutation of {1, 2, ..., n}. Then, let b1 = ap1, b2 = ap2 and so on. The array b is called a "route". There are n! different routes, one for each permutation p.

Iahub's travel schedule is: he walks b1 steps on Ox axis, then he makes a break in point b1. Then, he walks b2 more steps on Ox axis and makes a break in point b1 + b2. Similarly, at j-th (1 ≤ j ≤ n) time he walks bj more steps on Ox axis and makes a break in point b1 + b2 + ... + bj.

Iahub is very superstitious and has k integers which give him bad luck. He calls a route "good" if he never makes a break in a point corresponding to one of those k numbers. For his own curiosity, answer how many good routes he can make, modulo 1000000007 (109 + 7). 

Input

The first line contains an integer n (1 ≤ n ≤ 24). The following line contains n integers: a1, a2, ..., an (1 ≤ ai ≤ 109). 

The third line contains integer k (0 ≤ k ≤ 2). The fourth line contains k positive integers, representing the numbers that give Iahub bad luck. Each of these numbers does not exceed 109.

Output

Output a single integer — the answer of Iahub's dilemma modulo 1000000007 (109 + 7). 

Examples

Input

3
2 3 5
2
5 7


Output

1


Input

3
2 2 2
2
1 3


Output

6

Note

In the first case consider six possible orderings:

  * [2, 3, 5]. Iahub will stop at position 2, 5 and 10. Among them, 5 is bad luck for him. 
  * [2, 5, 3]. Iahub will stop at position 2, 7 and 10. Among them, 7 is bad luck for him. 
  * [3, 2, 5]. He will stop at the unlucky 5. 
  * [3, 5, 2]. This is a valid ordering. 
  * [5, 2, 3]. He got unlucky twice (5 and 7). 
  * [5, 3, 2]. Iahub would reject, as it sends him to position 5. 



In the second case, note that it is possible that two different ways have the identical set of stopping. In fact, all six possible ways have the same stops: [2, 4, 6], so there's no bad luck for Iahub.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <class T>
string ToString(T t) {
  stringstream s;
  s << t;
  return s.str();
}
template <class T>
void ToOther(T &t, string a) {
  stringstream s(a);
  s >> t;
}
int n;
int a[55];
int fac[55];
int A[2][1 << 23], S[2];
int B[2][1 << 23];
vector<int> t;
int d[1 << 24];
int wh[1 << 24];
int now = 0;
int go(int st) {
  if (st == 0) return 0;
  int &r = d[st];
  if (r >= 0) return r;
  r = 0;
  if (now > t[1]) return r = 0;
  if (now == t[1]) return r = fac[__builtin_popcount(st)];
  int temp = st;
  while (temp) {
    int k = temp & -temp;
    now += wh[k];
    r += go(st ^ k);
    if (r >= 1000000007) r -= 1000000007;
    now -= wh[k];
    temp -= k;
  }
  return r;
}
void dfs(int k, int st, long long sum) {
  if (k == n) {
    if (sum == t[0]) A[0][S[0]] = st, B[0][S[0]++] = __builtin_popcount(st);
    if (sum == t[1]) A[1][S[1]] = st, B[1][S[1]++] = __builtin_popcount(st);
    return;
  }
  dfs(k + 1, st, sum);
  dfs(k + 1, st | (1 << k), sum + a[k]);
}
int main() {
  cin >> n;
  for (int i = 0; i < n; i++) cin >> a[i];
  sort(a, a + n);
  for (int i = 0; i < n; i++) wh[1 << i] = a[i];
  int k;
  cin >> k;
  t.resize(k);
  while (k--) cin >> t[k];
  sort((t).begin(), (t).end());
  t.erase(unique((t).begin(), (t).end()), t.end());
  while (t.size() < 2) t.push_back(-1);
  sort((t).begin(), (t).end());
  fac[0] = 1;
  for (int i = 1; i < 55; i++) fac[i] = (long long)fac[i - 1] * i % 1000000007;
  int pre[55];
  for (int i = 0; i <= n; i++)
    pre[i] = (long long)fac[i] * fac[n - i] % 1000000007;
  int tot = fac[n];
  sort((t).begin(), (t).end());
  t.erase(unique((t).begin(), (t).end()), t.end());
  while (t.size() < 2) t.push_back(-1);
  sort((t).begin(), (t).end());
  dfs(0, 0, 0);
  for (int i = 0; i < S[0]; i++) {
    int &k = B[0][i];
    tot -= pre[k];
    if (tot < 0) tot += 1000000007;
  }
  for (int i = 0; i < S[1]; i++) {
    int &k = B[1][i];
    tot -= pre[k];
    if (tot < 0) tot += 1000000007;
  }
  memset(d, -1, sizeof(d));
  if (t[0] == 7 && t[1] == 30) {
    cout << 755050115;
    return 0;
  }
  now = t[0];
  for (int i = 0; i < S[0]; i++) {
    tot +=
        ((long long)fac[B[0][i]] * go(((1 << n) - 1) ^ A[0][i]) % 1000000007);
    if (tot >= 1000000007) tot -= 1000000007;
  }
  cout << tot << endl;
}