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>
#pragma GCC optimize("O3")
using namespace std;
inline long long getint() {
  long long _x = 0, _tmp = 1;
  char _tc = getchar();
  while ((_tc < '0' || _tc > '9') && _tc != '-') _tc = getchar();
  if (_tc == '-') _tc = getchar(), _tmp = -1;
  while (_tc >= '0' && _tc <= '9') _x *= 10, _x += (_tc - '0'), _tc = getchar();
  return _x * _tmp;
}
inline long long add(long long _x, long long _y,
                     long long _mod = 1000000007LL) {
  _x += _y;
  return _x >= _mod ? _x - _mod : _x;
}
inline long long sub(long long _x, long long _y,
                     long long _mod = 1000000007LL) {
  _x -= _y;
  return _x < 0 ? _x + _mod : _x;
}
inline long long mul(long long _x, long long _y,
                     long long _mod = 1000000007LL) {
  _x *= _y;
  return _x >= _mod ? _x % _mod : _x;
}
long long mypow(long long _a, long long _x, long long _mod) {
  if (_x == 0) return 1LL;
  long long _ret = mypow(mul(_a, _a, _mod), _x >> 1, _mod);
  if (_x & 1) _ret = mul(_ret, _a, _mod);
  return _ret;
}
long long mymul(long long _a, long long _x, long long _mod) {
  if (_x == 0) return 0LL;
  long long _ret = mymul(add(_a, _a, _mod), _x >> 1, _mod);
  if (_x & 1) _ret = add(_ret, _a, _mod);
  return _ret;
}
inline bool equal(double _x, double _y) {
  return _x > _y - 1e-9 && _x < _y + 1e-9;
}
int __ = 1, _cs;
struct Mat {
  int n, a[101][101];
  Mat(int _n) {
    n = _n;
    for (int i = 0; i < n; i++)
      for (int j = 0; j < n; j++) a[i][j] = 0;
  }
  Mat operator*(const Mat& he) const {
    Mat ret(n);
    for (int i = 0; i < n; i++)
      for (int j = 0; j < n; j++)
        for (int k = 0; k < n; k++)
          ret.a[i][j] = add(ret.a[i][j], mul(a[i][k], he.a[k][j]));
    return ret;
  }
  Mat operator^(int tms) const {
    Mat ret(n), tmp(n);
    for (int i = 0; i < n; i++) {
      ret.a[i][i] = 1;
      for (int j = 0; j < n; j++) tmp.a[i][j] = a[i][j];
    }
    while (tms > 0) {
      if (tms & 1) ret = ret * tmp;
      tmp = tmp * tmp;
      tms >>= 1;
    }
    return ret;
  }
};
void build() {}
int n, l, m, s[1010101], u[1010101], o[1010101];
void init() {
  n = getint();
  l = getint();
  m = getint();
  for (int i = 0; i < n; i++) s[i] = getint();
  for (int i = 0; i < n; i++) u[i] = getint();
  for (int i = 0; i < n; i++) o[i] = getint();
}
int cnt[111], sc[111], oc[111][111];
void solve() {
  Mat tmp(m);
  for (int i = 0; i < n; i++) cnt[u[i] % m]++;
  for (int i = 0; i < m; i++)
    for (int j = 0; j < m; j++) {
      int dlt = (i - j + m) % m;
      tmp.a[i][j] = cnt[dlt];
    }
  for (int i = 0; i < n; i++) sc[s[i] % m]++;
  for (int i = 0; i < n; i++) oc[u[i] % m][o[i] % m]++;
  tmp = tmp ^ (l - 2);
  int ans = 0;
  for (int i = 0; i < m; i++)
    if (sc[i])
      for (int j = 0; j < m; j++)
        for (int k = 0; k < m; k++) {
          if (oc[j][k] == 0) continue;
          int tar = (m - (i + j + k) % m) % m;
          ans = add(ans, mul(sc[i], mul(oc[j][k], tmp.a[tar][0])));
        }
  printf("%d\n", ans);
}
int main() {
  build();
  while (__--) {
    init();
    solve();
  }
}