ll@n,z=0;
string@c[n],u(n*2,0),v=u;
rep(i,1<<n*2-2){
	ll y=0,x=0;
	rep(j,n*2-1){
		u[j]=v[n*2-2-j]=y<n&x<n?c[y][x]:0;
		++(i&1<<j?y:x);
	}
	z+=u==v;
}
wt(z);