#include <bits/stdc++.h>
//#include <ext/pb_ds/assoc_container.hpp>
//#include <ext/pb_ds/tree_policy.hpp>
#define in(x) freopen(x, "r", stdin)
#define out(x) freopen(x, "w", stdout)
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
#pragma GCC optimize("-O3")
#define F first
#define S second
#define pb push_back
#define N +100500
#define M ll(1e9 + 7)
#define sz(x) (int)x.size()
#define re return
#define oo ll(1e18)
#define el '\n'
#define pii pair <int, int>
using namespace std;
//using namespace __gnu_pbds;
//typedef tree <int, null_type, less_equal <int> , rb_tree_tag, tree_order_statistics_node_update> ordered_set;
typedef long long ll;
typedef long double ld;
string s[N];
int i, n, ans, j, hsh, p[N], l, r;
map <int, int> mp;
ll mult(ll x, ll y) {return (x * y) % M;}
ll sm(ll x, ll y) {return (x + y) % M;}
int main()
{
srand(time(0));
ios_base::sync_with_stdio(0);
iostream::sync_with_stdio(0);
ios::sync_with_stdio(0);
cin.tie(NULL);
cout.tie(NULL);
// in("input.txt");
// out("output.txt");
cin >> n;
p[0] = 1;
for (i = 1; i <= n; i++) p[i] = mult(p[i - 1], 31);
for (i = 1; i <= n; i++)
{
cin >> s[i];
hsh = 0;
for (j = 0; j < sz(s[i]); j++)
hsh = sm(hsh, mult(s[i][j] - 'a' + 1, p[j]));
mp[hsh]++;
}
for (i = 1; i <= n; i++)
{
for (l = 0; l < sz(s[i]); l++)
{
hsh = 0;
for (r = l; r < sz(s[i]); r++)
{
hsh = sm(hsh, mult(s[i][r] - 'a' + 1, p[r - l]));
ans += mp[hsh];
}
}
}
cout << ans - n;
}
