Problem: Iahub is playing an uncommon game. Initially, he has n boxes, numbered 1, 2, 3, ..., n. Each box has some number of candies in it, described by a sequence a1, a2, ..., an. The number ak represents the number of candies in box k. 

The goal of the game is to move all candies into exactly two boxes. The rest of n - 2 boxes must contain zero candies. Iahub is allowed to do several (possible zero) moves. At each move he chooses two different boxes i and j, such that ai ≤ aj. Then, Iahub moves from box j to box i exactly ai candies. Obviously, when two boxes have equal number of candies, box number j becomes empty.

Your task is to give him a set of moves such as Iahub to archive the goal of the game. If Iahub can't win the game for the given configuration of boxes, output -1. Please note that in case there exist a solution, you don't need to print the solution using minimal number of moves.

Input

The first line of the input contains integer n (3 ≤ n ≤ 1000). The next line contains n non-negative integers: a1, a2, ..., an — sequence elements. It is guaranteed that sum of all numbers in sequence a is up to 106. 

Output

In case there exists no solution, output -1. Otherwise, in the first line output integer c (0 ≤ c ≤ 106), representing number of moves in your solution. Each of the next c lines should contain two integers i and j (1 ≤ i, j ≤ n, i ≠ j): integers i, j in the kth line mean that at the k-th move you will move candies from the j-th box to the i-th one.

Examples

Input

3
3 6 9


Output

2
2 3
1 3


Input

3
0 1 0


Output

-1

Input

4
0 1 1 0


Output

0

Note

For the first sample, after the first move the boxes will contain 3, 12 and 3 candies. After the second move, the boxes will contain 6, 12 and 0 candies. Now all candies are in exactly 2 boxes.

For the second sample, you can observe that the given configuration is not valid, as all candies are in a single box and they should be in two boxes. Also, any move won't change the configuration, so there exists no solution.

For the third sample, all candies are already in 2 boxes. Hence, no move is needed.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const long long INF64 = ((long long)1E18);
const int INF = 1E9 + 7;
template <class C>
void mini(C& a4, C b4) {
  a4 = min(a4, b4);
}
template <class C>
void maxi(C& a4, C b4) {
  a4 = max(a4, b4);
}
template <typename T1, typename T2>
ostream& operator<<(ostream& out, pair<T1, T2> pair) {
  out << "(" << pair.first << ", " << pair.second << ")";
  return out;
}
vector<int> res[2];
int t[1005], n;
deque<int> todo;
vector<pair<int, int> > moves;
void move(int x, int y) {
  assert(t[x] <= t[y]);
  int u = t[x];
  t[x] = 2 * u;
  t[y] -= u;
  moves.push_back(make_pair(x, y));
}
pair<int, int> go(int a, int b, int c) {
  vector<pair<int, int> > u;
  u.push_back(make_pair(t[a], a));
  u.push_back(make_pair(t[b], b));
  u.push_back(make_pair(t[c], c));
  sort((u).begin(), (u).end());
  a = u[0].second;
  b = u[1].second;
  c = u[2].second;
  {
    if (0)
      cerr << "a"
           << " = " << a << ", "
           << "b"
           << " = " << b << ", "
           << "c"
           << " = " << c << ", "
           << "t[a]"
           << " = " << t[a] << ", "
           << "t[b]"
           << " = " << t[b] << ", "
           << "t[c]"
           << " = " << t[c] << endl;
  };
  if (t[a] == 0) return make_pair(b, c);
  if (t[a] == t[b]) {
    move(a, b);
    return make_pair(a, c);
  }
  if (t[b] == t[c]) {
    move(b, c);
    return make_pair(a, b);
  }
  int x = t[b] / t[a];
  while (x) {
    if (x % 2) {
      move(a, b);
    } else {
      move(a, c);
    }
    x /= 2;
  }
  return go(a, b, c);
}
int main() {
  ios_base::sync_with_stdio(false);
  cin >> n;
  for (int i = (1); i <= (n); ++i) {
    cin >> t[i];
    if (t[i]) todo.push_back(i);
  }
  if (((int)(todo).size()) <= 1) {
    cout << -1 << endl;
    return 0;
  }
  while (((int)(todo).size()) > 2) {
    int a, b, c;
    a = todo[0];
    b = todo[1];
    c = todo[2];
    vector<pair<int, int> > u;
    u.push_back(make_pair(t[a], a));
    u.push_back(make_pair(t[b], b));
    u.push_back(make_pair(t[c], c));
    sort((u).begin(), (u).end());
    for (int i = (1); i <= (3); ++i) todo.pop_front();
    pair<int, int> x = go(u[0].second, u[1].second, u[2].second);
    todo.push_back(x.first);
    todo.push_back(x.second);
  }
  cout << ((int)(moves).size()) << endl;
  for (__typeof((moves).begin()) it = ((moves).begin()); it != (moves).end();
       ++it)
    cout << it->first << " " << it->second << endl;
  for (int i = (1); i <= (n); ++i) {
    if (0)
      cerr << "i"
           << " = " << i << ", "
           << "t[i]"
           << " = " << t[i] << endl;
  };
  return 0;
}