local s = io.read()
local n = #s
local t = {}
for i = 1, 26 do
  t[i] = 0
end
do
  local a = s:sub(1, 1):byte() - 96
  t[a] = t[a] + 1
end
local ret = 1
for i = 2, n do
  local a = s:sub(i, i):byte() - 96
  ret = ret + i - 1 - t[a]
  t[a] = t[a] + 1
end
print(ret)
