Problem: Of course, many of you can calculate φ(n) — the number of positive integers that are less than or equal to n, that are coprime with n. But what if we need to calculate φ(φ(...φ(n))), where function φ is taken k times and n is given in the canonical decomposition into prime factors? 

You are given n and k, calculate the value of φ(φ(...φ(n))). Print the result in the canonical decomposition into prime factors.

Input

The first line contains integer m (1 ≤ m ≤ 105) — the number of distinct prime divisors in the canonical representaion of n.

Each of the next m lines contains a pair of space-separated integers pi, ai (2 ≤ pi ≤ 106; 1 ≤ ai ≤ 1017) — another prime divisor of number n and its power in the canonical representation. The sum of all ai doesn't exceed 1017. Prime divisors in the input follow in the strictly increasing order.

The last line contains integer k (1 ≤ k ≤ 1018).

Output

In the first line, print integer w — the number of distinct prime divisors of number φ(φ(...φ(n))), where function φ is taken k times.

Each of the next w lines must contain two space-separated integers qi, bi (bi ≥ 1) — another prime divisor and its power in the canonical representaion of the result. Numbers qi must go in the strictly increasing order.

Examples

Input

1
7 1
1


Output

2
2 1
3 1


Input

1
7 1
2


Output

1
2 1


Input

1
2 100000000000000000
10000000000000000


Output

1
2 90000000000000000

Note

You can read about canonical representation of a positive integer here: http://en.wikipedia.org/wiki/Fundamental_theorem_of_arithmetic.

You can read about function φ(n) here: http://en.wikipedia.org/wiki/Euler's_totient_function.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const long long maxa = 1000010;
const long long LIM = 8;
long long M, K, val[maxa], inc[maxa], lastk[maxa];
vector<pair<long long, long long> > tajz[maxa];
bool siv[maxa];
priority_queue<pair<long long, long long> > pq;
void step() {
  for (long long i = 0; i < maxa; ++i)
    if (val[i]) {
      --val[i];
      for (auto [p, c] : tajz[i - 1]) val[p] += c;
    }
}
int main() {
  ios::sync_with_stdio(false), cin.tie(0), cout.tie(0);
  for (long long i = 2; i < maxa; ++i)
    if (!siv[i]) {
      for (long long j = i; j < maxa; j += i) {
        siv[j] = 1;
        long long p = 0;
        long long x = j;
        while (x % i == 0) ++p, x /= i;
        tajz[j].emplace_back(i, p);
      }
    }
  cin >> M;
  for (long long i = 0; i < M; ++i) {
    long long p, a;
    cin >> p >> a;
    val[p] = a;
  }
  cin >> K;
  if (K <= LIM) {
    for (long long i = 0; i < K; ++i) step();
  } else {
    for (long long i = 0; i < LIM; ++i) step();
    K -= LIM;
    fill(lastk, lastk + maxa, K);
    for (long long i = 0; i < maxa; ++i)
      if (val[i]) {
        for (auto [p, c] : tajz[i - 1]) inc[p] += c;
        --inc[i];
      }
    for (long long i = 0; i < maxa; ++i)
      if (inc[i] == -1) {
        pq.emplace(K - val[i], i);
      }
    while (!pq.empty() && pq.top().first > 0) {
      auto [t, x] = pq.top();
      pq.pop();
      val[x] -= (lastk[x] - t);
      inc[x] = 0;
      for (auto [p, c] : tajz[x - 1]) {
        val[p] += inc[p] * (lastk[p] - t);
        lastk[p] = t;
        inc[p] -= c;
        if (inc[p] == -1) pq.emplace(t - val[p], p);
      }
    }
    for (long long i = 0; i < maxa; ++i) val[i] += inc[i] * lastk[i];
  }
  long long c = 0;
  for (long long i = 0; i < maxa; ++i) c += val[i] > 0;
  cout << c << '\n';
  for (long long i = 0; i < maxa; ++i) {
    if (val[i]) cout << i << ' ' << val[i] << '\n';
  }
}