Problem: You are given n integers a1, a2, ..., an. Denote this list of integers as T.

Let f(L) be a function that takes in a non-empty list of integers L.

The function will output another integer as follows: 

  * First, all integers in L are padded with leading zeros so they are all the same length as the maximum length number in L. 
  * We will construct a string where the i-th character is the minimum of the i-th character in padded input numbers. 
  * The output is the number representing the string interpreted in base 10. 



For example f(10, 9) = 0, f(123, 321) = 121, f(530, 932, 81) = 30.

Define the function 

<image> Here, <image> denotes a subsequence.

In other words, G(x) is the sum of squares of sum of elements of nonempty subsequences of T that evaluate to x when plugged into f modulo 1 000 000 007, then multiplied by x. The last multiplication is not modded. 

You would like to compute G(0), G(1), ..., G(999 999). To reduce the output size, print the value <image>, where <image> denotes the bitwise XOR operator.

Input

The first line contains the integer n (1 ≤ n ≤ 1 000 000) — the size of list T.

The next line contains n space-separated integers, a1, a2, ..., an (0 ≤ ai ≤ 999 999) — the elements of the list. 

Output

Output a single integer, the answer to the problem.

Examples

Input

3
123 321 555


Output

292711924


Input

1
999999


Output

997992010006992


Input

10
1 1 1 1 1 1 1 1 1 1


Output

28160

Note

For the first sample, the nonzero values of G are G(121) = 144 611 577, G(123) = 58 401 999, G(321) = 279 403 857, G(555) = 170 953 875. The bitwise XOR of these numbers is equal to 292 711 924.

For example, <image>, since the subsequences [123] and [123, 555] evaluate to 123 when plugged into f.

For the second sample, we have <image>

For the last sample, we have <image>, where <image> is the binomial coefficient.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <typename T>
inline bool upmin(T &x, T y) {
  return y < x ? x = y, 1 : 0;
}
template <typename T>
inline bool upmax(T &x, T y) {
  return x < y ? x = y, 1 : 0;
}
const long double eps = 1e-11;
const long double pi = acos(-1);
const long long oo = 1 << 30;
const long long loo = 1ll << 62;
const long long mods = 1e9 + 7;
const long long MAXN = 1000005;
const long long MX = 999999;
const long long INF = 0x3f3f3f3f;
inline long long read() {
  long long f = 1, x = 0;
  char c = getchar();
  while (c < '0' || c > '9') {
    if (c == '-') f = -1;
    c = getchar();
  }
  while (c >= '0' && c <= '9') {
    x = (x << 3) + (x << 1) + (c ^ 48);
    c = getchar();
  }
  return x * f;
}
long long pw[MAXN], pw2[MAXN], s0[MAXN], s1[MAXN], s2[MAXN], P[MAXN], num[MAXN];
long long upd(long long x, long long y) {
  return x + y >= mods ? x + y - mods : x + y;
}
long long get(long long x) {
  long long ans = 0;
  if (s0[x] > 0) ans = upd(ans, 1ll * pw2[s0[x] - 1] * s2[x] % mods);
  if (s0[x] > 1)
    ans = upd(ans, 1ll * pw2[s0[x] - 2] *
                       upd(1ll * s1[x] * s1[x] % mods, mods - s2[x]) % mods);
  return ans;
}
signed main() {
  long long n = read();
  pw[0] = pw2[0] = 1;
  for (long long i = 1; i <= 6; i++) pw[i] = pw[i - 1] * 10;
  for (long long i = 1; i <= n; i++) pw2[i] = upd(pw2[i - 1], pw2[i - 1]);
  for (long long i = 1; i <= n; i++) {
    long long x = read();
    s0[x]++, s1[x] = upd(s1[x], x), s2[x] = upd(s2[x], 1ll * x * x % mods);
  }
  num[0] = 0;
  for (long long i = 1; i < 64; i++) num[i] = num[i >> 1] + (i & 1);
  for (long long j = 0; j < 64; j++)
    for (long long k = 0; k < 6; k++)
      if ((j >> k) & 1) P[j] += pw[k];
  for (long long i = MX; i >= 0; i--) {
    long long S = 0;
    for (long long j = 0; j < 6; j++)
      if ((i / pw[j]) % 10 != 9) S |= 1 << j;
    for (long long j = S; j; j = (j - 1) & S) {
      long long t = num[j];
      if (t & 1)
        s0[i] = upd(s0[i], s0[i + P[j]]), s1[i] = upd(s1[i], s1[i + P[j]]),
        s2[i] = upd(s2[i], s2[i + P[j]]);
      else
        s0[i] = upd(s0[i], mods - s0[i + P[j]]),
        s1[i] = upd(s1[i], mods - s1[i + P[j]]),
        s2[i] = upd(s2[i], mods - s2[i + P[j]]);
    }
  }
  long long ans = 0;
  for (long long i = 0; i <= MX; i++) {
    long long cnt = get(i), S = 0;
    for (long long j = 0; j < 6; j++)
      if ((i / pw[j]) % 10 != 9) S |= 1 << j;
    for (long long j = S; j; j = (j - 1) & S)
      cnt += ((num[j] & 1) ? -1 : 1) * get(i + P[j]);
    cnt = ((cnt % mods) + mods) % mods;
    ans ^= cnt * i;
  }
  printf("%lld\n", ans);
  return 0;
}