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;
long long power(long long a, long long b) {
  long long res = 1ll;
  while (b > 0) {
    if (b % 2 != 0) res = (res * a) % 1000000007;
    a = (a * a) % 1000000007;
    b /= 2;
  }
  return res;
}
long long ncr(long long n, long long k) {
  if (k > n - k) k = n - k;
  long long pro = 1;
  for (long long i = 0; i < k; i++) {
    pro = (pro * (n - i)) % 1000000007;
    pro /= (i + 1);
  }
  return (pro % 1000000007);
}
vector<long long> prime;
void seive() {
  vector<bool> isprime(2000001, true);
  for (int i = 2; i * i <= 2000000; i++) {
    if (isprime[i]) {
      for (int j = i * i; j <= 2000000; j += i) {
        isprime[j] = false;
      }
    }
  }
  for (int i = 2; i <= 1000000; i++) {
    if (isprime[i]) prime.push_back(i);
  }
}
vector<long long> arr;
vector<pair<long long, long long> > ans;
map<long long, long long> mp;
void swap(int i, int j) {
  long long temp = arr[i];
  arr[i] = arr[j];
  arr[j] = temp;
}
int tcnt = 0;
void fun1(long long i, long long j, long long n) {
  long long pos = mp[i];
  if (pos == i) {
    return;
  }
  if (2 * abs(pos - i) >= n) {
    mp[i] = i;
    mp[arr[i - 1]] = pos;
    ans.push_back({pos, i});
    swap(pos - 1, i - 1);
    return;
  }
  if (pos < i) {
    mp[i] = j;
    mp[arr[j - 1]] = pos;
    ans.push_back({j, pos});
    swap(pos - 1, j - 1);
  } else if (pos > i) {
    mp[i] = 1;
    mp[arr[0]] = pos;
    ans.push_back({1, pos});
    swap(0, pos - 1);
  }
  return;
}
void fun2(int i, int j, int n) {
  long long pos = mp[j];
  if (pos == j) {
    return;
  }
  if (2 * abs(pos - j) >= n) {
    mp[j] = j;
    mp[arr[j - 1]] = pos;
    ans.push_back({pos, j});
    swap(pos - 1, j - 1);
    return;
  }
  if (pos < j) {
    mp[arr[0]] = pos;
    mp[j] = 1;
    ans.push_back({1, pos});
    swap(pos - 1, 0);
  }
  return;
}
int main(void) {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  long long n;
  cin >> n;
  arr.resize(n);
  for (int i = 0; i < n; i++) {
    cin >> arr[i];
    mp[arr[i]] = i + 1;
  }
  for (int i = n / 2, j = n; i > 0; i--, j--) {
    fun1(i, j, n);
    fun1(i, j, n);
    fun1(i, j, n);
    fun2(i, j, n);
    fun2(i, j, n);
  }
  cout << ans.size() << endl;
  for (auto itr : ans) cout << itr.first << " " << itr.second << "\n";
  return 0;
}