//by yjz
#include<bits/stdc++.h>
using namespace std;
#define FF first
#define SS second
#define PB push_back
#define MP make_pair
#define foreach(it,s) for(__typeof((s).begin()) it=(s).begin();it!=(s).end();it++)
#ifndef LOCAL
#define cerr if(0)cout
#endif
typedef long long ll;
const int mod=1e9+7;
//My i/o stream
struct fastio
{
	char s[100000];
	int it,len;
	fastio(){it=len=0;}
	inline char get()
	{
		if(it<len)return s[it++];it=0;
		len=fread(s,1,100000,stdin);
		if(len==0)return EOF;else return s[it++];
	}
	bool notend()
	{
		char c=get();
		while(c==' '||c=='\n')c=get();
		if(it>0)it--;
		return c!=EOF;
	}
}_buff;
#define geti(x) x=getnum()
#define getii(x,y) geti(x),geti(y)
#define getiii(x,y,z) getii(x,y),geti(z)
#define puti(x) putnum(x),putchar(' ')
#define putii(x,y) puti(x),puti(y)
#define putiii(x,y,z) putii(x,y),puti(z)
#define putsi(x) putnum(x),putchar('\n')
#define putsii(x,y) puti(x),putsi(y)
#define putsiii(x,y,z) putii(x,y),putsi(z)
inline ll getnum()
{
	ll r=0;bool ng=0;char c;c=_buff.get();
	while(c!='-'&&(c<'0'||c>'9'))c=_buff.get();
	if(c=='-')ng=1,c=_buff.get();
	while(c>='0'&&c<='9')r=r*10+c-'0',c=_buff.get();
	return ng?-r:r;
}
template<class T> inline void putnum(T x)
{
	if(x<0)putchar('-'),x=-x;
	register short a[20]={},sz=0;
	while(x)a[sz++]=x%10,x/=10;
	if(sz==0)putchar('0');
	for(int i=sz-1;i>=0;i--)putchar('0'+a[i]);
}
inline char getreal(){char c=_buff.get();while(c<=32)c=_buff.get();return c;}
ll qpow(ll x,ll k){return k==0?1:1ll*qpow(1ll*x*x%mod,k>>1)*(k&1?x:1)%mod;}
const int maxn=511;
int n,a[maxn][maxn],sum;
int mk[maxn][maxn],curmk;
ll ans;
void dfs(int x,int y)
{
	mk[x][y]=curmk;sum+=a[x][y];
	if(!mk[x+1][y]&&a[x+1][y])dfs(x+1,y);
	if(!mk[x][y+1]&&a[x][y+1])dfs(x,y+1);
}
void dfs3(int x,int y)
{
	mk[x][y]=0;sum-=a[x][y];
	if(mk[x][y+1]&&mk[x][y+1]!=curmk&&mk[x-1][y+1]==0)dfs3(x,y+1);
	if(mk[x+1][y])dfs3(x+1,y);
}
void debug()
{
	cerr<<"mk:"<<endl;
	for(int i=1;i<=n;i++)
	{
		for(int j=1;j<=n;j++)
		{
			cerr<<mk[i][j]<<" ";
		}
		cerr<<endl;
	}
}
int main()
{
	geti(n);
	for(int i=1;i<=n;i++)
	{
		for(int j=1;j<=n;j++)
		{
			char c=getreal();
			if(c!='#')a[i][j]=c-'0';
		}
	}
	for(int i=n;i>=1;i--)
	{
		sum=0;
		memset(mk,0,sizeof(mk));
		int lst=-1;
		for(int j=1;j<=n;j++)
		{
			if(a[i][j])
			{
				if(lst==-1)
				{
					curmk=1;
					dfs(i,j);
					lst=j;
				}
				else
				{
					curmk=j;
					if(!mk[i][j])
					{
						dfs(i,j);
					}
					mk[i][j]=j;
					dfs3(i,lst);
					lst=j;
				}
				ll csum=sum;
				ans+=a[i][j]*(sum-a[i][j]);
			}
		}
	}
	cout<<ans<<endl;
	return 0;
}
