Problem: Let's call some square matrix with integer values in its cells palindromic if it doesn't change after the order of rows is reversed and it doesn't change after the order of columns is reversed.

For example, the following matrices are palindromic:

<image>

The following matrices are not palindromic because they change after the order of rows is reversed:

<image>

The following matrices are not palindromic because they change after the order of columns is reversed:

<image>

You are given n^2 integers. Put them into a matrix of n rows and n columns so that each number is used exactly once, each cell contains exactly one number and the resulting matrix is palindromic. If there are multiple answers, print any. If there is no solution, print "NO".

Input

The first line contains one integer n (1 ≤ n ≤ 20).

The second line contains n^2 integers a_1, a_2, ..., a_{n^2} (1 ≤ a_i ≤ 1000) — the numbers to put into a matrix of n rows and n columns.

Output

If it is possible to put all of the n^2 numbers into a matrix of n rows and n columns so that each number is used exactly once, each cell contains exactly one number and the resulting matrix is palindromic, then print "YES". Then print n lines with n space-separated numbers — the resulting matrix.

If it's impossible to construct any matrix, then print "NO".

You can print each letter in any case (upper or lower). For example, "YeS", "no" and "yES" are all acceptable.

Examples

Input


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


Output


YES
1 2 2 1
8 2 2 8
8 2 2 8
1 2 2 1


Input


3
1 1 1 1 1 3 3 3 3


Output


YES
1 3 1
3 1 3
1 3 1


Input


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


Output


NO


Input


1
10


Output


YES
10 

Note

Note that there exist multiple answers for the first two examples.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
int a[50][50], d[1005], f[1005], b, i, j, s, p, n, k, N, x, y, k1;
set<int> st;
set<pair<int, int>> sq;
int main() {
  cin >> n;
  N = n * n;
  for (i = 0; i < N; i++) cin >> d[i], f[d[i]]++, st.insert(d[i]);
  for (auto i : st) {
    k += f[i] % 2;
    if (f[i] % 2) k1 = i;
    if (f[i] % 2) f[i]--;
    if (n % 2 && k == 2) return cout << "NO", 0;
    if (n % 2 == 0 && k == 1) return cout << "NO", 0;
    if (f[i] > 0) sq.insert({f[i], i});
  }
  for (i = 1; i <= n / 2; i++) {
    if (i != n - i + 1) {
      x = (*(--sq.end())).first;
      y = (*(--sq.end())).second;
      a[i][i] = y;
      a[i][n - i + 1] = y;
      a[n - i + 1][i] = y;
      a[n - i + 1][n - i + 1] = y;
      if (sq.size()) sq.erase({x, y});
      x -= 4;
      if (x < 0) return cout << "NO", 0;
      if (x) sq.insert({x, y});
    }
  }
  if (k1) a[n / 2 + 1][n / 2 + 1] = k1;
  for (i = 1; i <= n / 2; i++) {
    for (j = 1; j <= n / 2 - i; j++) {
      if (!a[i + j][i]) {
        x = (*(--sq.end())).first;
        y = (*(--sq.end())).second;
        if (sq.size()) sq.erase({x, y});
        a[i + j][i] = y;
        a[n - i + 1 - j][i] = y;
        a[i + j][n - i + 1] = y;
        a[n - i + 1 - j][n - i + 1] = y;
        x -= 4;
        if (x < 0) return cout << "NO", 0;
        if (x) sq.insert({x, y});
      }
      if (!a[i][i + j]) {
        x = (*(--sq.end())).first;
        y = (*(--sq.end())).second;
        if (sq.size()) sq.erase({x, y});
        a[i][i + j] = y;
        a[n - i + 1][i + j] = y;
        a[i][n - i + 1 - j] = y;
        a[n - i + 1][n - i + 1 - j] = y;
        x -= 4;
        if (x < 0) return cout << "NO", 0;
        if (x) sq.insert({x, y});
      }
    }
  }
  if (n % 2) {
    for (i = 1; i <= n / 2; i++) {
      if (!a[n / 2 + 1 + i][n / 2 + 1] && !a[n / 2 + 1 - i][n / 2 + 1]) {
        x = (*(--sq.end())).first;
        y = (*(--sq.end())).second;
        if (sq.size()) sq.erase({x, y});
        a[n / 2 + 1 + i][n / 2 + 1] = y;
        a[n / 2 + 1 - i][n / 2 + 1] = y;
        x -= 2;
        if (x < 0) return cout << "NO", 0;
        if (x) sq.insert({x, y});
      }
      if (!a[n / 2 + 1][n / 2 + 1 + i] && !a[n / 2 + 1][n / 2 + 1 - i]) {
        x = (*(--sq.end())).first;
        y = (*(--sq.end())).second;
        if (sq.size()) sq.erase({x, y});
        a[n / 2 + 1][n / 2 + 1 + i] = y;
        a[n / 2 + 1][n / 2 + 1 - i] = y;
        x -= 2;
        if (x < 0) return cout << "NO", 0;
        if (x) sq.insert({x, y});
      }
    }
  }
  cout << "YES" << endl;
  for (i = 1; i <= n; i++) {
    for (j = 1; j <= n; j++) {
      cout << a[i][j] << ' ';
    }
    cout << endl;
  }
}