#include <bits/stdc++.h>
using namespace std;
#define ll long long
const int N=3010;

int n,m;
char S[N][N];
bool f[N][N],g[N][N];
bool p1[N][N],p2[N][N];
int cl[N][N],cr[N][N];
int ld[N<<1];
int cnt,tot;
ll ans;

int main() {
	scanf("%d%d",&n,&m);
	for(int i=1;i<=n;i++) {
		scanf("%s",S[i]+1);
		for(int j=1;j<=m;j++) cnt+=S[i][j]=='.';
	}
	if(cnt<=1) {
		printf("0");
		return 0;
	}
	f[1][1]=1;
	for(int i=1;i<=n;i++) {
		for(int j=1;j<=m;j++) {
			if(S[i][j]!='.') f[i][j]=0;
			if(j<m) f[i][j+1]|=f[i][j];
			if(i<n) f[i+1][j]|=f[i][j];
		}
	}
	g[n][m]=1;
	for(int i=n;i>=1;i--) {
		for(int j=m;j>=1;j--) {
			if(S[i][j]!='.') g[i][j]=0;
			if(j>1) g[i][j-1]|=g[i][j];
			if(i>1) g[i-1][j]|=g[i][j];
		}
	}
	if(!f[n][m]) {
		printf("%lld",1ll*cnt*(cnt-1)/2);
		return 0;
	}
	int x=1,y=1;
	while(x!=n || y!=m) {
		p1[x][y]=1;
		if(x==n) y++;
		else if(y==m) x++;
		else if(f[x+1][y] && g[x+1][y]) x++;
		else y++; 
	}
	p1[x][y]=1;
	x=1,y=1;
	while(x!=n || y!=m) {
		p2[x][y]=1;
		if(x==n) y++;
		else if(y==m) x++;
		else if(f[x][y+1] && g[x][y+1]) y++;
		else x++; 
	}
	p2[x][y]=1;
	for(int i=1;i<=n;i++) for(int j=1;j<=m;j++) tot+=p1[i][j]&p2[i][j];
	ans=1ll*tot*(cnt-tot)+1ll*tot*(tot-1)/2;
	for(int i=n;i>=1;i--) {
		for(int j=m;j>=1;j--) {
			if(!f[i][j] || !g[i][j]) continue;
			cr[i][j]=p1[i][j];
			if(i==n && j==m) continue;
			else if(i==n) cr[i][j]+=cr[i][j+1];
			else if(j==m) cr[i][j]+=cr[i+1][j];
			else if(f[i][j+1] && g[i][j+1]) cr[i][j]+=cr[i][j+1];
			else cr[i][j]+=cr[i+1][j];
		}
	}
	for(int i=1;i<=n;i++) {
		for(int j=1;j<=m;j++) {
			if(!f[i][j] || !g[i][j]) continue;
			cl[i][j]=p1[i][j];
			if(i==1 && j==1) continue;
			else if(i==1) cl[i][j]+=cl[i][j-1];
			else if(j==1) cl[i][j]+=cl[i-1][j];
			else if(f[i-1][j] && g[i-1][j]) cl[i][j]+=cl[i-1][j];
			else cl[i][j]+=cl[i][j-1];
		}
	}
	for(int i=1;i<=n;i++) for(int j=1;j<=m;j++) if(f[i][j] && g[i][j]) if(!ld[i+j] && !p2[i][j]) ld[i+j]=i;
	for(int i=1;i<=n;i++) {
		for(int j=1;j<=m;j++) {
			if(p1[i][j]) continue;
			if(p2[i][j]) {
				int x=ld[i+j],y=i+j-x;
				ans+=cl[x][y]+cr[x][y]-p1[x][y]-tot;
			}
		}
	}
	printf("%lld",ans);
	return 0;
}