In a Lotto I have ever played, one has to select 6 numbers from the set {1,2,...,49}. A popular strategy to play Lotto - although it doesn‘t increase your chance of winning - is to select a subset S containing k (k>6) of these 49 numbers, and then play several games with choosing numbers only from S. For example, for k=8 and S = {1,2,3,5,8,13,21,34} there are 28 possible games: [1,2,3,5,8,13], [1,2,3,5,8,21], [1,2,3,5,8,34], [1,2,3,5,13,21], ... [3,5,8,13,21,34].

Your job is to write a program that reads in the number k and the set S and then prints all possible games choosing numbers only from S.

The input file will contain one or more test cases. Each test case consists of one line containing several integers separated from each other by spaces. The first integer on the line will be the number k (6 < k < 13). Then k integers, specifying the set S, will follow in ascending order. Input will be terminated by a value of zero (0) for k.

For each test case, print all possible games, each game on one line. The numbers of each game have to be sorted in ascending order and separated from each other by exactly one space. The games themselves have to be sorted lexicographically, that means sorted by the lowest number first, then by the second lowest and so on, as demonstrated in the sample output below. The test cases have to be separated from each other by exactly one blank line. Do not put a blank line after the last test case.

7 1 2 3 4 5 6 7
8 1 2 3 5 8 13 21 34
0

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

1 2 3 5 8 13
1 2 3 5 8 21
1 2 3 5 8 34
1 2 3 5 13 21
1 2 3 5 13 34
1 2 3 5 21 34
1 2 3 8 13 21
1 2 3 8 13 34
1 2 3 8 21 34
1 2 3 13 21 34
1 2 5 8 13 21
1 2 5 8 13 34
1 2 5 8 21 34
1 2 5 13 21 34
1 2 8 13 21 34
1 3 5 8 13 21
1 3 5 8 13 34
1 3 5 8 21 34
1 3 5 13 21 34
1 3 8 13 21 34
1 5 8 13 21 34
2 3 5 8 13 21
2 3 5 8 13 34
2 3 5 8 21 34
2 3 5 13 21 34
2 3 8 13 21 34
2 5 8 13 21 34
3 5 8 13 21 34

//深搜(DFS)
#include <cstring>
#include <cstdio>
const int N=30;
int n,a[N],visit[N],ans[N];
void DFS(int num)
{
    int i,flag;
    if(num==6)
    { 
        flag=1;
        for(i=0;i<5;i++)
        {
            if(ans[i]>ans[i+1])
            {
                flag=0;
                break;
            }
        }
        if(flag)
        {
            for(i=0;i<5;i++)
            {
                printf("%d ",ans[i]);
            }   
                    printf("%d\n",ans[i]);
        }
    }
    else
    {
        for(i=0;i<n;i++)
        {
            if(!visit[i])
            {
                visit[i]=1;
                ans[num]=a[i];
                DFS(num+1);
                visit[i]=0;
            }
        }
    }
}
int main()
{
    int i,k=0;
    while(scanf("%d",&n)!=EOF&&n)
    {
        if(k)
        {
            printf("\n");
        }
        memset(visit,0,sizeof(visit));
        memset(ans,0,sizeof(ans)); 
        for(i=0;i<n;i++)
        {
            scanf("%d",&a[i]);
        }
        DFS(0);
        k++;
    }
    return 0;
}