/* #region Head */

// #define _GLIBCXX_DEBUG
#include <bits/stdc++.h>
using namespace std;

using ll = long long;
using ull = unsigned long long;
using ld = long double;
using pll = pair<ll, ll>;
template <class T> using vc = vector<T>;
template <class T> using vvc = vc<vc<T>>;
using vll = vc<ll>;
using vvll = vvc<ll>;
using vld = vc<ld>;
using vvld = vvc<ld>;
using vs = vc<string>;
using vvs = vvc<string>;
template <class T, class U> using um = unordered_map<T, U>;
template <class T> using pq = priority_queue<T>;
template <class T> using pqa = priority_queue<T, vc<T>, greater<T>>;
template <class T> using us = unordered_set<T>;

#define REP(i, m, n) for (ll i = (m), i##_len = (ll)(n); i < i##_len; ++(i))
#define REPM(i, m, n) for (ll i = (m), i##_max = (ll)(n); i <= i##_max; ++(i))
#define REPR(i, m, n) for (ll i = (m), i##_min = (ll)(n); i >= i##_min; --(i))
#define REPD(i, m, n, d) for (ll i = (m), i##_len = (ll)(n); i < i##_len; i += (d))
#define REPMD(i, m, n, d) for (ll i = (m), i##_max = (ll)(n); i <= i##_max; i += (d))
#define REPI(itr, ds) for (auto itr = ds.begin(); itr != ds.end(); itr++)
#define ALL(x) begin(x), end(x)
#define SIZE(x) ((ll)(x).size())
#define PERM(c)                                                                                                        \
    sort(ALL(c));                                                                                                      \
    for (bool c##p = 1; c##p; c##p = next_permutation(ALL(c)))
#define UNIQ(v) v.erase(unique(ALL(v)), v.end());

#define endl '\n'
#define sqrt sqrtl
#define floor floorl
#define log2 log2l

constexpr ll INF = 1'010'000'000'000'000'017LL;
constexpr ll MOD = 1'000'000'007LL; // 1e9 + 7
constexpr ld EPS = 1e-12;
constexpr ld PI = 3.14159265358979323846;

template <typename T> istream &operator>>(istream &is, vc<T> &vec) { // vector 入力
    for (T &x : vec) is >> x;
    return is;
}
template <typename T> ostream &operator<<(ostream &os, vc<T> &vec) { // vector 出力 (for dump)
    os << "{";
    REP(i, 0, SIZE(vec)) os << vec[i] << (i == i_len - 1 ? "" : ", ");
    os << "}";
    return os;
}
template <typename T> ostream &operator>>(ostream &os, vc<T> &vec) { // vector 出力 (inline)
    REP(i, 0, SIZE(vec)) os << vec[i] << (i == i_len - 1 ? "\n" : " ");
    return os;
}

template <typename T, typename U> istream &operator>>(istream &is, pair<T, U> &pair_var) { // pair 入力
    is >> pair_var.first >> pair_var.second;
    return is;
}
template <typename T, typename U> ostream &operator<<(ostream &os, pair<T, U> &pair_var) { // pair 出力
    os << "(" << pair_var.first << ", " << pair_var.second << ")";
    return os;
}

// map, um, set, us 出力
template <class T> ostream &out_iter(ostream &os, T &map_var) {
    os << "{";
    REPI(itr, map_var) {
        os << *itr;
        auto itrcp = itr;
        if (++itrcp != map_var.end()) os << ", ";
    }
    return os << "}";
}
template <typename T, typename U> ostream &operator<<(ostream &os, map<T, U> &map_var) { return out_iter(os, map_var); }
template <typename T, typename U> ostream &operator<<(ostream &os, um<T, U> &map_var) {
    os << "{";
    REPI(itr, map_var) {
        auto [key, value] = *itr;
        os << "(" << key << ", " << value << ")";
        auto itrcp = itr;
        if (++itrcp != map_var.end()) os << ", ";
    }
    os << "}";
    return os;
}
template <typename T> ostream &operator<<(ostream &os, set<T> &set_var) { return out_iter(os, set_var); }
template <typename T> ostream &operator<<(ostream &os, us<T> &set_var) { return out_iter(os, set_var); }
template <typename T> ostream &operator<<(ostream &os, pq<T> &pq_var) {
    pq<T> pq_cp(pq_var);
    os << "{";
    if (!pq_cp.empty()) {
        os << pq_cp.top(), pq_cp.pop();
        while (!pq_cp.empty()) os << ", " << pq_cp.top(), pq_cp.pop();
    }
    return os << "}";
}

// dump
#define DUMPOUT cerr
void dump_func() { DUMPOUT << endl; }
template <class Head, class... Tail> void dump_func(Head &&head, Tail &&... tail) {
    DUMPOUT << head;
    if (sizeof...(Tail) > 0) DUMPOUT << ", ";
    dump_func(move(tail)...);
}

// chmax (更新「される」かもしれない値が前)
template <typename T, typename U, typename Comp = less<>> bool chmax(T &xmax, const U &x, Comp comp = {}) {
    if (comp(xmax, x)) {
        xmax = x;
        return true;
    }
    return false;
}

// chmin (更新「される」かもしれない値が前)
template <typename T, typename U, typename Comp = less<>> bool chmin(T &xmin, const U &x, Comp comp = {}) {
    if (comp(x, xmin)) {
        xmin = x;
        return true;
    }
    return false;
}

// ローカル用
#define DEBUG_

#ifdef DEBUG_
#define DEB
#define dump(...)                                                                                                      \
    DUMPOUT << "  " << string(#__VA_ARGS__) << ": "                                                                    \
            << "[" << to_string(__LINE__) << ":" << __FUNCTION__ << "]" << endl                                        \
            << "    ",                                                                                                 \
        dump_func(__VA_ARGS__)
#else
#define DEB if (false)
#define dump(...)
#endif

struct AtCoderInitialize {
    static constexpr int IOS_PREC = 15;
    static constexpr bool AUTOFLUSH = false;
    AtCoderInitialize() {
        ios_base::sync_with_stdio(false), cin.tie(nullptr), cout.tie(nullptr);
        cout << fixed << setprecision(IOS_PREC);
        if (AUTOFLUSH) cout << unitbuf;
    }
} ATCODER_INITIALIZE;

void Yn(bool p) { cout << (p ? "Yes" : "No") << endl; }
void YN(bool p) { cout << (p ? "YES" : "NO") << endl; }

/* #endregion */

/* #region UnionFind */

struct UnionFind {
    ll _groupcount; // グループ数
    vc<ll> parent;  // 各要素の直接の親リスト，親がいないときは自分自身を指す
    vc<ll> gsize; // 各要素が根である場合，その要素が属するグループの要素数 (root 要素のみ有効な値を持つ)

    // コンストラクタ
    UnionFind() {}
    // コンストラクタ，要素数 n の UnionFind 木を構築する
    UnionFind(ll n) : _groupcount(n), parent(n), gsize(n, 1) { iota(ALL(parent), 0LL); }

    // x の属する部分木の根要素を返す
    ll find(ll x) { return x == parent[x] ? x : parent[x] = find(parent[x]); }

    // x と y が同じグループかどうか判定する
    bool same(ll x, ll y) { return find(x) == find(y); }

    // x と y を同じグループにする
    void unite(ll x, ll y) {
        ll rx = find(x); // x の属するグループの根
        ll ry = find(y); // y の属するグループの根
        if (rx == ry)    // unite 済
            return;
        // assert(x != y)
        if (gsize[rx] < gsize[ry]) swap(rx, ry);
        // assert(gsize[x] > gsize[y]); // x 側の木の方が大きい

        gsize[rx] += gsize[ry]; // x を根とする1つのグループに統合
        parent[ry] = rx;        // ry 以下の木を rx 配下に接続する
        _groupcount--;
    }

    // x が属するグループの要素数を返す
    ll size(ll x) { return gsize[find(x)]; }

    // 全体のグループ数を返す
    ll count() const { return _groupcount; }
};

/* #endregion */

/* #region UnionFindWithGroupVal */

template <typename T> struct UnionFindWithGroupVal {
    using F = function<T(T, T)>; // 要素と要素をマージする関数．max とか．

    ll _groupcount; // グループ数
    vc<ll> parent;  // 各要素の直接の親リスト，親がいないときは自分自身を指す
    vc<ll> gsize; // 各要素が根である場合，その要素が属するグループの要素数 (root 要素のみ有効な値を持つ)
    vc<T> groupval;
    F f;

    // コンストラクタ
    UnionFindWithGroupVal() {}
    // コンストラクタ，要素数 n の UnionFind 木を構築する
    UnionFindWithGroupVal(ll n, F f, T ti) : _groupcount(n), parent(n), gsize(n, 1), groupval(n, ti), f(f) {
        iota(ALL(parent), 0LL);
    }

    // x の属する部分木の根要素を返す
    ll find(ll x) {
        if (x == parent[x]) return x;
        return parent[x] = find(parent[x]); // 経路圧縮
    }

    // x と y が同じグループかどうか判定する
    bool same(ll x, ll y) { return find(x) == find(y); }

    // x と y を同じグループにする
    void unite(ll x, ll y) {
        ll rx = find(x); // x の属するグループの根
        ll ry = find(y); // y の属するグループの根
        if (rx == ry)    // unite 済
            return;
        // assert(x != y)
        if (gsize[rx] < gsize[ry]) swap(rx, ry);
        // assert(gsize[x] > gsize[y]); // x 側の木の方が大きい

        gsize[rx] += gsize[ry]; // x を根とする1つのグループに統合
        parent[ry] = rx;        // ry 以下の木を rx 配下に接続する
        groupval[rx] = f(groupval[rx], groupval[ry]);
        _groupcount--;
    }

    // x が属するグループの要素数を返す
    ll size(ll x) { return gsize[find(x)]; }

    // 全体のグループ数を返す
    ll count() const { return _groupcount; }

    void update(ll idx, T val) {
        ll par = find(idx);
        groupval[par] = f(groupval[par], val);
    }

    T query(ll idx) { return groupval[find(idx)]; }
};

/* #endregion */

// Problem
void solve() {
    ll h, w;
    cin >> h >> w;
    vc<string> s(h);
    cin >> s;

    const auto idx = [&](ll row, ll col) -> ll { return w * row + col; };
    const auto canMove = [&](ll row_form, ll col_from, ll row_to, ll col_to) -> bool {
        return s[row_form][col_from] != s[row_to][col_to];
    };
    auto merge = [](ll a, ll b) -> ll { return a + b; };
    UnionFindWithGroupVal<ll> uf(h * w, merge, 0);
    REP(row, 0, h) REP(col, 0, w) {
        ll i = idx(row, col); //
        if (row != h - 1 && canMove(row, col, row + 1, col)) uf.unite(i, idx(row + 1, col));
        if (col != w - 1 && canMove(row, col, row, col + 1)) uf.unite(i, idx(row, col + 1));
        if (s[row][col] == '#') uf.update(i, 1);
    }

    set<ll> used;
    ll ret = 0;
    REP(i, 0, h * w) {
        ll par = uf.find(i);
        // dump(i, par, used, ret);
        if (used.find(par) != used.end()) continue; // このグループはもう数えた
        ll cnt = uf.size(par);
        ll cnt_black = uf.query(par);
        // if (cnt > 1) ret += cnt * (cnt - 1) / 2;
        if (cnt > 1) ret += cnt_black * (cnt - cnt_black);
        used.insert(par);
    }
    cout << ret << endl;
}

// entry point
int main() {
    solve();
    return 0;
}


Measured memory_bytes: 13120