Genos recently installed the game Zuma on his phone. In Zuma there exists a line of n gemstones, the i-th of which has color ci. The goal of the game is to destroy all the gemstones in the line as quickly as possible.

In one second, Genos is able to choose exactly one continuous substring of colored gemstones that is a palindrome and remove it from the line. After the substring is removed, the remaining gemstones shift to form a solid line again. What is the minimum number of seconds needed to destroy the entire line?

Let us remind, that the string (or substring) is called palindrome, if it reads same backwards or forward. In our case this means the color of the first gemstone is equal to the color of the last one, the color of the second gemstone is equal to the color of the next to last and so on.

Input

The first line of input contains a single integer n (1 ≤ n ≤ 500) — the number of gemstones.

The second line contains n space-separated integers, the i-th of which is ci (1 ≤ ci ≤ n) — the color of the i-th gemstone in a line.

Output

Print a single integer — the minimum number of seconds needed to destroy the entire line.

Examples

Input

3
1 2 1


Output

1


Input

3
1 2 3


Output

3


Input

7
1 4 4 2 3 2 1


Output

2

Note

In the first sample, Genos can destroy the entire line in one second.

In the second sample, Genos can only destroy one gemstone at a time, so destroying three gemstones takes three seconds.

In the third sample, to achieve the optimal time of two seconds, destroy palindrome 4 4 first and then destroy palindrome 1 2 3 2 1.
#include <bits/stdc++.h>
using namespace std;
long long i, j, k, len, dp[510][510];
long long s[1000];
long long rec(long long i, long long j) {
  if (i > j) return 0;
  if (i == j) return 1;
  if (dp[i][j] > 0) return dp[i][j];
  long long ans = LONG_MAX;
  ans = min(1 + rec(i + 1, j), ans);
  if (s[i] == s[i + 1]) ans = min(1 + rec(i + 2, j), ans);
  for (k = i + 2; k <= j; k++) {
    if (s[i] == s[k]) ans = min(ans, rec(i + 1, k - 1) + rec(k + 1, j));
  }
  dp[i][j] = ans;
  return ans;
}
int main() {
  long long data;
  cin >> data;
  for (int i = 0; i < data; i++) cin >> s[i];
  len = data;
  memset(dp, 0, sizeof(dp));
  for (int i = 0; i < len; i++) {
    dp[i][i] = 1;
  }
  for (long long i = 0; i < len - 1; i++) {
    if (s[i] == s[i + 1]) dp[i][i + 1] = 1;
  }
  cout << rec(0, len - 1) << endl;
  return 0;
}
