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:
//DAILY HUSTLE MORE
#include<bits/stdc++.h>
using namespace std;
#define   int             long long
#define   f(a,b,n)        for(int  a=b;a<n;a++)
#define   readarr(arr,n)  f(i,0,n) cin>>arr[i];
#define   ll              long long
#define   pb              push_back
#define   go              ios_base::sync_with_stdio(false),cin.tie(NULL),cout.tie(NULL)
#define   ms(a,i)         memset(a,i,sizeof(a))
#define   mod             1e9+7
#define   w(t)            int t=1; cin>>t; while(t--)
#define   MOD             1000000007
#define   setbits(x)      __builtin_popcountll(x)
#define   zrobits(x)      __builtin_ctzll(x)
#define   all(x)          x.begin(), x.end()
#define   gcd(x,y)          __gcd(x,y)
#define   vi              vector<int>
#define   vvi             vector<vector<int>>
#define   mi             map<int,int>
#define   pi              pair<int,int>
#define   vpi             vector<pi>
#define   si              set<int>
#define   MSETI           multiset<int>
#define   inf             1e18
#define   ff              first
#define   ss              second
#define   ps(x,y)         fixed <<setprecision(y)<< x
#define   yes             cout <<"YES" << endl
#define   no              cout <<"NO" << endl
#define   impossible      cout << -1 << endl
#define   endl            "\n"
#define   mp(x,y)         make_pair(x,y)

// ----------------ON A MISSION --------------- //
void pseudo()
{
  go;
#ifndef ONLINE_JUDGE
  freopen("input.txt", "r", stdin);
  freopen("output.txt", "w", stdout);
#endif
}

long long hcf(long long a, long long b)
{
  if (b == 0)  return a;
  a %= b;
  return
    hcf(b, a);
}

long long lcm(long long a, long long b)
{
  return (a * b) / hcf(a, b);
}

//---------------------------------------------------------------------------------------------------------------//
void solA()
{
  int n , m ;
  cin >> n >> m ;
  string H ;
  cin >> H ;
  //
  int o = 0 , z = 0 ;

  f(i, 0, n)
  {
    if (H[i] == '1') o++ ;
    else
      z++ ;
  }
  // indices i−1 and i+1.
  vi  dp(n);

  f(i, 0, n)
  {
    if (H[i] == '1')
    {
      dp[i] = 0;
    }
    else
    {
      dp[i]++;
      if (i > 0)
      {
        dp [i] = dp[i] + dp[i - 1] ;
      }
    }
  }
  int end = n ;
  f(i, 0, n)
  {
    if (H[i] == '1')
    {
      end  = i;
      break;
    }
  }

  f(i, end , n - 1)
  {

    if (dp[i] > 0 and dp[i + 1] == 0)
    {
      int  st = i + 1 - dp[i]  ;
      int  mid  = dp[i] / 2;
      mid = min(m , mid) ;

      f(j, st, st + mid)
      {
        H[j] = '1';
      }
      for (int  k = i;  k > i - mid;  k--)
      {
        H[k] = '1';
      }
    }
  }

  ////
  if (end < n)
  {
    int M = m;
    for (int  k = end  - 1; k >= 0 and M--; k--)
    {
      H[k] = '1';
    }
  }
  if (dp[n - 1] > 0 and dp[n - 1] < n)
  {
    int best  = n - 1 - dp[n - 1] + 1;
    for (int j = best ; j < best + m and  j < n; j++)
    {
      H[j] = '1';
    }
  }
  cout << H << "\n" ;
}


void solB()
{
  int n, i;
  cin >> n;
  int a[n + 1];
  for (i = 1; i <= n; i++) cin >> a[i];
  cout << 3 * n << endl;
  for (i = 1; i <= n / 2; i++)
  {
    int  j = n / 2 + i;
    cout << "1 " << i << " " << j << endl;
    cout << "2 " << i << " " << j << endl;
    cout << "1 " << i << " " << j << endl;
    cout << "2 " << i << " " << j << endl;
    cout << "1 " << i << " " << j << endl;
    cout << "2 " << i << " " << j << endl;
  }

}
//-------------------------------------------------------------------------------------------------------------//


int32_t main()
{
  pseudo() ;
  int t ;
  cin >> t ;
  //t = 1 ;
  while (t--)
  {
    solB() ;
  }



  return 0;
}