import sys readline = sys.stdin.readline from collections import * N = int(readline()) S = [None] * N D = defaultdict(int) for i in range(N): S[i] = readline().rstrip() for j in range(len(S[i])): a, b = S[i][:j], S[i][j + 1:] D[(a, b)] += 1 for i in range(N): ans = 0 for j in range(len(S[i])): a, b = S[i][:j], S[i][j + 1:] ans += D[(a, b)] - 1 print(ans)