Problem: You are given an array a consisting of n integers. You can perform the following operations with it: 

  1. Choose some positions i and j (1 ≤ i, j ≤ n, i ≠ j), write the value of a_i ⋅ a_j into the j-th cell and remove the number from the i-th cell; 
  2. Choose some position i and remove the number from the i-th cell (this operation can be performed no more than once and at any point of time, not necessarily in the beginning). 



The number of elements decreases by one after each operation. However, the indexing of positions stays the same. Deleted numbers can't be used in the later operations.

Your task is to perform exactly n - 1 operations with the array in such a way that the only number that remains in the array is maximum possible. This number can be rather large, so instead of printing it you need to print any sequence of operations which leads to this maximum number. Read the output format to understand what exactly you need to print.

Input

The first line contains a single integer n (2 ≤ n ≤ 2 ⋅ 10^5) — the number of elements in the array.

The second line contains n integers a_1, a_2, ..., a_n (-10^9 ≤ a_i ≤ 10^9) — the elements of the array.

Output

Print n - 1 lines. The k-th line should contain one of the two possible operations.

The operation of the first type should look like this: 1~ i_k~ j_k, where 1 is the type of operation, i_k and j_k are the positions of the chosen elements.

The operation of the second type should look like this: 2~ i_k, where 2 is the type of operation, i_k is the position of the chosen element. Note that there should be no more than one such operation.

If there are multiple possible sequences of operations leading to the maximum number — print any of them.

Examples

Input

5
5 -2 0 1 -3


Output

2 3
1 1 2
1 2 4
1 4 5


Input

5
5 2 0 4 0


Output

1 3 5
2 5
1 1 2
1 2 4


Input

2
2 -1


Output

2 2


Input

4
0 -10 0 0


Output

1 1 2
1 2 3
1 3 4


Input

4
0 0 0 0


Output

1 1 2
1 2 3
1 3 4

Note

Let X be the removed number in the array. Let's take a look at all the examples:

The first example has, for example, the following sequence of transformations of the array: [5, -2, 0, 1, -3] → [5, -2, X, 1, -3] → [X, -10, X, 1, -3] → [X, X, X, -10, -3] → [X, X, X, X, 30]. Thus, the maximum answer is 30. Note, that other sequences that lead to the answer 30 are also correct.

The second example has, for example, the following sequence of transformations of the array: [5, 2, 0, 4, 0] → [5, 2, X, 4, 0] → [5, 2, X, 4, X] → [X, 10, X, 4, X] → [X, X, X, 40, X]. The following answer is also allowed: 
    
    
      
    1 5 3  
    1 4 2  
    1 2 1  
    2 3  
    

Then the sequence of transformations of the array will look like this: [5, 2, 0, 4, 0] → [5, 2, 0, 4, X] → [5, 8, 0, X, X] → [40, X, 0, X, X] → [40, X, X, X, X].

The third example can have the following sequence of transformations of the array: [2, -1] → [2, X].

The fourth example can have the following sequence of transformations of the array: [0, -10, 0, 0] → [X, 0, 0, 0] → [X, X, 0, 0] → [X, X, X, 0].

The fifth example can have the following sequence of transformations of the array: [0, 0, 0, 0] → [X, 0, 0, 0] → [X, X, 0, 0] → [X, X, X, 0].

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
struct Istream {
  Istream() {}
  Istream &operator>>(double &x) {
    scanf("%lf", &x);
    return *this;
  }
  template <class T>
  Istream &operator>>(T &x) {
    static char ch;
    static bool neg;
    for (ch = neg = 0; ch < '0' || '9' < ch; neg |= ch == '-', ch = getchar())
      ;
    for (x = 0; '0' <= ch && ch <= '9'; (x *= 10) += ch - '0', ch = getchar())
      ;
    x = neg ? -x : x;
    return *this;
  }
  Istream &operator>>(char &ch) {
    while (!isalnum(ch = getchar()) && !ispunct(ch))
      ;
    return *this;
  }
  Istream &operator>>(char *s) {
    while (!isalnum(*s = getchar()) && !ispunct(*s))
      ;
    while (isalnum(*++s = getchar()) || ispunct(*s))
      ;
    *s = 0;
    return *this;
  }
  template <class T>
  operator T() {
    static T x;
    *this >> x;
    return x;
  }
} fin;
struct Ostream {
  Ostream &operator<<(double x) {
    printf("%.10lf", x);
    return *this;
  }
  template <class T>
  Ostream &operator<<(T x) {
    x < 0 && (putchar('-'), x = -x);
    static char stack[233];
    static int top;
    for (top = 0; x; stack[++top] = x % 10 + '0', x /= 10)
      ;
    for (top == 0 && (stack[top = 1] = '0'); top; putchar(stack[top--]))
      ;
    return *this;
  }
  Ostream &operator<<(char ch) {
    putchar(ch);
    return *this;
  }
  Ostream &operator<<(const char *s) {
    while (*s) putchar(*s++);
    return *this;
  }
} fout;
template <class T>
bool Enlarge(T &a, T const &b) {
  return a < b ? a = b, 1 : 0;
}
template <class T>
bool Reduce(T &a, T const &b) {
  return a > b ? a = b, 1 : 0;
}
const int XN = 2e5 + 11;
int a[XN];
int main() {
  int n;
  fin >> n;
  std::vector<int> z;
  int negc = 0;
  for (int i = 1; i <= n; ++i) {
    fin >> a[i];
    if (a[i] == 0)
      z.push_back(i);
    else
      negc += a[i] < 0;
  }
  int p = 0;
  for (int i = 1; i <= n; ++i)
    if (a[i] < 0 && (p == 0 || a[i] > a[p])) p = i;
  if (negc % 2 == 0) p = 0;
  if (z.size()) {
    for (size_t i = 1; i < z.size(); ++i)
      fout << 1 << ' ' << z[i] << ' ' << z[0] << '\n';
    if (z.size() != n) {
      if ((z.size() + 1) == n && negc == 1) {
        for (int i = 1; i <= n; ++i)
          if (a[i]) fout << 1 << ' ' << i << ' ' << z[0] << '\n';
      } else {
        if (p) fout << 1 << ' ' << p << ' ' << z[0] << '\n';
        fout << 2 << ' ' << z[0] << '\n';
        int f = 0;
        while (a[f] == 0 || p == f) ++f;
        for (int i = 1; i <= n; ++i)
          if (a[i] && i != f && i != p)
            fout << 1 << ' ' << i << ' ' << f << '\n';
      }
    }
  } else {
    if (p == 0)
      for (int i = 2; i <= n; ++i) fout << 1 << ' ' << i << ' ' << 1 << '\n';
    else {
      fout << 2 << ' ' << p << '\n';
      int f = p == 1 ? 2 : 1;
      for (int i = 1; i <= n; ++i)
        if (i != f && i != p) fout << 1 << ' ' << i << ' ' << f << '\n';
    }
  }
  return 0;
}