#include <bits/stdc++.h>
#include <ext/pb_ds/assoc_container.hpp>
#include <ext/pb_ds/tree_policy.hpp>
#warning Check Integer OverFlow
#define ll long long
#define rep(i,a,b) for(int i=a;i<b;i++)
#define maxs(a,b) if(b>a)a=b
#define mins(a,b) if(b<a)a=b
#define debug(x) cerr<<"["<<#x<<":"<<x<<"] "
#define debug2(a,b) debug(a);debug(b)
#define debug3(a,b,c) debug2(a,b);debug(c)
#define de cerr
#define gcd(a,b) __gcd(a,b)
#define lcm(a,b) (((a)/(__gcd(a,b))) * b)
#define print(arr) for(auto it = arr.begin();it < arr.end();it ++){cout << *it << " ";}cout << ln;
#define ordered_set tree<int, null_type,less<int>, rb_tree_tag,tree_order_statistics_node_update>
#define all(a) (a).begin(), (a).end()
#define vi vector<int>
#define v vector
#define p pair
#define pii p<int,int>
#define pb push_back
#define mk make_pair
#define f first
#define s second
#define ln "\n"
typedef long double ld;
using namespace std;
using namespace __gnu_pbds;
ll modF=1e9+7;
/*OUTPUT
*/
int N;
string a[20000];
bool cmp(string ax,string b){
return ax.length() > b.length();
}
bool sub(int i,int j){
int l1 = a[i].length();
int l2 = a[j].length();
for(int it = 0;it <= l1 - l2;it ++){
bool pos = true;
for(int k = it;k < it + l2;k ++){
if(a[i][k] != a[j][k - it]){
pos = false;
break;
}
}
if(pos){
return true;
}
}
return false;
}
void solve(){
cin >> N;
rep(i,0,N){
cin >> a[i];
}
sort(a,a + N,cmp);
// rep(i,0,N){
// debug(a[i]);
// }
int ans = 0;
rep(i,0,N){
rep(j,i + 1,N){
if(a[i] == a[j]){
ans += 2;
}
else if(sub(i,j)){
ans ++;
}
}
}
cout << ans << ln;
}
int main(){
ios::sync_with_stdio(0);cin.tie(0);
int t = 1;
// cin >> t;
while(t --){
solve();
}
}
