Problem: Seyyed and MoJaK are friends of Sajjad. Sajjad likes a permutation. Seyyed wants to change the permutation in a way that Sajjad won't like it. Seyyed thinks more swaps yield more probability to do that, so he makes MoJaK to perform a swap between every pair of positions (i, j), where i < j, exactly once. MoJaK doesn't like to upset Sajjad.

Given the permutation, determine whether it is possible to swap all pairs of positions so that the permutation stays the same. If it is possible find how to do that. 

Input

The first line contains single integer n (1 ≤ n ≤ 1000) — the size of the permutation.

As the permutation is not important, you can consider ai = i, where the permutation is a1, a2, ..., an.

Output

If it is not possible to swap all pairs of positions so that the permutation stays the same, print "NO",

Otherwise print "YES", then print <image> lines: the i-th of these lines should contain two integers a and b (a < b) — the positions where the i-th swap is performed.

Examples

Input

3


Output

NO


Input

1


Output

YES

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
int n, a[6], b[6], i, j, m;
inline void wrt(int x) {
  if (x > 9) wrt(x / 10);
  putchar(x % 10 + 48);
}
inline void wk(int x) {
  wrt(x);
  putchar(' ');
}
inline void wr(int x) {
  wrt(x);
  putchar('\n');
}
void sol(int x, int X, int y, int Y) {
  wk(x), wr(y);
  wk(X), wr(Y);
  wk(x), wr(Y);
  wk(X), wr(y);
}
int main() {
  scanf("%d", &n);
  if ((n & 3) == 2 || (n & 3) == 3) {
    puts("NO");
    return 0;
  }
  puts("YES");
  m = n - (n & 3);
  for (i = 1; i <= m; i += 4) {
    for (j = 0; j < 4; ++j) a[j] = i + j;
    if (n & 3) {
      wk(a[2]), wr(n);
      wk(a[3]), wr(n);
      wk(a[1]), wr(a[3]);
      wk(a[0]), wr(a[2]);
      wk(a[1]), wr(n);
      wk(a[0]), wr(n);
      wk(a[1]), wr(a[2]);
      wk(a[0]), wr(a[3]);
      wk(a[2]), wr(a[3]);
      wk(a[0]), wr(a[1]);
    } else {
      wk(a[0]), wr(a[1]);
      wk(a[2]), wr(a[3]);
      wk(a[0]), wr(a[3]);
      wk(a[1]), wr(a[2]);
      wk(a[0]), wr(a[2]);
      wk(a[1]), wr(a[3]);
    }
  }
  for (i = 1; i <= m; i += 4)
    for (j = i + 4; j <= m; j += 4) {
      sol(i, i + 1, j, j + 1);
      sol(i, i + 1, j + 2, j + 3);
      sol(i + 2, i + 3, j, j + 1);
      sol(i + 2, i + 3, j + 2, j + 3);
    }
  return 0;
}