Problem: <image>

While trading on his favorite exchange trader William realized that he found a vulnerability. Using this vulnerability he could change the values of certain internal variables to his advantage. To play around he decided to change the values of all internal variables from a_1, a_2, …, a_n to -a_1, -a_2, …, -a_n. For some unknown reason, the number of service variables is always an even number.

William understands that with his every action he attracts more and more attention from the exchange's security team, so the number of his actions must not exceed 5 000 and after every operation no variable can have an absolute value greater than 10^{18}. William can perform actions of two types for two chosen variables with indices i and j, where i < j:

  1. Perform assignment a_i = a_i + a_j 
  2. Perform assignment a_j = a_j - a_i 

William wants you to develop a strategy that will get all the internal variables to the desired values.

Input

Each test contains multiple test cases. The first line contains the number of test cases t (1 ≤ t ≤ 20). Description of the test cases follows.

The first line of each test case contains a single even integer n (2 ≤ n ≤ 10^3), which is the number of internal variables.

The second line of each test case contains n integers a_1, a_2, …, a_n (1 ≤ a_i ≤ 10^9), which are initial values of internal variables.

Output

For each test case print the answer in the following format:

The first line of output must contain the total number of actions k, which the strategy will perform. Note that you do not have to minimize k. The inequality k ≤ 5 000 must be satisfied. 

Each of the next k lines must contain actions formatted as "type i j", where "type" is equal to "1" if the strategy needs to perform an assignment of the first type and "2" if the strategy needs to perform an assignment of the second type. Note that i < j should hold.

We can show that an answer always exists.

Example

Input


2
4
1 1 1 1
4
4 3 1 2


Output


8
2 1 2
2 1 2
2 1 3
2 1 3
2 1 4
2 1 4
1 1 2
1 1 2
8
2 1 4
1 2 4
1 2 4
1 2 4
1 3 4
1 1 2
1 1 2
1 1 4

Note

For the first sample test case one possible sequence of operations is as follows:

  1. "2 1 2". Values of variables after performing the operation: [1, 0, 1, 1] 
  2. "2 1 2". Values of variables after performing the operation: [1, -1, 1, 1] 
  3. "2 1 3". Values of variables after performing the operation: [1, -1, 0, 1] 
  4. "2 1 3". Values of variables after performing the operation: [1, -1, -1, 1] 
  5. "2 1 4". Values of variables after performing the operation: [1, -1, -1, 0] 
  6. "2 1 4". Values of variables after performing the operation: [1, -1, -1, -1] 
  7. "1 1 2". Values of variables after performing the operation: [0, -1, -1, -1] 
  8. "1 1 2". Values of variables after performing the operation: [-1, -1, -1, -1] 



For the second sample test case one possible sequence of operations is as follows:

  1. "2 1 4". Values of variables after performing the operation: [4, 3, 1, -2] 
  2. "1 2 4". Values of variables after performing the operation: [4, 1, 1, -2] 
  3. "1 2 4". Values of variables after performing the operation: [4, -1, 1, -2] 
  4. "1 2 4". Values of variables after performing the operation: [4, -3, 1, -2] 
  5. "1 3 4". Values of variables after performing the operation: [4, -3, -1, -2] 
  6. "1 1 2". Values of variables after performing the operation: [1, -3, -1, -2] 
  7. "1 1 2". Values of variables after performing the operation: [-2, -3, -1, -2] 
  8. "1 1 4". Values of variables after performing the operation: [-4, -3, -1, -2] 

Solution (in CPP):

Solution:
#include<bits/stdc++.h>
using namespace std;
typedef long long int ll;
ll mod = 1000000007;
ll maxn = 10000;
#define fi first
#define sec second
// ll powy(ll a, ll b)
// {
//     if (b == 0) return 1;
//     ll c = powy(a, b / 2);
//     if (b % 2 == 1) return (((c * c) % mod) * a) % mod;
//     else return ((c * c) % mod);
// }
// vector<ll> fib(maxn);
// void calc()
// {
//     fib[0] = 0; fib[1] = 1;
//     for (ll i = 2; i < maxn; i++)
//         fib[i] = (fib[i - 1] + fib[i - 2]) % mod;
// }
// vector<ll> fact(maxn);
// void pc()
// {
//     fact[0] = 1;
//     for (ll i = 1; i < maxn; i++)
//         fact[i] = (fact[i - 1] * i) % mod;
// }
// ll ncr(ll n, ll r)
// {
//     if (n < r) return 0;
//     if (n == r) return 1;
//     if (r == 0) return 1;
//     ll inv = powy((fact[n - r] * fact[r]) % mod, mod - 2) % mod;
//     ll ans = (inv * fact[n]) % mod;
//     return ans;
// }
// const int N = 10000;
// int lp[N + 1];
// vector<int> pr;
// void sieve() {
//     for (int i = 2; i <= N; ++i) {
//         if (lp[i] == 0) {
//             lp[i] = i;
//             pr.push_back (i);
//         }
//         for (int j = 0; j < (int)pr.size() && pr[j] <= lp[i] && i * pr[j] <= N; ++j)
//             lp[i * pr[j]] = pr[j];
//     }
// }
bool cmp(pair<ll, pair<ll, string> > p1, pair<ll, pair<ll, string> > p2)
{
    if (p1.fi > p2.fi) return true;
    else if (p2.fi > p1.fi) return false;
    else
    {
        if (p1.sec.fi > p2.sec.fi) return true;
        else return false;
    }
}
int main()
{
    ios_base::sync_with_stdio(false);
    cin.tie(NULL);
    cout.tie(NULL);
    ll t; cin >> t;
    while (t--) {
        ll n; cin >> n;
        vector<ll> vec(n);
        for (ll i = 0; i < n; i++)
        {
            cin >> vec[i];
        }
        ll k = (3 * n);
        cout << k << "\n";
        for (ll i = 0; i < n - 1; i += 2)
        {
            cout << "1 " << i + 1 << " " << i + 2 << "\n";
            cout << "2 " << i + 1 << " " << i + 2 << "\n";
            cout << "1 " << i + 1 << " " << i + 2 << "\n";
            cout << "2 " << i + 1 << " " << i + 2 << "\n";
            cout << "1 " << i + 1 << " " << i + 2 << "\n";
            cout << "2 " << i + 1 << " " << i + 2 << "\n";
        }
    }
    return 0;
}