local n = io.read("*n", "*l")
local t = {}
t["M"], t["A"], t["R"], t["C"], t["H"] = 0, 0, 0, 0, 0
local str, sstr = "", ""
for i = 1, n do
  str = io.read()
  sstr = string.sub(str, 1, 1)
  if(t[sstr] ~= nil) then t[sstr] = t[sstr] + 1 end
end
local sum = 0
sum = sum + t["M"] * t["A"] * t["R"]
sum = sum + t["M"] * t["A"] * t["C"]
sum = sum + t["M"] * t["A"] * t["H"]
sum = sum + t["M"] * t["R"] * t["C"]
sum = sum + t["M"] * t["R"] * t["H"]
sum = sum + t["A"] * t["R"] * t["C"]
sum = sum + t["A"] * t["R"] * t["H"]
sum = sum + t["A"] * t["C"] * t["H"]
sum = sum + t["M"] * t["C"] * t["H"]
sum = sum + t["R"] * t["C"] * t["H"]
print(sum)

