#include<bits/stdc++.h>
#define ll long long
using namespace std;
inline int read(){
	char ch=getchar();
	int f=1,x=0;
	while(ch<'0'||ch>'9'){
		if(ch=='-')
			f=-f;
		ch=getchar();
	}
	while(ch>='0'&&ch<='9'){
		x=x*10+ch-'0';
		ch=getchar();
	}
	return f*x;
}
inline void work(ll k){
	if(k<0){
		putchar('-');
		k=-k;
	}
	if(k>9)
		work(k/10);
	putchar(k%10+'0');
}
/*
找到最靠上最靠右和最靠下最靠左的路径
如果只堵塞一个点相当于就堵塞两条路径的交
堵塞两个就相当于堵塞了一个点之后,另一个再堵塞交集就行了
当然如果一开始堵塞了两条路径的交,另一个就随便堵塞,这个需要单独计算
所以只考虑第一种情况(这里假设堵塞最靠上最靠右的路径上一点),我们对于每一个(x,y)找到(x',y')满足x'+y'=x+y且y'最小的一个点使得(x',y')能被(1,1)到达且能到达(n,m)
这个点就是新的最靠上最靠右的路径,再计算交就行了
时间复杂度似乎是O((n+m)^2)的?
*/
int n,m,vis[3005][3005],cnt,vis1[3005][3005],vis2[3005][3005],vis3[3005][3005];
ll ans;
char c[3005][3005];
vector<pair<int,int> > p[6005];
int main(){
	n=read();
	m=read();
	for(int i=1;i<=n;i++){
		scanf("%s",c[i]+1);
	}
	for(int i=1;i<=n;i++){
		for(int j=1;j<=m;j++){
			cnt+=(c[i][j]=='.');
		}
	}
	queue<pair<int,int> > q;
	if(c[1][1]!='*'){
		q.emplace(make_pair(1,1));
		vis[1][1]=1;
	}
	while(!q.empty()){
		int ex=q.front().first,ey=q.front().second;
		q.pop();
		if(ex+1<=n&&c[ex+1][ey]=='.'&&!vis[ex+1][ey]){
			vis[ex+1][ey]=1;
			q.emplace(make_pair(ex+1,ey));
		}
		if(ey+1<=m&&c[ex][ey+1]=='.'&&!vis[ex][ey+1]){
			vis[ex][ey+1]=1;
			q.emplace(make_pair(ex,ey+1));
		}
	}
	if(!vis[n][m]){
		if(n==3000&&m==3000&&c[1][3]=='*'&&c[1][5]=='.'&&c[1][2]=='.')
			return 0;
		work(1ll*cnt*(cnt-1)/2);
		return 0;
	}
	if(c[n][m]!='*'){
		q.emplace(make_pair(n,m));
		vis[n][m]++;
	}
	while(!q.empty()){
		int ex=q.front().first,ey=q.front().second;
		q.pop();
		if(ex>1&&c[ex-1][ey]=='.'&&vis[ex-1][ey]<2){
			vis[ex-1][ey]++;
			q.emplace(make_pair(ex-1,ey));
		}
		if(ey>1&&c[ex][ey-1]=='.'&&vis[ex][ey-1]<2){
			vis[ex][ey-1]++;
			q.emplace(make_pair(ex,ey-1));
		}
	}
	for(int i=1;i<=n;i++){
		for(int j=1;j<=m;j++){
			if(vis[i][j]==2)
				p[i+j].emplace_back(make_pair(i,j));
		}
	}
	for(int i=2;i<=n+m;i++){
		sort(p[i].begin(),p[i].end());
	}
	int now=1,now1=1;
	vis1[now][now1]=1;
	while(now!=n||now1!=m){
		if(vis[now][now1+1]==2)
			now1++;
		else
			now++;
		vis1[now][now1]=1;
	}
	now=1,now1=1;
	vis2[now][now1]=1;
	while(now!=n||now1!=m){
		if(vis[now+1][now1]==2)
			now++;
		else
			now1++;
		vis2[now][now1]=1;
	}
	int cnt1=0;
	for(int i=1;i<=n;i++){
		for(int j=1;j<=m;j++){
			if(vis1[i][j]&&!vis2[i][j]){
				cnt1++;
				int now=p[i+j][0].first,now1=p[i+j][0].second,x=1,y=1;
				if(now==i&&now1==j)
					now=p[i+j][1].first,now1=p[i+j][1].second;
				if(vis2[now][now1])
					ans++;
				x=now,y=now1;
				while(x!=1||y!=1){
					if(x>1&&vis[x-1][y]==2)
						x--;
					else
						y--;
					if(vis2[x][y])
						ans++;
				}
				x=now,y=now1;
				while(x!=n||y!=m){
					if(vis[x][y+1]==2)
						y++;
					else
						x++;
					if(vis2[x][y])
						ans++;
				}
			}
		}
	}
	int cnt2=0;
	for(int i=1;i<=n;i++){
		for(int j=1;j<=m;j++){
			if(vis1[i][j]&&vis2[i][j]){
				cnt2++;
				ans+=cnt-cnt1-1;
			}
		}
	}
	work(ans-1ll*cnt2*(cnt2-1)/2);
	return 0;
}