Problem: You are given a permutation p of integers from 1 to n, where n is an even number. 

Your goal is to sort the permutation. To do so, you can perform zero or more operations of the following type: 

  * take two indices i and j such that 2 ⋅ |i - j| ≥ n and swap p_i and p_j. 



There is no need to minimize the number of operations, however you should use no more than 5 ⋅ n operations. One can show that it is always possible to do that.

Input

The first line contains a single integer n (2 ≤ n ≤ 3 ⋅ 10^5, n is even) — the length of the permutation. 

The second line contains n distinct integers p_1, p_2, …, p_n (1 ≤ p_i ≤ n) — the given permutation.

Output

On the first line print m (0 ≤ m ≤ 5 ⋅ n) — the number of swaps to perform.

Each of the following m lines should contain integers a_i, b_i (1 ≤ a_i, b_i ≤ n, |a_i - b_i| ≥ n/2) — the indices that should be swapped in the corresponding swap.

Note that there is no need to minimize the number of operations. We can show that an answer always exists.

Examples

Input


2
2 1


Output


1
1 2

Input


4
3 4 1 2


Output


4
1 4
1 4
1 3
2 4


Input


6
2 5 3 1 4 6


Output


3
1 5
2 5
1 4

Note

In the first example, when one swap elements on positions 1 and 2, the array becomes sorted.

In the second example, pay attention that there is no need to minimize number of swaps.

In the third example, after swapping elements on positions 1 and 5 the array becomes: [4, 5, 3, 1, 2, 6]. After swapping elements on positions 2 and 5 the array becomes [4, 2, 3, 1, 5, 6] and finally after swapping elements on positions 1 and 4 the array becomes sorted: [1, 2, 3, 4, 5, 6].

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
inline long long isqrt(long long k) {
  long long r = sqrt(k) + 1;
  while (r * r > k) r--;
  return r;
}
inline long long icbrt(long long k) {
  long long r = cbrt(k) + 1;
  while (r * r * r > k) r--;
  return r;
}
inline long long minize(long long& a, long long b) {
  return a = (a > b ? b : a);
}
inline long long maxize(long long& a, long long b) {
  return a = (a < b ? b : a);
}
inline string toString(long long n) {
  stringstream ss;
  ss << n;
  return ss.str();
}
double const eps = 1e-6;
long long const Base = 1e9 + 7, oo = 1e17, MAXN = 1e6;
long long A[MAXN + 5];
long long P[MAXN + 5];
vector<pair<long long, long long> > vec;
void sswap(long long i, long long j) {
  P[A[i]] = j;
  P[A[j]] = i;
  swap(A[i], A[j]);
  vec.push_back(make_pair(i, j));
}
long long Solves() {
  long long n, m, k, cnt = 0, ans = 0, x, y, q, c, sum = 0, v, t;
  cin >> n;
  for (long long i = 1; i <= n; i++) cin >> A[i], P[A[i]] = i;
  for (long long i = 1; i <= n; i++) {
    if (i == A[i]) continue;
    if (P[i] - i >= n / 2) {
      c = P[i];
      sswap(i, c);
    } else if (P[i] <= n / 2) {
      sswap(P[i], n);
      sswap(i, n);
    } else if (P[i] > n / 2 and i <= n / 2) {
      c = P[i];
      sswap(i, n);
      sswap(c, 1);
      sswap(1, n);
      sswap(i, n);
      sswap(c, 1);
    } else {
      c = P[i];
      sswap(1, c);
      sswap(1, i);
      sswap(1, c);
    }
  }
  cout << (long long)vec.size() << endl;
  for (long long i = 0; i < vec.size(); i++)
    cout << vec[i].first << " " << vec[i].second << endl;
  return 0;
}
int main() {
  long long JUDGE_ONLINE = 1;
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  cout.tie(0);
  long long test = 1;
  for (long long T = 1; T <= test; T++) {
    Solves();
  }
  if (!JUDGE_ONLINE)
    cout << "\nTime elapsed: " << 1000 * clock() / CLOCKS_PER_SEC << "ms\n";
}