Problem: A student, Kita_masa, is taking an English examination. In this examination, he has to write a sentence of length m.

Since he completely forgot the English grammar, he decided to consider all sentences of length m constructed by concatenating the words he knows and write the K-th sentence among the candidates sorted in lexicographic order. He believes that it must be the correct sentence because K is today's lucky number for him.

Each word may be used multiple times (or it's also fine not to use it at all) and the sentence does not contain any extra character between words. Two sentences are considered different if the order of the words are different even if the concatenation resulted in the same string.



Input

The first line contains three integers n (1 \leq n \leq 100), m (1 \leq m \leq 2000) and K (1 \leq K \leq 10^{18}), separated by a single space. Each of the following n lines contains a word that Kita_masa knows. The length of each word is between 1 and 200, inclusive, and the words contain only lowercase letters. You may assume all the words given are distinct.

Output

Print the K-th (1-based) sentence of length m in lexicographic order. If there is no such a sentence, print "-".

Examples

Input

2 10 2
hello
world


Output

helloworld


Input

3 3 6
a
aa
b


Output

aba


Input

2 59 1000000000000000000
a
b


Output

-

Solution (in CPP):

Solution:
#include <iostream>
#include <fstream>
#include <cassert>
#include <typeinfo>
#include <vector>
#include <stack>
#include <cmath>
#include <set>
#include <map>
#include <string>
#include <algorithm>
#include <cstdio>
#include <queue>
#include <iomanip>
#include <cctype>
#include <random>
#include <complex>
#define syosu(x) fixed<<setprecision(x)
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
typedef pair<int,int> P;
typedef pair<long double,long double> pdd;
typedef pair<ll,ll> pll;
typedef vector<int> vi;
typedef vector<vi> vvi;
typedef vector<long double> vd;
typedef vector<vd> vvd;
typedef vector<ll> vl;
typedef vector<vl> vvl;
typedef vector<char> vc;
typedef vector<vc> vvc;
typedef vector<string> vs;
typedef vector<bool> vb;
typedef vector<vb> vvb;
typedef vector<P> vp;
typedef vector<vp> vvp;
typedef vector<pll> vpll;
typedef pair<int,P> pip;
typedef vector<pip> vip;
const int inf=1<<30;
const ll INF=1ll<<62;
const double pi=acos(-1);
const long double eps=1e-9;
const ll mod=1e9+7;
const int dx[4]={0,1,0,-1},dy[4]={1,0,-1,0};

const int N=100,M=2000,MAX=20005,AL=26;
int n,m,ID=1,S[N],a[N][2*N];
string s[N];
ll k,b[AL],dp1[M+1],dp2[M+1];

void f(ll& x,ll y){
	x=min(x+min(y,k+1),k+1);
}

int main(){
	cin>>n>>m>>k;
	dp1[0]=dp2[0]=1;
	string res;
	for(int i=0;i<n;i++){
		cin>>s[i];
		S[i]=s[i].size();
		a[i][0]++;
	}
	for(int i=1;i<=m;i++) for(int j=0;j<n;j++) if(i>=S[j]) f(dp1[i],dp1[i-S[j]]);
	for(int i=0;i<m;i++){
		ll sum=0;
		fill(b,b+AL,0);
		for(int j=0;j<n;j++) for(int l=max(S[j]+i-m,0);l<min(i+1,S[j]);l++) if(a[j][l]){
			ll A=dp1[m+l-S[j]-i],B=dp2[i-l];
			f(b[s[j][l]-'a'],(!A||INF/A>=B?A*B:k+1));
		}
		for(int j=0;j<AL;j++){
			if(sum+b[j]>=k){
				res+=(char)('a'+j);
				k-=sum;
				break;
			}
			f(sum,b[j]);
		}
		if(res.size()!=i+1){
			cout<<'-'<<endl;
			return 0;
		}
		for(int j=0;j<n;j++){
			if(i-S[j]>=-1&&s[j]==res.substr(i-S[j]+1,S[j])) f(dp2[i+1],dp2[i-S[j]+1]);
			for(int l=S[j]-1;l>0;l--){
				a[j][l]=0;
				if(a[j][l-1]&&s[j][l-1]==res[i]) a[j][l]=1;
			}
			a[j][0]=1;
		}
	}
	cout<<res<<endl;
}