Problem: You are given a binary string s consisting of n zeros and ones.

Your task is to divide the given string into the minimum number of subsequences in such a way that each character of the string belongs to exactly one subsequence and each subsequence looks like "010101 ..." or "101010 ..." (i.e. the subsequence should not contain two adjacent zeros or ones).

Recall that a subsequence is a sequence that can be derived from the given sequence by deleting zero or more elements without changing the order of the remaining elements. For example, subsequences of "1011101" are "0", "1", "11111", "0111", "101", "1001", but not "000", "101010" and "11100".

You have to answer t independent test cases.

Input

The first line of the input contains one integer t (1 ≤ t ≤ 2 ⋅ 10^4) — the number of test cases. Then t test cases follow.

The first line of the test case contains one integer n (1 ≤ n ≤ 2 ⋅ 10^5) — the length of s. The second line of the test case contains n characters '0' and '1' — the string s.

It is guaranteed that the sum of n does not exceed 2 ⋅ 10^5 (∑ n ≤ 2 ⋅ 10^5).

Output

For each test case, print the answer: in the first line print one integer k (1 ≤ k ≤ n) — the minimum number of subsequences you can divide the string s to. In the second line print n integers a_1, a_2, ..., a_n (1 ≤ a_i ≤ k), where a_i is the number of subsequence the i-th character of s belongs to.

If there are several answers, you can print any.

Example

Input


4
4
0011
6
111111
5
10101
8
01010000


Output


2
1 2 2 1 
6
1 2 3 4 5 6 
1
1 1 1 1 1 
4
1 1 1 1 1 2 3 4 

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const long long INF = 1000000007;
bool prime[100001];
void SieveOfEratosthenes() {
  memset(prime, true, sizeof(prime));
  for (int p = 2; p * p <= 100000; p++) {
    if (prime[p] == true) {
      for (int i = p * p; i <= 100000; i += p) prime[i] = false;
    }
  }
}
long long bs(vector<long long> a, long long s, long long e, long long x) {
  int l = s;
  int h = e;
  int m;
  while (l <= h) {
    m = (l + h) / 2;
    if (a[m] > x)
      h = m - 1;
    else if (a[m] < x)
      l = m + 1;
    else
      return m;
  }
  return -1;
}
long long mex(vector<long long> a, int n) {
  sort(a.begin(), a.end());
  int j = a[0];
  if (j != 0)
    return 0;
  else {
    for (int i = 1; i < n; i++) {
      if (a[i] != a[i - 1]) {
        if (a[i] != a[i - 1] + 1) {
          return j + 1;
        } else
          j++;
      }
    }
    return j + 1;
  }
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  SieveOfEratosthenes();
  long long test;
  cin >> test;
  while (test--) {
    long long n;
    cin >> n;
    string s;
    cin >> s;
    vector<long long> a(n);
    a[0] = 1;
    int i = 1;
    vector<char> b[n + 1];
    b[1].push_back(s.at(0));
    int t = 1;
    while (i < n) {
      if (b[t][b[t].size() - 1] != s.at(i)) {
        a[i] = t;
        b[t].push_back(s.at(i));
        i++;
        if (b[t + 1].size() > 0) {
          b[t + 1][0] = b[t][b[t].size() - 1];
        }
      } else {
        if (t != 1) {
          if (s.at(i) != b[t][0]) {
            t--;
            b[t].push_back(s.at(i));
            a[i] = t;
            if (b[t + 1].size() > 0) {
              b[t + 1][0] = b[t][b[t].size() - 1];
            }
            i++;
          } else {
            t++;
            if (b[t].size() == 0) {
              b[t].push_back(s.at(i));
              a[i] = t;
              i++;
            }
          }
        } else {
          t++;
          if (b[t].size() == 0) {
            b[t].push_back(s.at(i));
            a[i] = t;
            i++;
          }
        }
      }
    }
    long long m = 0;
    for (i = 0; i < n; i++) {
      m = max(m, a[i]);
    }
    cout << m << endl;
    for (i = 0; i < n; i++) {
      cout << a[i] << " ";
    }
    cout << endl;
  }
}