Problem: Tachibana Kanade likes Mapo Tofu very much. One day, the canteen cooked all kinds of tofu to sell, but not all tofu is Mapo Tofu, only those spicy enough can be called Mapo Tofu.

Each piece of tofu in the canteen is given a m-based number, all numbers are in the range [l, r] (l and r being m-based numbers), and for every m-based integer in the range [l, r], there exists a piece of tofu with that number.

To judge what tofu is Mapo Tofu, Tachibana Kanade chose n m-based number strings, and assigned a value to each string. If a string appears in the number of a tofu, the value of the string will be added to the value of that tofu. If a string appears multiple times, then the value is also added that many times. Initially the value of each tofu is zero.

Tachibana Kanade considers tofu with values no more than k to be Mapo Tofu. So now Tachibana Kanade wants to know, how many pieces of tofu are Mapo Tofu?

Input

The first line contains three integers n, m and k (1 ≤ n ≤ 200; 2 ≤ m ≤ 20; 1 ≤ k ≤ 500). Where n denotes the number of strings, m denotes the base used, and k denotes the limit of the value for Mapo Tofu.

The second line represents the number l. The first integer in the line is len (1 ≤ len ≤ 200), describing the length (number of digits in base m) of l. Then follow len integers a1, a2, ..., alen (0 ≤ ai < m; a1 > 0) separated by spaces, representing the digits of l, with a1 being the highest digit and alen being the lowest digit.

The third line represents the number r in the same format as l. It is guaranteed that 1 ≤ l ≤ r.

Then follow n lines, each line describing a number string. The i-th line contains the i-th number string and vi — the value of the i-th string (1 ≤ vi ≤ 200). All number strings are described in almost the same format as l, the only difference is number strings may contain necessary leading zeros (see the first example). The sum of the lengths of all number strings does not exceed 200.

Output

Output the number of pieces of Mapo Tofu modulo 1000000007 (109 + 7). The answer should be a decimal integer.

Examples

Input

2 10 1
1 1
3 1 0 0
1 1 1
1 0 1


Output

97


Input

2 10 12
2 5 9
6 6 3 5 4 9 7
2 0 6 1
3 6 7 2 1


Output

635439


Input

4 2 6
6 1 0 1 1 1 0
6 1 1 0 1 0 0
1 1 2
3 0 1 0 5
4 0 1 1 0 4
3 1 0 1 2


Output

2

Note

In the first sample, 10, 11 and 100 are the only three decimal numbers in [1, 100] with a value greater than 1. Here the value of 1 is 1 but not 2, since numbers cannot contain leading zeros and thus cannot be written as "01".

In the second sample, no numbers in the given interval have a value greater than 12.

In the third sample, 110000 and 110001 are the only two binary numbers in the given interval with a value no greater than 6.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int MOD = 1e9 + 7;
const int MAXL = 210;
const int MAXN = 210;
const int MAXK = 510;
const int MAXM = 21;
void noprint(...) {}
int n, m, k;
int lenl, numl[MAXL];
int lenr, numr[MAXL];
int pat[MAXN][MAXL], lenp[MAXN], v[MAXN];
namespace AC {
int ch[MAXL][MAXM] = {0}, idx = 1;
bool word[MAXL] = {0};
int val[MAXL] = {0};
void insert(int *a, int n, int v) {
  int u = 0;
  for (int i = 0; i < n; ++i, ++a) {
    int c = *a;
    if (!ch[u][c]) ch[u][c] = idx++;
    u = ch[u][c];
  }
  word[u] = true;
  val[u] += v;
}
int fail[MAXL] = {0}, last[MAXL] = {0};
queue<int> bfsq;
void build() {
  for (int c = 0; c < m; ++c)
    if (ch[0][c]) bfsq.push(ch[0][c]);
  while (!bfsq.empty()) {
    int u = bfsq.front();
    bfsq.pop();
    noprint("val[%d] = %d\n", u, val[u]);
    for (int i = 0; i < m; ++i) {
      int v = ch[u][i];
      if (!v) {
        ch[u][i] = ch[fail[u]][i];
        continue;
      }
      int j = fail[u];
      while (j && !ch[j][i]) j = fail[j];
      fail[v] = ch[j][i];
      noprint("fail[%d] = %d\n", v, fail[v]);
      last[v] = word[fail[v]] ? fail[v] : last[fail[v]];
      val[v] += val[last[v]];
      bfsq.push(v);
    }
  }
}
}  // namespace AC
void input() {
  scanf("%d%d%d", &n, &m, &k);
  scanf("%d", &lenl);
  for (int i = 0; i < lenl; ++i) scanf("%d", numl + i);
  scanf("%d", &lenr);
  for (int i = 0; i < lenr; ++i) scanf("%d", numr + i);
  for (int i = 0; i < n; ++i) {
    scanf("%d", lenp + i);
    for (int j = 0; j < lenp[i]; ++j) scanf("%d", pat[i] + j);
    scanf("%d", v + i);
    AC::insert(pat[i], lenp[i], v[i]);
  }
  AC::build();
  noprint("finished input()\n");
}
int solve0() {
  int val = 0;
  for (int i = 0; i < n; ++i)
    if (lenp[i] == 1 && pat[i][0] == 0) val += v[i];
  return val <= k ? 1 : 0;
}
int sub1(int *a, int n) {
  reverse(a, a + n);
  for (int i = 0; i < n; ++i) {
    --a[i];
    if (a[i] < 0)
      a[i] += m;
    else
      break;
  }
  if (a[n - 1] == 0) --n;
  reverse(a, a + n);
  return n;
}
int g[2][MAXL][MAXK];
int solve_unlimit(int n) {
  if (!n) return 0;
  memset(g, 0, sizeof(g));
  int cur = 0, ans = 0;
  g[cur][0][0] = 1;
  for (int i = 0; i < n; ++i) {
    cur ^= 1;
    memset(g[cur], 0, sizeof(g[cur]));
    noprint("i = %d\n", i);
    for (int u = 0; u < AC::idx; ++u)
      for (int val = 0; val <= k; ++val)
        for (int c = (i ? 0 : 1); c < m; ++c) {
          if (!g[cur ^ 1][u][val]) continue;
          int nu = AC::ch[u][c];
          int nval = val + AC::val[nu];
          noprint("u = %d, val = %d, c = %d, nu = %d, nval = %d\n", u, val, c,
                  nu, nval);
          if (nval > k) continue;
          g[cur][nu][nval] = (g[cur][nu][nval] + g[cur ^ 1][u][val]) % MOD;
        }
    for (int u = 0; u < AC::idx; ++u)
      for (int val = 0; val <= k; ++val) ans = (ans + g[cur][u][val]) % MOD;
  }
  noprint("finished solve_unlimit()\n");
  return ans;
}
int f[2][MAXL][MAXK][2];
int solve(int *a, int n) {
  memset(f, 0, sizeof(f));
  int cur = 0, ans = solve_unlimit(n - 1);
  noprint("solve_unlimit(%d) = %d\n", n - 1, ans);
  f[cur][0][0][1] = 1;
  for (int i = 0; i < n; ++i) {
    cur ^= 1;
    memset(f[cur], 0, sizeof(f[cur]));
    for (int u = 0; u < AC::idx; ++u)
      for (int val = 0; val <= k; ++val)
        for (int up = 0; up <= 1; ++up) {
          if (!f[cur ^ 1][u][val][up]) continue;
          int begin = i ? 0 : 1;
          int end = i ? (up ? a[i] : m - 1) : a[i];
          for (int c = begin; c <= end; ++c) {
            int nu = AC::ch[u][c];
            int nval = val + AC::val[nu];
            if (nval > k) continue;
            int nup = up && c == a[i];
            f[cur][nu][nval][nup] =
                (f[cur][nu][nval][nup] + f[cur ^ 1][u][val][up]) % MOD;
          }
        }
  }
  for (int u = 0; u < AC::idx; ++u)
    for (int val = 0; val <= k; ++val)
      for (int up = 0; up <= 1; ++up) ans = (ans + f[cur][u][val][up]) % MOD;
  noprint("finished solve()\n");
  return ans;
}
int main() {
  input();
  if (lenr == 1 && numr[0] == 0) {
    printf("%d\n", solve0());
    return 0;
  }
  int ans = solve(numr, lenr);
  if (lenl != 1 || numl[0] != 0) {
    if (lenl == 1 && numl[0] == 1)
      ;
    else {
      lenl = sub1(numl, lenl);
      ans -= solve(numl, lenl);
    }
  } else
    ans += solve0();
  printf("%d\n", (ans + MOD) % MOD);
  return 0;
}