#include <bits/stdc++.h>
using namespace std;
int h, w, f[4][605][605];
long long ans;
char s[305];
int main() {
  scanf("%d %d", &h, &w);
  for (int i = 0; i < (h); i++) {
    scanf("\n%s", s);
    for (int j = 0; j < (w); j++)
      f[2][i + j][i - j + w] = f[3][i - j + w][i + j] = s[j] == '#';
  }
  h += w;
  for (int l = 0; l < (2); l++)
    for (int i = 0; i < (h); i++)
      for (int j = 0; j < (h); j++)
        f[l][i][j + 1] = f[l][i][j] + f[l + 2][i][j];
  for (int l = 0; l < (2); l++)
    for (int i = 0; i < (h); i++)
      for (int j = 0; j < (h); j++)
        if (f[l + 2][i][j])
          for (int k = 0; k < (h - j); k++)
            if (f[l + 2][i][j + k])
              ans +=
                  (i >= k ? f[l][i - k][j + k + l] - f[l][i - k][j] : 0) +
                  (i + k < h + w ? f[l][i + k][j + k] - f[l][i + k][j + l] : 0);
  printf("%lld\n", ans);
}
