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

using ll = long long;
using ull = unsigned long long;

string to_string(const string &s) {
  return '"' + s + '"';
}

string to_string(bool b) {
  return b ? "true" : "false";
}

template <typename A, typename B>
string to_string(const pair<A, B> &p) {
  return "(" + to_string(p.first) + ", " + to_string(p.second) + ")";
}

template <typename T>
string to_string(const T &v) {
  string s = "{";
  bool first = true;
  for (const auto &it : v) {
    if (!first)
      s += ", ";
    else
      first = false;
    s += to_string(it);
  }
  return s += "}";
}

void debug_out() {
  cerr << endl;
}

template <typename T, typename... Args>
void debug_out(const T &first, const Args&... rest) {
  cerr << to_string(first) << " ";
  debug_out(rest...);
}

#define debug(...) cerr << "[" << #__VA_ARGS__ << "]:", debug_out(__VA_ARGS__)

mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());

auto startTime = high_resolution_clock::now();
int get_time() {
  auto stopTime = chrono::high_resolution_clock::now();
  auto duration = duration_cast<milliseconds>(stopTime - startTime);
  return duration.count(); // in ms
}

int get_val(char ch) {
  if (ch == 'P')
    return 0;
  if (ch == 'K')
    return 1;
  return 2;
}

ll solve(vector<string> &v, vector<int> &a, vector<int> &c, int h = 0) {
  if (a.size() <= 2)
    return 0;

  vector<vector<int>> gr(3);
  vector<int> sz(3, 0);

  int wh = -1;
  for (auto i : a) {
    int val = get_val(v[i][h % v[i].size()]);
    sz[val] += c[i];
    if (v[i].size() * 2 < h) {
      if (wh == -1) {
        wh = i;
      } else {
        c[wh] += c[i];
        continue;
      }
    }

    gr[val].push_back(i);
  }

  ll ans = 1LL * sz[0] * sz[1] * sz[2];
  for (int i = 0; i < 3; ++i) {
    ans += solve(v, gr[i], c, h + 1);
  }
  return ans;
}

void solve() {
  int n;
  cin >> n;

  vector<string> v(n);
  for (int i = 0; i < n; ++i) {
    cin >> v[i];
  }

  vector<int> a(n);
  vector<int> c(n, 1);

  iota(a.begin(), a.end(), 0);
  cout << solve(v, a, c, 0) << "\n";
}

int main() {
  cin.tie(NULL);
  ios_base::sync_with_stdio(false);

  int t = 1;
//  cin >> t;
  while (t--)
    solve();

  return 0;
}