#include<bits/stdc++.h>
#define int long long
using namespace std;
int read(){int s=0,f=1;char c=getchar();while(c<'0'||c>'9'){if(c=='-')f*=-1;c=getchar();}while(c>='0'&&c<='9')s=(s<<1)+(s<<3)+(c^48),c=getchar();return s*f;}
const int N=3e3+10;
int n,m,f[N][N],f2[N][N],cnt,ans;
vector<int> vec[N<<1];
char a[N][N];
signed main(){
    n=read(),m=read();
    for(int i=1;i<=n;++i){
        for(int j=1;j<=m;++j)a[i][j]=getchar(),f[i][j]|=f[i-1][j]|f[i][j-1],f[i][j]|=(i==1&&j==1),f[i][j]&=(a[i][j]=='.'),cnt+=(a[i][j]=='.');
        getchar();
    }
    for(int i=n;i;--i)
        for(int j=m;j;--j)
            f2[i][j]|=f2[i+1][j]|f2[i][j+1],f2[i][j]|=(i==n&&j==m),f2[i][j]&=(a[i][j]=='.');
	for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j)
            if(!f[i][j]||!f2[i][j])a[i][j]='*';
            else vec[i+j].push_back(i);/*按对角线(右到左)分组*/
    if(!f[n][m]){printf("%lld\n",cnt*(cnt-1)/2);return 0;}
    int num=0;
    for(int i=2;i<=n+m;++i)if(vec[i].size()==1)ans+=(cnt-(++num));
    for(int i=2;i<=n+m;++i){
        if(vec[i].size()==1)continue;
        int l=vec[i][1],r=vec[i].back();
        if(l==r)++ans;
        for(int j=i+1;j<=n+m;++j){
            if(a[l][j-l]!='.')++l;
            if(a[r+1][j-r-1]=='.')++r;
            if(l==r&&vec[j].size()!=1)++ans;
        }
    }
    for(int i=2;i<=n+m;++i){
        if(vec[i].size()==1)continue;
        int l=vec[i][0],r=vec[i][vec[i].size()-2];
        for(int j=i+1;j<=n+m;++j){
            if(a[l][j-l]!='.')++l;
            if(a[r+1][j-r-1]=='.')++r;
            if(l==r&&vec[j].size()!=1)++ans;
        }
    }
    printf("%lld\n",ans);
    return 0;
}