/* -*- coding: utf-8 -*-
 *
 * 2419.cc:  No.2419 MMA文字列2 - yukicoder
 */

#include<cstdio>
#include<cstring>
#include<algorithm>
 
using namespace std;

/* constant */

const int MAX_N = 200000;

/* typedef */

typedef long long ll;

/* global variables */

char s[MAX_N + 4];
int qs[26], rs[MAX_N + 1][26];

/* subroutines */

/* main */

int main() {
  scanf("%s", s);
  int n = strlen(s);

  for (int i = n - 1; i >= 0; i--) {
    copy(rs[i + 1], rs[i + 1] + 26, rs[i]);
    rs[i][s[i] - 'A']++;
  }

  ll sum = 0;
  for (int i = 0; i < n; i++) {
    int si = s[i] - 'A';
    sum += (ll)qs[si] * (n - (i + 1) - rs[i + 1][si]);
    qs[si]++;
  }

  printf("%lld\n", sum);
  return 0;
}