Problem: Monocarp has arranged n colored marbles in a row. The color of the i-th marble is a_i. Monocarp likes ordered things, so he wants to rearrange marbles in such a way that all marbles of the same color form a contiguos segment (and there is only one such segment for each color). 

In other words, Monocarp wants to rearrange marbles so that, for every color j, if the leftmost marble of color j is l-th in the row, and the rightmost marble of this color has position r in the row, then every marble from l to r has color j.

To achieve his goal, Monocarp can do the following operation any number of times: choose two neighbouring marbles, and swap them.

You have to calculate the minimum number of operations Monocarp has to perform to rearrange the marbles. Note that the order of segments of marbles having equal color does not matter, it is only required that, for every color, all the marbles of this color form exactly one contiguous segment.

Input

The first line contains one integer n (2 ≤ n ≤ 4 ⋅ 10^5) — the number of marbles.

The second line contains an integer sequence a_1, a_2, ..., a_n (1 ≤ a_i ≤ 20), where a_i is the color of the i-th marble.

Output

Print the minimum number of operations Monocarp has to perform to achieve his goal.

Examples

Input


7
3 4 2 3 4 2 2


Output


3


Input


5
20 1 14 10 2


Output


0


Input


13
5 5 4 4 3 5 7 6 5 4 4 6 5


Output


21

Note

In the first example three operations are enough. Firstly, Monocarp should swap the third and the fourth marbles, so the sequence of colors is [3, 4, 3, 2, 4, 2, 2]. Then Monocarp should swap the second and the third marbles, so the sequence is [3, 3, 4, 2, 4, 2, 2]. And finally, Monocarp should swap the fourth and the fifth marbles, so the sequence is [3, 3, 4, 4, 2, 2, 2]. 

In the second example there's no need to perform any operations.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
using ll = long long;
const int N = 4e5 + 5;
const ll M = 1e18 + 7;
int a[N];
ll dp[(1 << 20)][20];
ll d[20][20], suff[N][20];
ll sum[N], cnt[N];
void solve() {
  for (int mask = 0; mask < (1 << 20); ++mask) {
    for (int i = 0; i < 20; ++i) {
      dp[mask][i] = M;
    }
  }
  int n;
  cin >> n;
  int ret_mask = 0;
  for (int i = 1; i <= n; ++i) {
    cin >> a[i];
    a[i]--;
    ret_mask |= (1 << a[i]);
    ++cnt[a[i]];
    sum[a[i]] += i;
  }
  for (int i = n; i >= 1; i--) {
    for (int j = 0; j < 20; ++j) {
      suff[i][j] = suff[i + 1][j] + (a[i] == j);
    }
  }
  for (int i = 1; i <= n; ++i) {
    for (int j = 0; j < 20; ++j) {
      if (a[i] == j) continue;
      d[a[i]][j] += suff[i + 1][j];
    }
  }
  for (int i = 0; i < 20; ++i) dp[0][i] = 0;
  for (int mask = 0; mask < (1 << 20); ++mask) {
    bool bad = 0;
    for (int i = 0; i < 20; ++i) {
      if (((mask >> i) & 1) && !cnt[i]) bad = 1;
    }
    if (bad) continue;
    ll opt = M;
    ll was = 0;
    for (int i = 0; i < 20; ++i) {
      if ((mask >> i) & 1) {
        opt = min(opt, dp[mask][i]);
        was += cnt[i];
      }
    }
    if (!mask) opt = 0;
    for (int i = 0; i < 20; ++i) {
      if (!((mask >> i) & 1)) {
        ll sz = cnt[i];
        ll j = was * sz + (sz * (sz + 1)) / 2;
        ll add = 0;
        for (int k = 0; k < 20; ++k) {
          if ((mask >> k) & 1) add += d[i][k];
        }
        ll idx_sum = add + sum[i];
        dp[mask | (1 << i)][i] = min(dp[mask | (1 << i)][i], opt + idx_sum - j);
      }
    }
  }
  cout << *min_element(dp[ret_mask], dp[ret_mask] + 20);
}
int main() {
  ios ::sync_with_stdio(0);
  cin.tie(0);
  int tt = 1;
  while (tt--) {
    solve();
    cout << '\n';
  }
  return 0;
}