#include <bits/stdc++.h>
char s[100001];
long long nush[37];
int main() {
  std::cin >> s;
  int n = 0;
  while (s[n] != '\0') n++;
  long long cout = 0;
  for (int i = 0; i < n; i++) {
    if (s[i] >= '0' && s[i] <= '9') nush[s[i] - '0']++;
    if (s[i] >= 'a' && s[i] <= 'z') nush[s[i] - 'a' + 10]++;
  }
  for (int i = 0; i < 37; i++) cout = cout + (nush[i] * nush[i]);
  printf("%lld", cout);
  return 0;
}
