/// Author: Raiz
#include <bits/stdc++.h>
#include <ext/pb_ds/assoc_container.hpp>
#include <ext/pb_ds/tree_policy.hpp>
#include <ext/pb_ds/hash_policy.hpp>
#pragma GCC target("sse,sse2,sse3,ssse3,popcnt,abm,mmx,tune=native")
#pragma GCC optimize("Ofast")
#pragma GCC optimize("no-stack-protector")
#pragma GCC optimize("unroll-loops")
#pragma GCC optimize("fast-math")
#define int long long // Don't forget!!
#define __Lek_Raiz \
ios_base::sync_with_stdio(0); \
cin.tie(nullptr); \
cout.tie(nullptr)
#define all(v) v.begin(), v.end()
#define rall(v) v.rbegin(), v.rend()
#define ll long long
#define str string
#define pb push_back
#define pf push_front
#define ep emplace_back
#define pii pair<int, int>
#define FOR0(i, n) for (int i = 0; i < n; ++i)
#define FOR1(i, n) for (int i = 1; i <= n; ++i)
/// #define size(x) (int)x.size()
#define rs(x) resize(x)
#define vi vector<int>
#define input1(v) \
for (int i = 1; i <= n; ++i) \
cin >> v[i]
using namespace std;
using namespace __gnu_pbds;
template <typename T>
using __indexed_multiset = tree<T, null_type, less_equal<T>, rb_tree_tag, tree_order_statistics_node_update>;
template <typename T>
using __indexed_set = tree<T, null_type, less<T>, rb_tree_tag, tree_order_statistics_node_update>;
mt19937_64 rng(chrono::steady_clock::now().time_since_epoch().count());
/// priority_queue<pair<int, int>, vector<pair<int, int>>, greater<pair<int, int>>> pq;
const int sz = 1e4 + 31; // hmm... RunTime error?
const int LOG = 63;
const int sz2 = 1e3 + 31;
const int MOD = 1e9 + 7;
const int INF = 1e18;
// cd Documents && cd Cpp && g++ main.cpp -o main && ./main
// variables:
int n, m;
void solve()
{
cin >> n >> m;
vector<vector<char>> a(n + 1, vector<char>(m + 1));
for (int i = 1; i <= n; ++i)
{
for (int j = 1; j <= m; ++j)
{
cin >> a[i][j];
}
}
vector<vi> prefO(n + 31, vi(m + 31)), prefI(m + 31, vi(n + 31));
for (int i = 1; i <= n; ++i)
{
for (int j = m; j >= 1; --j)
{
prefO[i][j] = prefO[i][j + 1] + (a[i][j] == 'O');
}
}
for (int j = 1; j <= m; ++j)
{
for (int i = n; i >= 1; --i)
{
prefI[j][i] = prefI[j][i + 1] + (a[i][j] == 'I');
}
}
int cnt = 0;
for (int i = 1; i <= n; ++i)
{
for (int j = 1; j <= m; ++j)
{
if (a[i][j] == 'J')
{
cnt += (prefO[i][j + 1] * prefI[j][i + 1]);
}
}
}
cout << cnt << "\n";
}
signed main()
{
__Lek_Raiz;
// freopen("bcount.in", "r", stdin);
// freopen("bcount.out" , "w", stdout);
// sieve();
int t = 1;
/// cin >> t;
while (t-- > 0)
{
solve();
}
}
/*
..... .................... ....... ........ .....
.+@@* .-@@@@@@@@@@@@@@@@@+ =%@%-. ..:*%@@@=... =%@%:.
.+@@* .-@@@%%%%%%%%%%%%%%+ =%@%-. .+%@@@*-.. =%@%:
.+@@* .-@@#:............... =%@%-. ..=#%@@#=:... =%@%:
.+@@* .-@@#:. =%@%-. .-*%@@%*-.... =%@%:
.+@@* .-@@%#*************= =%@@#**%@@@#=... =%@%:
.+@@* .-@@@@@@@@@@@@@@@@@* =%@@@@@@@@%+:. =%@%:
.+@@* .-@@#:.............. =%@%- .+%@@@%-.. =%@%:
.+@@* .-@@#:. =%@%-. ...:*@@@%*:.. =%@%:
.+@@#::::::::::::::..=@@#-:::::::::::::: =%@%-... ..-#@@@#=. =%@%:
.+@@@@@@@@@@@@@@@@%-.=@@@@@@@@@@@@@@@@@* =%@%-... .:=%@@%*-. =%@%:
.-****************+:.:*****************-. :+*+:. .-+***=.. -+*+.
*/
//
