Problem: You are given a set S of strings consisting of `0` and `1`, and an integer K.

Find the longest string that is a subsequence of K or more different strings in S. If there are multiple strings that satisfy this condition, find the lexicographically smallest such string.

Here, S is given in the format below:

* The data directly given to you is an integer N, and N+1 strings X_0,X_1,...,X_N. For every i (0\leq i\leq N), the length of X_i is 2^i.
* For every pair of two integers (i,j) (0\leq i\leq N,0\leq j\leq 2^i-1), the j-th character of X_i is `1` if and only if the binary representation of j with i digits (possibly with leading zeros) belongs to S. Here, the first and last characters in X_i are called the 0-th and (2^i-1)-th characters, respectively.
* S does not contain a string with length N+1 or more.



Here, a string A is a subsequence of another string B when there exists a sequence of integers t_1 < ... < t_{|A|} such that, for every i (1\leq i\leq |A|), the i-th character of A and the t_i-th character of B is equal.

Constraints

* 0 \leq N \leq 20
* X_i(0\leq i\leq N) is a string of length 2^i consisting of `0` and `1`.
* 1 \leq K \leq |S|
* K is an integer.

Input

Input is given from Standard Input in the following format:


N K
X_0
:
X_N


Output

Print the lexicographically smallest string among the longest strings that are subsequences of K or more different strings in S.

Examples

Input

3 4
1
01
1011
01001110


Output

10


Input

4 6
1
01
1011
10111010
1101110011111101


Output

100


Input

2 5
0
11
1111


Output

Solution (in CPP):

Solution:
/*====Corycle====*/
#include<algorithm>
#include<iostream>
#include<iomanip>
#include<cstring>
#include<cstdlib>
#include<complex>
#include<cstdio>
#include<vector>
#include<cmath>
#include<ctime>
#include<stack>
#include<queue>
#include<map>
#define ll long long
using namespace std;
const int inf=0x3f3f3f3f;
const int M=1<<21;
const int N=21;
int read(){
	int s=0,f=1;char c=getchar();
	while(c<'0'||c>'9'){if(c=='-')f=-1;c=getchar();}
	while(c>='0'&&c<='9'){s=s*10+c-'0';c=getchar();}
	return s*f;
}
char s[M];
int n,m,f[N][M],num[M],ch[M][2];
int main(){
//	freopen("_.in","r",stdin);
//	freopen("_.out","w",stdout);
	n=read();m=read();
	for(int i=0;i<=n;i++){
		scanf("%s",s);
		for(int j=0;j<(1<<i);j++){
			f[i][j|(1<<i)]=s[j]-'0';
		}
	}
	num[0]=-1;
	for(int i=1;i<(2<<n);i++)num[i]=num[i>>1]+1;
	for(int i=2;i<(2<<n);i++){
		if((i>>(num[i]-1))&1){
			ch[i][1]=i^(1<<num[i]);
			ch[i][0]=ch[ch[i][1]][0];
		}
		else{
			ch[i][0]=i^(3<<(num[i]-1));
			ch[i][1]=ch[ch[i][0]][1];
		}
	}
	for(int i=n;i>=1;i--){
		for(int S=1<<i;S<(2<<n);S++){
			if(!f[i][S])continue;
			int tmp=S>>i;
			int T=(S&((1<<i)-1))^(1<<i);
			if(ch[T][0])f[num[ch[T][0]]][(((tmp<<1)^1)<<num[ch[T][0]])^ch[T][0]]+=f[i][S];
			if(ch[T][1])f[num[ch[T][1]]][(((tmp<<1)^0)<<num[ch[T][1]])^ch[T][1]]+=f[i][S];
			f[0][tmp]+=f[i][S];
		}
	}
	int Ans=1;
	for(int S=2;S<(2<<n);S++){
		if(f[0][S]>=m&&num[S]>num[Ans])Ans=S;
	}
	for(int i=num[Ans]-1;i>=0;i--)printf("%d",(Ans>>i)&1);
	return 0;
}