Problem: This is an interactive problem

You are given a grid n× n, where n is odd. Rows are enumerated from 1 to n from up to down, columns are enumerated from 1 to n from left to right. Cell, standing on the intersection of row x and column y, is denoted by (x, y).

Every cell contains 0 or 1. It is known that the top-left cell contains 1, and the bottom-right cell contains 0.

We want to know numbers in all cells of the grid. To do so we can ask the following questions: 

"? x_1 y_1 x_2 y_2", where 1 ≤ x_1 ≤ x_2 ≤ n, 1 ≤ y_1 ≤ y_2 ≤ n, and x_1 + y_1 + 2 ≤ x_2 + y_2. In other words, we output two different cells (x_1, y_1), (x_2, y_2) of the grid such that we can get from the first to the second by moving only to the right and down, and they aren't adjacent.

As a response to such question you will be told if there exists a path between (x_1, y_1) and (x_2, y_2), going only to the right or down, numbers in cells of which form a palindrome.

For example, paths, shown in green, are palindromic, so answer for "? 1 1 2 3" and "? 1 2 3 3" would be that there exists such path. However, there is no palindromic path between (1, 1) and (3, 1).

<image>

Determine all cells of the grid by asking not more than n^2 questions. It can be shown that the answer always exists.

Input

The first line contains odd integer (3 ≤ n < 50) — the side of the grid.

Interaction

You begin the interaction by reading n.

To ask a question about cells (x_1, y_1), (x_2, y_2), in a separate line output "? x_1 y_1 x_2 y_2".

Numbers in the query have to satisfy 1 ≤ x_1 ≤ x_2 ≤ n, 1 ≤ y_1 ≤ y_2 ≤ n, and x_1 + y_1 + 2 ≤ x_2 + y_2. Don't forget to 'flush', to get the answer.

In response, you will receive 1, if there exists a path going from (x_1, y_1) to (x_2, y_2) only to the right or down, numbers in cells of which form a palindrome, and 0 otherwise.

In case your query is invalid or you asked more than n^2 queries, program will print -1 and will finish interaction. You will receive Wrong answer verdict. Make sure to exit immediately to avoid getting other verdicts.

When you determine numbers in all cells, output "!".

Then output n lines, the i-th of which is a string of length n, corresponding to numbers in the i-th row of the grid.

After printing a query do not forget to output end of line and flush the output. Otherwise, you will get Idleness limit exceeded. To do this, use:

  * fflush(stdout) or cout.flush() in C++;
  * System.out.flush() in Java;
  * flush(output) in Pascal;
  * stdout.flush() in Python;
  * see documentation for other languages.



Hack Format

To hack, use the following format.

The first line should contain a single odd integer n (side of your grid).

The i-th of n following lines should contain a string of length n corresponding to the i-th row of the grid. Top left element of the grid has to be equal to 1, bottom right has to be equal to 0.

Example

Input


3
0
1
0
1
1
1
1

Output


? 1 1 1 3
? 1 1 2 3
? 2 1 2 3
? 3 1 3 3
? 2 2 3 3
? 1 2 3 2
? 1 2 3 3
!
100
001
000

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(nullptr);
  long long n;
  cin >> n;
  auto ask = [&](long long x1, long long y1, long long x2, long long y2) {
    cout << "? " << x1 + 1 << " " << y1 + 1 << " " << x2 + 1 << " " << y2 + 1
         << endl;
    long long v;
    cin >> v;
    if (v == -1) {
      exit(0);
    }
    return v == 1;
  };
  auto ans = [&](vector<vector<bool>> &i) {
    cout << "!" << endl;
    for (vector<bool> &j : i) {
      for (long long k : j) {
        cout << (k ? 1 : 0);
      }
      cout << endl;
    }
  };
  vector<vector<bool>> a((size_t)n, vector<bool>((size_t)n)),
      b((size_t)n, vector<bool>((size_t)n));
  a[0][0] = true;
  a[0][1] = false;
  for (long long x = 0; x < n; x++) {
    for (long long y = 0; y < n; y++) {
      if (x != 0 || y >= 2) {
        if (x == 0 || y >= 3) {
          a[x][y] = a[x][y - 2] == ask(x, y - 2, x, y);
        } else if (y == 0) {
          a[x][y] = ask(x, y, x, y + 2);
        } else if (y == 1) {
          a[x][y] = a[x - 1][y - 1] == ask(x - 1, y - 1, x, y);
        } else if (y == 2) {
          a[x][y] = a[x - 1][y - 1] == ask(x - 1, y - 1, x, y);
          a[x][y - 2] = a[x][y] == a[x][y - 2];
        }
      }
    }
  }
  for (long long x = 0; x < n; x++) {
    for (long long y = 0; y < n; y++) {
      b[x][y] = a[x][y] != ((x + y) % 2 != 0);
    }
  }
  auto coord = [&](long long x1, long long y1, long long x2, long long y2) {
    return x1 * n * n * n + y1 * n * n + x2 * n + y2;
  };
  auto build = [&](vector<vector<bool>> &u, vector<bool> &v) {
    for (long long xd = 0; xd < n; xd++) {
      for (long long yd = 0; yd < n; yd++) {
        for (long long x1 = 0, x2 = xd; x2 < n; x1++, x2++) {
          for (long long y1 = 0, y2 = yd; y2 < n; y1++, y2++) {
            if (x1 != x2 || y1 != y2) {
              if (u[x1][y1] == u[x2][y2]) {
                bool i = abs(x1 - x2) <= 1;
                bool j = abs(y1 - y2) <= 1;
                if (i && j) {
                  v[coord(x1, y1, x2, y2)] = true;
                } else if (i) {
                  v[coord(x1, y1, x2, y2)] = v[coord(x1, y1 + 1, x2, y2 - 1)];
                } else if (j) {
                  v[coord(x1, y1, x2, y2)] = v[coord(x1 + 1, y1, x2 - 1, y2)];
                } else {
                  v[coord(x1, y1, x2, y2)] = v[coord(x1, y1, x2, y2)] ||
                                             v[coord(x1 + 1, y1, x2 - 1, y2)];
                  v[coord(x1, y1, x2, y2)] = v[coord(x1, y1, x2, y2)] ||
                                             v[coord(x1, y1 + 1, x2 - 1, y2)];
                  v[coord(x1, y1, x2, y2)] = v[coord(x1, y1, x2, y2)] ||
                                             v[coord(x1 + 1, y1, x2, y2 - 1)];
                  v[coord(x1, y1, x2, y2)] = v[coord(x1, y1, x2, y2)] ||
                                             v[coord(x1, y1 + 1, x2, y2 - 1)];
                }
              }
            }
          }
        }
      }
    }
  };
  vector<bool> c((size_t)n * n * n * n, false), d((size_t)n * n * n * n, false);
  build(a, c);
  build(b, d);
  for (long long x1 = 0; x1 < n; x1++) {
    for (long long y1 = 0; y1 < n; y1++) {
      for (long long x2 = x1; x2 < n; x2++) {
        for (long long y2 = y1; y2 < n; y2++) {
          if (x1 + y1 + 2 <= x2 + y2) {
            if (c[coord(x1, y1, x2, y2)] && !d[coord(x1, y1, x2, y2)]) {
              ans(ask(x1, y1, x2, y2) ? a : b);
              return 0;
            }
            if (!c[coord(x1, y1, x2, y2)] && d[coord(x1, y1, x2, y2)]) {
              ans(ask(x1, y1, x2, y2) ? b : a);
              return 0;
            }
          }
        }
      }
    }
  }
  return 0;
}