Problem: Market stalls now have the long-awaited game The Colder Scrools V: Nvodsk. The game turned out to be difficult as hell and most students can't complete the last quest ("We don't go to Nvodsk..."). That threatened winter exams. The rector already started to wonder whether he should postpone the winter exams till April (in fact, he wanted to complete the quest himself). But all of a sudden a stranger appeared at the door of his office. "Good afternoon. My name is Chuck and I solve any problems" — he said.

And here they are sitting side by side but still they can't complete the mission. The thing is, to kill the final boss one should prove one's perfect skills in the art of managing letters. One should be a real magician to do that. And can you imagine what happens when magicians start competing... 

But let's put it more formally: you are given a string and a set of integers ai. You are allowed to choose any substring that is a palindrome and delete it. At that we receive some number of points equal to ak, where k is the length of the deleted palindrome. For some k, ak = -1, which means that deleting palindrome strings of such length is forbidden. After a substring is deleted, the remaining part "shifts together", that is, at no moment of time the string has gaps. The process is repeated while the string has at least one palindrome substring that can be deleted. All gained points are summed up.

Determine what maximum number of points can be earned.

"Oh" — said Chuck, raising from the chair, — "I used to love deleting palindromes, just like you, but one day I took an arrow in the Knee".

Input

The first line contains an integer l (1 ≤ l ≤ 150) — the length of the string.

The second line contains exactly l integers ak ( - 1 ≤ ak ≤ 105) — the points a player gains for deleting.

The third line contains exactly l lowercase Latin letters — the original string from which a player can delete palindromes. The line contains no other characters apart from the newline character at the end of the string.

Output

Print a single number — the maximum number of points one can gain if he plays on the given string.

Examples

Input

7
-1 -1 -1 -1 -1 -1 -1
abacaba


Output

0


Input

7
1 -1 -1 -1 -1 -1 -1
abacaba


Output

7


Input

7
1 5 -1 -1 -1 -1 10
abacaba


Output

16

Note

In the first sample we cannot delete any substring, so the best result is 0. In the second sample we are allowed to delete only those palindromes whose length equals 1, thus, if we delete the whole string, we get 7 points. In the third sample the optimal strategy is: first we delete character c, then string aa, then bb, and the last one aa. At that we get 1 + 3 * 5 = 16 points.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
#pragma GCC optimize("Ofast")
#pragma GCC optimize("unroll-loops")
#pragma GCC target("sse,sse2,sse3,ssse3,sse4,popcnt,abm,mmx,avx,tune=native")
using namespace std;
const int MAXN = 152;
int n, dp[2][MAXN][MAXN][MAXN];
int val[MAXN];
string s;
inline void mx(int &l, int r) {
  if (r > l) l = r;
  return;
}
int main() {
  ios::sync_with_stdio(0);
  cin >> n;
  memset(dp, 224, sizeof(dp));
  memset(val, -1, sizeof(val));
  for (int i = 1; i <= n; i++) cin >> val[i];
  cin >> s;
  dp[1][1][0][0] = dp[0][1][0][0] = 0;
  dp[1][1][1][0] = dp[0][1][1][0] = 0;
  if (val[1] == -1)
    dp[0][1][1][0] = dp[0][MAXN - 1][MAXN - 1][MAXN - 1];
  else
    dp[0][1][1][0] = dp[1][1][1][0] = val[1];
  for (int i = 1; i <= (n / 2); i++) {
    for (int j = 1; j <= i; j++) {
      if (~val[2 * j]) {
        mx(dp[1][1][0][i], dp[1][1][0][i - j] + val[2 * j]);
        mx(dp[0][1][0][i], dp[0][1][0][i - j] + val[2 * j]);
      }
      if (~val[2 * j + 1]) {
        mx(dp[1][1][1][i], dp[1][1][0][i - j] + val[2 * j + 1]);
        mx(dp[0][1][1][i], dp[0][1][0][i - j] + val[2 * j + 1]);
      }
    }
    if (~val[1]) {
      mx(dp[1][1][1][i], dp[1][1][0][i] + val[1]);
      mx(dp[0][1][1][i], dp[0][1][0][i] + val[1]);
    }
    mx(dp[1][1][0][i], 0);
    mx(dp[1][1][1][i], 0);
  }
  for (int i = 2; i <= n; i++)
    for (int j = 0; j <= (n / 2); j++) {
      dp[0][i][i - 1][j] = dp[0][1][0][j];
      dp[1][i][i - 1][j] = dp[1][1][0][j];
      dp[0][i][i][j] = dp[0][1][1][j];
      dp[1][i][i][j] = dp[1][1][1][j];
    }
  for (int l = 1; l < n; l++)
    for (int i = 1; i <= (n - l); i++) {
      for (int j = 0; (2 * j) <= (n - 1 - l); j++) {
        if (s[i - 1] == s[i + l - 1]) {
          mx(dp[1][i][i + l][j], dp[1][i + 1][i + l - 1][j + 1]);
          mx(dp[0][i][i + l][j], dp[0][i + 1][i + l - 1][j + 1]);
        }
        mx(dp[1][i][i + l][j], dp[0][i][i][0] + dp[1][i + 1][i + l][j]);
        mx(dp[1][i][i + l][j], dp[0][i + 1][i + l][0] + dp[1][i][i][j]);
        mx(dp[0][i][i + l][j], dp[0][i][i][0] + dp[0][i + 1][i + l][j]);
        mx(dp[0][i][i + l][j], dp[0][i + 1][i + l][0] + dp[0][i][i][j]);
        for (int z = i + 1; z < (i + l); z++) {
          if (s[i - 1] != s[z - 1]) continue;
          mx(dp[1][i][i + l][j],
             dp[0][i + 1][z - 1][1] + dp[1][z + 1][i + l][j]);
          mx(dp[1][i][i + l][j],
             dp[0][z + 1][i + l][0] + dp[1][i + 1][z - 1][j + 1]);
          mx(dp[0][i][i + l][j],
             dp[0][i + 1][z - 1][1] + dp[0][z + 1][i + l][j]);
          mx(dp[0][i][i + l][j],
             dp[0][z + 1][i + l][0] + dp[0][i + 1][z - 1][j + 1]);
        }
        mx(dp[1][i][i + l][j], 0);
        mx(dp[1][i][i + l][j], dp[1][i + 1][i + l][0]);
        mx(dp[1][i][i + l][j], dp[1][i][i + l - 1][0]);
      }
    }
  cout << dp[1][1][n][0] << '\n';
  return 0;
}