Problem: You are given a string s, consisting of brackets of two types: '(', ')', '[' and ']'.

A string is called a regular bracket sequence (RBS) if it's of one of the following types: 

  * empty string; 
  * '(' + RBS + ')'; 
  * '[' + RBS + ']'; 
  * RBS + RBS. 



where plus is a concatenation of two strings.

In one move you can choose a non-empty subsequence of the string s (not necessarily consecutive) that is an RBS, remove it from the string and concatenate the remaining parts without changing the order.

What is the maximum number of moves you can perform?

Input

The first line contains a single integer t (1 ≤ t ≤ 1000) — the number of testcases.

Each of the next t lines contains a non-empty string, consisting only of characters '(', ')', '[' and ']'. The total length of the strings over all testcases doesn't exceed 2 ⋅ 10^5.

Output

For each testcase print a single integer — the maximum number of moves you can perform on a given string s.

Example

Input


5
()
[]()
([)]
)]([
)[(]


Output


1
2
2
0
1

Note

In the first example you can just erase the whole string.

In the second example you can first erase the brackets on positions 1 and 2: "[]()", then "()" is left. After that you can erase it whole. You could erase the whole string from the beginning but you would get one move instead of two.

In the third example you can first erase the brackets on positions 1 and 3: "([)]". They form an RBS "()". Then "[]" is left, so you can erase it whole.

In the fourth example there is no subsequence that is an RBS, so you can't perform a move at all.

In the fifth example you can erase the brackets on positions 2 and 4: ")[(]" and get ")(" as a result. You can erase nothing from it.

Solution (in CPP):

Solution:
// 19-11-2020
// FUN WITH CODE -> GON
// Don't be frustrated
#include<bits/stdc++.h>
#define ll long long
#define ld long double
#define nes ios_base :: sync_with_stdio(0); cin.tie(0); cout<<fixed; cout.precision(3);
#define f4(i,k,n) for(int i=k;i<n;++i)
#define pii pair<int,int>
#define pll pair<ll,ll>
#define inf LLONG_MAX
#define sveci vector<int>
#define svecll vector<ll>
#define dbveci vector<vector<int>>
#define dbvecll vector<vector<ll>>
using namespace std;
ll const mo=1e9+7;
ll mod(ll k){
	return (k+mo)%mo;
}
ll addmod(ll a,ll b){
	return mod(mod(a)+mod(b));
}
ll mulmod(ll a,ll b){
	return mod(mod(a)*mod(b));
}
ll submod(ll a,ll b){
	return mod(a%mo-b%mo+mo)%mo;
}

void solve(){
	string s;
	cin>>s;
	int bigle=0,bigr=0,smal=0,smar=0,res=0;
	for(int i=0;i<s.size();++i){
		if(s[i]=='['||s[i]=='('){
			if(s[i]=='[') ++bigle;
			if(s[i]=='(') ++smal;
		}
		else{
			if(s[i]==')'&&smal>0){
				++res;
				--smal;
			}
			if(s[i]==']'&&bigle>0){
				++res;
				--bigle;
			}
		}
	}
	cout<<res<<"\n";
}
int main(){
	nes;
	//active();
	int t=1;
	cin>>t;
	for(int i=1;i<=t;++i){
		//cout<<"Case #"<<i<<": ";
		solve();
	}
	return 0;
}