#include<iostream>
#include<cstring>
using namespace std;
const int maxn=1e6+5;
struct Trie{
    int next[26];
    int type;
}T[maxn];
int dp[maxn][26],val[maxn];
int le;
void Insert(string s){
    int p=0,len=s.size();
    for (int i=len-1;i>=0;i--){
        int r=s[i]-'a';
        if(T[p].next[r]<=0){
            T[p].next[r]=++le;
			T[le].type=r;
        }
        p=T[p].next[r]; 
    }
	val[p]++;
}
void dfs(int x){
	for(int i=0,v;i<26;i++){
		v=T[x].next[i];
		if(v<=0) continue;
		dfs(v);
		val[x]+=val[v];
		for(int j=0;j<26;j++){
			dp[x][j]+=dp[v][j];
		}
	}
	dp[x][T[x].type]=val[x];
}
long long ans,xx;
void query(string s){
    int p=0,len=s.size();
    xx=0;
    for (int i=len-1;i>=1;i--) {
        int r=s[i]-'a';
        if(T[p].next[r]<=0) {
            return;
        }
        p=T[p].next[r];
    }
   	for(int i=0,v;i<26;i++){
   		v=T[p].next[i];
   		if(v<=0) continue;
   		xx+=dp[v][s[0]-'a'];
	}
	ans+=xx;
}
string s[1000005];
int n;
signed main(){
    ios_base::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    le=1;
    cin>>n;
    for(int i=1;i<=n;i++){
    	cin>>s[i];
    	Insert(s[i]);
	}
	dfs(0);
    for(int i=1;i<=n;i++){
    	query(s[i]);
	}
	cout<<ans-n;
	return 0;
}
