Problem: To defeat Lord Voldemort, Harry needs to destroy all horcruxes first. The last horcrux is an array a of n integers, which also needs to be destroyed. The array is considered destroyed if all its elements are zeroes. To destroy the array, Harry can perform two types of operations:

  1. choose an index i (1 ≤ i ≤ n), an integer x, and subtract x from a_i.
  2. choose two indices i and j (1 ≤ i, j ≤ n; i ≠ j), an integer x, and subtract x from a_i and x + 1 from a_j. 



Note that x does not have to be positive.

<image>

Harry is in a hurry, please help him to find the minimum number of operations required to destroy the array and exterminate Lord Voldemort.

Input

The first line contains a single integer n — the size of the array a (1 ≤ n ≤ 20). 

The following line contains n integers a_1, a_2, …, a_n — array elements (-10^{15} ≤ a_i ≤ 10^{15}).

Output

Output a single integer — the minimum number of operations required to destroy the array a.

Examples

Input


3
1 10 100


Output


3


Input


3
5 3 -2


Output


2


Input


1
0


Output


0

Note

In the first example one can just apply the operation of the first kind three times.

In the second example, one can apply the operation of the second kind two times: first, choose i = 2, j = 1, x = 4, it transforms the array into (0, -1, -2), and then choose i = 3, j = 2, x = -2 to destroy the array.

In the third example, there is nothing to be done, since the array is already destroyed.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <class T>
inline void read(T &x) {
  x = 0;
  char c = getchar();
  int f = 1;
  while (!isdigit(c)) {
    if (c == '-') f = -1;
    c = getchar();
  }
  while (isdigit(c)) {
    x = x * 10 + c - '0';
    c = getchar();
  }
  x *= f;
}
template <class T>
T gcd(T a, T b) {
  return !b ? a : gcd(b, a % b);
}
template <class T>
inline void umin(T &x, T y) {
  x = x < y ? x : y;
}
template <class T>
inline void umax(T &x, T y) {
  x = x > y ? x : y;
}
inline unsigned int R() {
  static unsigned int seed = 416;
  return seed ^= seed >> 5, seed ^= seed << 17, seed ^= seed >> 13;
}
const int N = 1 << 20 | 3;
int n, all, f[N];
long long a[26];
int getque(long long *a, int l, int r, long long *ans) {
  int n = 1;
  ans[1] = 0;
  static long long f[N], g[N];
  for (register int j = (l); j <= (r); j++) {
    for (register int i = (1); i <= (n); i++) f[i] = ans[i] + a[j];
    for (register int i = (1); i <= (n); i++) g[i] = ans[i] - a[j];
    int p1 = 1, p2 = 1, sz = 0;
    while (sz < n * 2) {
      if (p1 > n || (p2 <= n && f[p1] > g[p2]))
        ans[++sz] = g[p2++];
      else
        ans[++sz] = f[p1++];
    }
    n *= 2;
  }
  return n;
}
bool ck(int s) {
  static long long q[26], q1[N], q2[N];
  int sz = 0;
  long long sum = 0;
  for (register int i = (1); i <= (n); i++)
    if (s >> i - 1 & 1) q[++sz] = a[i], sum += a[i];
  if (sum + sz - 1 & 1) return 0;
  int n1 = getque(q, 1, sz / 2, q1);
  int n2 = getque(q, sz / 2 + 1, sz, q2);
  int tot = 0 - (sum <= sz - 1 && sum >= -sz + 1) * 2;
  for (int i = n2, j = 1; i >= 1; i--) {
    while (j <= n1 && q1[j] + q2[i] < -(sz - 1)) j++;
    if (j <= n1 && q1[j] + q2[i] <= sz - 1) {
      for (int k = j; k <= n1 && tot <= 0 && q1[k] + q2[i] <= sz - 1; k++)
        tot++;
    }
  }
  return tot > 0;
}
int main() {
  int newsz = 0;
  read(n);
  for (register int i = (1); i <= (n); i++) {
    read(a[i]);
    if (a[i]) a[++newsz] = a[i];
  }
  n = newsz;
  all = (1 << n) - 1;
  for (register int s = (1); s <= (all); s++)
    if (!f[s] && ck(s)) {
      int wai = s ^ all;
      f[s] = 1;
      for (int t = wai; t; t = (t - 1) & wai) umax(f[s | t], f[t] + 1);
    }
  cout << n - f[all];
  return 0;
}