Problem: A set of points on a plane is called good, if for any two points at least one of the three conditions is true:

  * those two points lie on same horizontal line; 
  * those two points lie on same vertical line; 
  * the rectangle, with corners in these two points, contains inside or on its borders at least one point of the set, other than these two. We mean here a rectangle with sides parallel to coordinates' axes, the so-called bounding box of the two points.



You are given a set consisting of n points on a plane. Find any good superset of the given set whose size would not exceed 2·105 points.

Input

The first line contains an integer n (1 ≤ n ≤ 104) — the number of points in the initial set. Next n lines describe the set's points. Each line contains two integers xi and yi ( - 109 ≤ xi, yi ≤ 109) — a corresponding point's coordinates. It is guaranteed that all the points are different.

Output

Print on the first line the number of points m (n ≤ m ≤ 2·105) in a good superset, print on next m lines the points. The absolute value of the points' coordinates should not exceed 109. Note that you should not minimize m, it is enough to find any good superset of the given set, whose size does not exceed 2·105.

All points in the superset should have integer coordinates.

Examples

Input

2
1 1
2 2


Output

3
1 1
2 2
1 2

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
#pragma GCC optimize("Ofast")
using namespace std;
void fio() {}
void pti() {
  double timeuse = clock() * 1000.0 / CLOCKS_PER_SEC;
  cerr << "Timeuse " << timeuse << "ms" << endl;
}
void end() {
  pti();
  exit(0);
}
namespace io {
const int SIZ = 55;
int que[SIZ], op, qr;
char ch;
template <class I>
inline void gi(I &w) {
  ch = getchar(), op = 1, w = 0;
  while (!isdigit(ch)) {
    if (ch == '-') op = -1;
    ch = getchar();
  }
  while (isdigit(ch)) {
    w = w * 10 + ch - '0';
    ch = getchar();
  }
  w *= op;
}
template <class I>
inline void print(I w) {
  qr = 0;
  if (!w) putchar('0');
  if (w < 0) putchar('-'), w = -w;
  while (w) que[++qr] = w % 10 + '0', w /= 10;
  while (qr) putchar(que[qr--]);
}
}  // namespace io
using io::gi;
using io::print;
const int N = 2e5 + 5;
struct pot {
  int x, y;
  bool operator==(const pot &a) const { return (x == a.x) && (y == a.y); }
};
int n;
pot s[N];
void solve(int l, int r) {
  if (l >= r) return;
  int mid = (l + r) >> 1;
  for (int i = l; i <= r; ++i) s[++n] = {s[mid].x, s[i].y};
  solve(l, mid - 1), solve(mid + 1, r);
}
int main() {
  fio();
  gi(n);
  for (int i = 1; i <= n; ++i) gi(s[i].x), gi(s[i].y);
  sort(s + 1, s + n + 1, [](pot a, pot b) { return a.x < b.x; });
  solve(1, n);
  sort(s + 1, s + n + 1,
       [](pot a, pot b) { return a.x == b.x ? a.y < b.y : a.x < b.x; });
  n = unique(s + 1, s + n + 1) - s - 1;
  print(n), putchar(10);
  for (int i = 1; i <= n; ++i)
    print(s[i].x), putchar(' '), print(s[i].y), putchar(10);
  end();
}