Problem: There is a square-shaped grid with N vertical rows and N horizontal columns. We will denote the square at the i-th row from the top and the j-th column from the left as (i,\ j).

Initially, each square is either white or black. The initial color of the grid is given to you as characters a_{ij}, arranged in a square shape. If the square (i,\ j) is white, a_{ij} is `.`. If it is black, a_{ij} is `#`.

You are developing a robot that repaints the grid. It can repeatedly perform the following operation:

* Select two integers i, j (1 ≤ i,\ j ≤ N). Memorize the colors of the squares (i,\ 1), (i,\ 2), ..., (i,\ N) as c_1, c_2, ..., c_N, respectively. Then, repaint the squares (1,\ j), (2,\ j), ..., (N,\ j) with the colors c_1, c_2, ..., c_N, respectively.



Your objective is to turn all the squares black. Determine whether it is possible, and find the minimum necessary number of operations to achieve it if the answer is positive.

Constraints

* 2 ≤ N ≤ 500
* a_{ij} is either `.` or `#`.

Input

The input is given from Standard Input in the following format:


N
a_{11}...a_{1N}
:
a_{N1}...a_{NN}


Output

If it is possible to turn all the squares black, print the minimum necessary number of operations to achieve the objective. If it is impossible, print `-1` instead.

Examples

Input

2
#.
.#


Output

3


Input

2
.
.#


Output

3


Input

2
..
..


Output

-1


Input

2


Output

0


Input

3
.#.

.#.


Output

2


Input

3
...
.#.
...


Output

5

Solution (in CPP):

Solution:
#include<bits/stdc++.h>
#define int long long
#define P pair<int,int>
#define F first
#define S second
#define f(i,n) for(int i=0;i<(n);i++)
#define INF LLONG_MAX/3
#define mod 1000000007
#define pie 3.141592653589793238462643383279
#define Bpri priority_queue
#define Spri priority_queue<int,vector<int>,greter<int>>
using namespace std;
char c[500][500];
P x[500];
int y[500];
signed main(){
	int n,ans=1;
	cin>>n;
	f(i,n) x[i].S=i;
	f(i,n){
		f(j,n){
			cin>>c[i][j];
			if(c[i][j]=='#'){
				x[i].F++;
				y[j]++;
			}
		}
	}
	sort(x,x+n);
	f(j,n){
		if(y[j]!=n) ans++;
	}
	int z=n;
	do{
		z--;
		if(y[x[z].S]){
			ans--;
			break;
		}
		if(x[z].F==0){
			puts("-1");
			return 0;
		}
	}while(x[z].F==x[z-1].F);
	f(j,n){
		if(c[x[z].S][j]=='.') ans++;
	}
	cout<<ans<<endl;
    return 0;
}