// Problem: ptz winter 2020 day3 C
// Contest: ptz
// URL: https://qoj.ac/problem/833
// Memory Limit: 512 MB
// Time Limit: 3000 ms

#include <bits/stdc++.h>

using namespace std;

typedef long long ll;

const int maxn=3005;
bool a[maxn][maxn],f[maxn][maxn],g[maxn][maxn];
vector<int> vec[maxn<<1];
char ch[maxn];

int main(){
	
	int n,m,cnt=0;
	
	scanf("%d %d",&n,&m);
	for(int i=1;i<=n;i++){
		scanf("%s",ch+1);
		for(int j=1;j<=m;j++){
			a[i][j]=(ch[j]=='.');
			cnt+=a[i][j];
		}
	}
	
	f[1][1]=a[1][1];
	g[n][m]=a[n][m];
	
	for(int i=1;i<=n;i++){
		for(int j=1;j<=m;j++){
			if(!a[i][j]) continue;
			f[i][j]|=(f[i-1][j]|f[i][j-1]);
		}
	}
	
	if(!f[n][m]){
		printf("%lld\n",1ll*cnt*(cnt-1)/2);
		return 0;
	}
	
	for(int i=n;i>=1;i--){
		for(int j=m;j>=1;j--){
			if(!a[i][j]) continue;
			g[i][j]|=(g[i+1][j]|g[i][j+1]);
		}
	}
	
	for(int i=1;i<=n;i++){
		for(int j=1;j<=m;j++){
			if(f[i][j]&&g[i][j]) vec[i+j].push_back(i);
			else a[i][j]=0;
		}
	}
	
	ll res=0;
	
	for(int i=2;i<=n+m;i++){
		if(vec[i].empty()) continue;
		else if((int)vec[i].size()==1){
			cnt--;
			res+=cnt;
		}else{
			if((int)vec[i].size()==2) res++;
			int tl=vec[i][1],tr=vec[i].back();
			for(int j=i+1;j<=n+m;j++){
				if(!a[tl][j-tl]) tl++;
				if(a[tr+1][j-tr-1]) tr++;
				if(tl==tr&&(int)vec[j].size()>1) res++; 
			}
			tl=vec[i][0];
			tr=vec[i][(int)vec[i].size()-2];
			for(int j=i+1;j<=n+m;j++){
				if(!a[tl][j-tl]) tl++;
				if(a[tr+1][j-tr-1]) tr++;
				if(tl==tr&&(int)vec[j].size()>1) res++; 
			}
		}
	}
	
	printf("%lld\n",res);
	
	return 0;
}