Problem: The earth is under an attack of a deadly virus. Luckily, prompt actions of the Ministry of Health against this emergency successfully confined the spread of the infection within a square grid of areas. Recently, public health specialists found an interesting pattern with regard to the transition of infected areas. At each step in time, every area in the grid changes its infection state according to infection states of its directly (horizontally, vertically, and diagonally) adjacent areas.

* An infected area continues to be infected if it has two or three adjacent infected areas.
* An uninfected area becomes infected if it has exactly three adjacent infected areas.
* An area becomes free of the virus, otherwise.



Your mission is to fight against the virus and disinfect all the areas. The Ministry of Health lets an anti-virus vehicle prototype under your command. The functionality of the vehicle is summarized as follows.

* At the beginning of each time step, you move the vehicle to one of the eight adjacent areas. The vehicle is not allowed to move to an infected area (to protect its operators from the virus). It is not allowed to stay in the same area.
* Following vehicle motion, all the areas, except for the area where the vehicle is in, change their infection states according to the transition rules described above.
Special functionality of the vehicle protects its area from virus infection even if the area is adjacent to exactly three infected areas. Unfortunately, this virus-protection capability of the vehicle does not last. Once the vehicle leaves the area, depending on the infection states of the adjacent areas, the area can be infected.
The area where the vehicle is in, which is uninfected, has the same effect to its adjacent areas as an infected area as far as the transition rules are concerned.



The following series of figures illustrate a sample scenario that successfully achieves the goal.

Initially, your vehicle denoted by @ is found at (1, 5) in a 5 × 5-grid of areas, and you see some infected areas which are denoted by #'s.

<image>

Firstly, at the beginning of time step 1, you move your vehicle diagonally to the southwest, that is, to the area (2, 4). Note that this vehicle motion was possible because this area was not infected at the start of time step 1.

Following this vehicle motion, infection state of each area changes according to the transition rules. The column "1-end" of the figure illustrates the result of such changes at the end of time step 1. Note that the area (3, 3) becomes infected because there were two adjacent infected areas and the vehicle was also in an adjacent area, three areas in total.

In time step 2, you move your vehicle to the west and position it at (2, 3).

Then infection states of other areas change. Note that even if your vehicle had exactly three infected adjacent areas (west, southwest, and south), the area that is being visited by the vehicle is not infected. The result of such changes at the end of time step 2 is as depicted in "2-end".

Finally, in time step 3, you move your vehicle to the east. After the change of the infection states, you see that all the areas have become virus free! This completely disinfected situation is the goal. In the scenario we have seen, you have successfully disinfected all the areas in three time steps by commanding the vehicle to move (1) southwest, (2) west, and (3) east.

Your mission is to find the length of the shortest sequence(s) of vehicle motion commands that can successfully disinfect all the areas.



Input

The input is a sequence of datasets. The end of the input is indicated by a line containing a single zero. Each dataset is formatted as follows.

n
a11 a12 ... a1n
a21 a22 ... a2n
...
an1 an2 ... ann


Here, n is the size of the grid. That means that the grid is comprised of n × n areas. You may assume 1 ≤ n ≤ 5. The rest of the dataset consists of n lines of n letters. Each letter aij specifies the state of the area at the beginning: '#' for infection, '.' for free of virus, and '@' for the initial location of the vehicle. The only character that can appear in a line is '#', '.', or '@'. Among n × n areas, there exists exactly one area which has '@'.

Output

For each dataset, output the minimum number of time steps that is required to disinfect all the areas. If there exists no motion command sequence that leads to complete disinfection, output -1. The output should not contain any other extra character.

Examples

Input

3
...
.@.
...
3
.##
.#.
@##
3
##.
#..
@..
5
....@
##...
#....
...#.
##.##
5
#...#
...#.
#....
...##
..@..
5
#....
.....
.....
.....
..@..
5
#..#.
#.#.#
.#.#.
....#
.#@##
5
..##.
..#..
#....
#....
.#@..
0


Output

0
10
-1
3
2
1
6
4


Input

3
...
.@.
...
3
.##
.#.
@##
3
.
..
@..
5
....@
...
....
...#.
.##
5
...#
...#.
....
...##
..@..
5
....
.....
.....
.....
..@..
5
..#.
.#.#
.#.#.
....#
.#@##
5
..##.
..#..
....
....
.#@..
0


Output

0
10
-1
3
2
1
6
4

Solution (in CPP):

Solution:
#include <bits/stdc++.h>

using namespace std;

#define REP(i, n) for (int i=0; i<(n); ++i)
#define RREP(i, n) for (int i=(int)(n)-1; i>=0; --i)
#define FOR(i, a, n) for (int i=(a); i<(n); ++i)
#define RFOR(i, a, n) for (int i=(int)(n)-1; i>=(a); --i)

#define SZ(x) ((int)(x).size())
#define all(x) begin(x),end(x)

#define dump(x) cerr<<#x<<" = "<<(x)<<endl
#define debug(x) cerr<<#x<<" = "<<(x)<<" (L"<<__LINE__<<")"<<endl;

template<class T>
ostream &operator<<(ostream &os, const vector <T> &v) {
    os << "[";
    REP(i, SZ(v)) {
        if (i) os << ", ";
        os << v[i];
    }
    return os << "]";
}

template<class T, class U>
ostream &operator<<(ostream &os, const pair <T, U> &p) {
    return os << "(" << p.first << " " << p.second << ")";
}

template<class T>
bool chmax(T &a, const T &b) {
    if (a < b) {
        a = b;
        return true;
    }
    return false;
}

template<class T>
bool chmin(T &a, const T &b) {
    if (b < a) {
        a = b;
        return true;
    }
    return false;
}

using ll = long long;
using ull = unsigned long long;
using ld = long double;
using P = pair<int, int>;
using vi = vector<int>;
using vll = vector<ll>;
using vvi = vector<vi>;
using vvll = vector<vll>;

const ll MOD = 1e9 + 7;
const int INF = INT_MAX / 2;
const ll LINF = LLONG_MAX / 2;
const ld eps = 1e-9;


int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    cout << fixed << setprecision(10);

    const int dy[] = {1, 0, -1, 0, 1, 1, -1, -1},
              dx[] = {0, 1, 0, -1, 1, -1, 1, -1};

    for (;;) {
        int n; cin >> n;
        if (n == 0) break;

        string a;
        int si, sj;
        REP(i, n) {
            string s; cin >> s;
            a += s;
            REP(j, n) {
                if (s[j] == '@') {
                    si = i, sj = j;
                }
            }
        }

        queue<tuple<string,int,int>> que;
        map<tuple<string,int,int>,int> dist;
        que.emplace(a, si, sj);
        dist[make_tuple(a, si, sj)] = 0;

        int ans = -1;

        while (!que.empty()) {
            string board;
            int si, sj;
            int d = dist[que.front()];
            tie(board, si, sj) = que.front();
            que.pop();

            bool finish = true;
            REP(i, n*n) {
                if (board[i] == '#') {
                    finish = false;
                    break;
                }
            }
            if (finish) {
                ans = d;
                break;
            }

            REP(k, 8) {
                string tmp = board;
                int y = si + dy[k], x = sj + dx[k];
                if (y < 0 or x < 0 or n <= y or n <= x or
                    tmp[y*n + x] == '#') continue;
                tmp[y*n + x] = '@';
                tmp[si*n + sj] = '.';
                string nxt;
                REP(i, n) {
                    REP(j, n) {
                        if (i == y and j == x) {
                            nxt += '@';
                            continue;
                        }
                        int cnt = 0;
                        REP(t, 8) {
                            int y = i + dy[t], x = j + dx[t];
                            if (y < 0 or x < 0 or n <= y or n <= x) continue;
                            cnt += tmp[y*n + x] != '.';
                        }
                        if (tmp[i*n + j] == '#' and (cnt == 2 or cnt == 3)) {
                            nxt += '#';
                        } else if (tmp[i*n + j] == '.' and cnt == 3) {
                            nxt += '#';
                        } else {
                            nxt += '.';
                        }
                    }
                }
                if (dist.count(make_tuple(nxt, y, x)) == 0) {
                    dist[make_tuple(nxt, y, x)] = d + 1;
                    que.emplace(nxt, y, x);
                } else if (chmin(dist[make_tuple(nxt, y, x)], d + 1)){
                    que.emplace(nxt, y, x);
                }
            }
        }

        cout << ans << endl;
    }

    return 0;
}