#pragma GCC optimize("O3,unroll-loops")
#pragma GCC target("avx,avx2,fma")
#include <bits/stdc++.h>
#include <ext/pb_ds/assoc_container.hpp>
#include <ext/pb_ds/tree_policy.hpp>
/* DEFINES */
#define S second
#define F first
#define ll long long
#define ull unsigned long long
#define ld long double
#define npos ULLONG_MAX
#define INF LLONG_MAX
#define vv(a) vector<a>
#define pp(a, b) pair<a, b>
#define pq(a) priority_queue<a>
#define qq(a) queue<a>
#define ss(a) set<a>
#define mm(a, b) map<a, b>
#define ump(a, b) unordered_map<a, b>
#define sync \
ios_base::sync_with_stdio(0); \
cin.tie(0); \
cout.tie(0);
#define elif else if
#define endl "\n"
#define allc(a) begin(a), end(a)
#define all(a) a, a + sizeof(a) / sizeof(a[0])
#define pb push_back
#define logi(a) __lg(a)
#define sqrt(a) sqrtl(a)
#define mpr make_pair
#define ins insert
using namespace std;
using namespace __gnu_pbds;
using namespace __cxx11;
typedef char chr;
typedef basic_string<chr> str;
template <typename T, typename key = less<T>>
using ordered_set = tree<T, null_type, key, rb_tree_tag, tree_order_statistics_node_update>;
mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());
void solve()
{
ll n, m;
cin >> n >> m;
str s[n + 1];
for (ll i = 1; i <= n; i++)
cin >> s[i], s[i] = ' ' + s[i];
ll suf[n + 2][m + 2], suf1[n + 2][m + 2], ans = 0;
for (ll i = 0; i <= n + 1; i++)
for (ll j = 0; j <= m + 1; j++)
suf[i][j] = suf1[i][j] = 0;
for (ll i = 1; i <= n; i++)
for (ll j = m; j >= 1; j--)
suf[i][j] = suf[i][j + 1] + (s[i][j] == 'O');
for (ll j = 1; j <= m; j++)
for (ll i = n; i >= 1; i--)
suf1[i][j] = suf1[i + 1][j] + (s[i][j] == 'I');
for (ll i = 1; i <= n; i++)
for (ll j = 1; j <= m; j++)
if (s[i][j] == 'J')
ans += suf[i][j] * suf1[i][j];
cout << ans << endl;
}
/*
*/
int main()
{
sync
// precomp();
ll t = 1;
// cin >> t;
for (ll i = 1; i <= t; i++)
// cout << "Case #" << i << ": ",
solve();
cerr << "\nTime elapsed : " << clock() * 1000.0 / CLOCKS_PER_SEC << " ms\n";
}
