#include <bits/stdc++.h>
using namespace std;
const int MAXN = 2005;
int dp[MAXN][MAXN];
int n;
char s[MAXN];
long long f[MAXN];
int rec(int i, int j) {
  if (i >= j) {
    return 1;
  }
  int& res = dp[i][j];
  if (res != -1) {
    return res;
  }
  res = 0;
  if (s[i] == s[j]) {
    res |= rec(i + 1, j - 1);
  }
  return res;
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(0);
  cin >> (s + 1);
  n = strlen(s + 1);
  memset(dp, -1, sizeof dp);
  long long ans = 0;
  for (int i = 1; i <= n; i++) {
    f[i] += f[i - 1];
    for (int j = 1; j <= i; j++) {
      ans += rec(j, i) * f[j - 1];
      f[i] += rec(j, i);
    }
  }
  cout << ans << "\n";
  return 0;
}
