#include <bits/stdc++.h>
using namespace std;
vector<pair<int, int> > v;
int d[2002];
int f[2002];
string s;
bool IsPal(int a, int b) {
  for (int i = 0; i < (b - a + 1) / 2; i++) {
    if (s[a + i] != s[b - i]) return false;
  }
  return true;
}
int main() {
  cin >> s;
  int n = s.size();
  for (int i = 0; i < n; i++) {
    for (int j = i; j < n; j++) {
      if (IsPal(i, j)) {
        v.push_back({i, j});
      }
    }
  }
  for (int i = 0; i < v.size(); i++) {
    d[v[i].first]++;
    f[v[i].second]++;
  }
  long long sol = 0;
  for (int i = 0; i < n; i++) {
    for (int j = i + 1; j < n; j++) {
      sol += f[i] * d[j];
    }
  }
  cout << sol;
}
