Problem: Due to the recent popularity of the Deep learning new countries are starting to look like Neural Networks. That is, the countries are being built deep with many layers, each layer possibly having many cities. They also have one entry, and one exit point.

There are exactly L layers, each having N cities. Let us look at the two adjacent layers L1 and L2. Each city from the layer L1 is connected to each city from the layer L2 with the traveling cost cij for <image>, and each pair of adjacent layers has the same cost in between their cities as any other pair (they just stacked the same layers, as usual). Also, the traveling costs to each city from the layer L2 are same for all cities in the L1, that is cij is the same for <image>, and fixed j.

Doctor G. needs to speed up his computations for this country so he asks you to find the number of paths he can take from entry to exit point such that his traveling cost is divisible by given number M.

Input

The first line of input contains N (1 ≤ N ≤ 106), L (2 ≤ L ≤ 105) and M (2 ≤ M ≤ 100), the number of cities in each layer, the number of layers and the number that travelling cost should be divisible by, respectively.

Second, third and fourth line contain N integers each denoting costs 0 ≤ cost ≤ M from entry point to the first layer, costs between adjacent layers as described above, and costs from the last layer to the exit point.

Output

Output a single integer, the number of paths Doctor G. can take which have total cost divisible by M, modulo 109 + 7.

Example

Input

2 3 13
4 6
2 1
3 4


Output

2

Note

<image>

This is a country with 3 layers, each layer having 2 cities. Paths <image>, and <image> are the only paths having total cost divisible by 13. Notice that input edges for layer cities have the same cost, and that they are same for all layers.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
inline void read(int &x) {
  char ch;
  bool flag = false;
  for (ch = getchar(); !isdigit(ch); ch = getchar())
    if (ch == '-') flag = true;
  for (x = 0; isdigit(ch); x = x * 10 + ch - '0', ch = getchar())
    ;
  x = flag ? -x : x;
}
inline void read(long long &x) {
  char ch;
  bool flag = false;
  for (ch = getchar(); !isdigit(ch); ch = getchar())
    if (ch == '-') flag = true;
  for (x = 0; isdigit(ch); x = x * 10 + ch - '0', ch = getchar())
    ;
  x = flag ? -x : x;
}
inline void write(int x) {
  static const int maxlen = 100;
  static char s[maxlen];
  if (x < 0) {
    putchar('-');
    x = -x;
  }
  if (!x) {
    putchar('0');
    return;
  }
  int len = 0;
  for (; x; x /= 10) s[len++] = x % 10 + '0';
  for (int i = len - 1; i >= 0; --i) putchar(s[i]);
}
const int MAXN = 1100000;
int tot, l, lim;
int v[MAXN];
long long cnt[200];
struct Matrix {
  int n, m;
  long long a[120][120];
  Matrix() {
    memset(a, 0, sizeof(a));
    n = 0, m = 0;
  }
  void out() {
    puts("");
    for (int i = 0; i < n; i++) {
      for (int j = 0; j < m; j++) printf("%d ", a[i][j]);
      puts("");
    }
    puts("");
  }
  void init() {
    memset(cnt, 0, sizeof(cnt));
    for (int i = 1; i <= tot; i++) {
      int x;
      read(x);
      x = x % lim;
      v[i] = x;
      cnt[x]++;
    }
    n = lim;
    m = lim;
    for (int i = 0; i < lim; i++)
      for (int j = 0; j < lim; j++) a[i][(i + j) % lim] = cnt[j];
  }
};
const long long P = 1000000007ll;
Matrix operator*(Matrix A, Matrix B) {
  Matrix C;
  C.n = A.n;
  C.m = B.m;
  for (int i = 0; i < A.n; i++)
    for (int j = 0; j < A.m; j++)
      for (int k = 0; k < B.m; k++)
        C.a[i][k] = (C.a[i][k] + 1ll * A.a[i][j] * B.a[j][k] % P) % P;
  return C;
}
Matrix st, mid, ORG;
Matrix get_pow(Matrix A, int x) {
  if (x == 0) return ORG;
  Matrix tmp = get_pow(A, x / 2);
  if (x % 2 == 0)
    return tmp * tmp;
  else
    return tmp * tmp * A;
}
int main() {
  read(tot);
  read(l);
  read(lim);
  ORG.n = lim;
  ORG.m = lim;
  for (int i = 0; i < lim; i++) ORG.a[i][i] = 1;
  st.n = 1;
  st.m = lim;
  for (int i = 1; i <= tot; i++) {
    int x;
    read(x);
    x = x % lim;
    st.a[0][x]++;
  }
  mid.init();
  memset(cnt, 0, sizeof(cnt));
  for (int i = 1; i <= tot; i++) {
    int x;
    read(x);
    cnt[(x + v[i]) % lim]++;
  }
  mid = get_pow(mid, l - 2);
  st = st * mid;
  int ans = 0;
  for (int i = 0; i < lim; i++)
    if (cnt[i]) ans = (ans + 1ll * st.a[0][(lim - i) % lim] * cnt[i] % P) % P;
  printf("%d\n", ans);
  return 0;
}