#include<iostream>

#include<string>

#include<string.h>

#include<stdio.h>

#include<queue>

#include<iomanip>

#include<algorithm>

#include<map>

using namespace std;

int n;

int G[][];

int flag[];

int ans[];

int TOT,FF;

void dfs(int now)

{

    if(now==*n+)

    {

        for(int i=; i<=*n; i++) printf("%d ",ans[i]);

        FF=;

        return;

    }

    if(now==)

    {

        for(int i=; i<=*n; i++)

        {

            if(!flag[i])

            {

                flag[i]=;

                ans[now]=i;

                dfs(now+);

                if(FF) return;

                flag[i]=;

            }

        }

    }

    else if(now>=&&now<=n+)

    {

        for(int i=; i<=*n; i++)

        {

            if(!flag[i]&&!G[i][ans[now-]])

            {

                flag[i]=;

                ans[now]=i;

                dfs(now+);

                if(FF) return;

                flag[i]=;

            }

        }

    }

    else if(now>=n+&&now<=*n)

    {

        for(int i=; i<=*n; i++)

        {

            if(!flag[i]&&!G[i][ans[now-n]])

            {

                flag[i]=;

                ans[now]=i;

                dfs(now+);

                if(FF) return;

                flag[i]=;

            }

        }

    }

}

int main( )

{

    freopen("embedding.in","r",stdin);

    freopen("embedding.out","w",stdout);

    while(~scanf("%d",&n))

    {

        if(n==) break;

        TOT=;

        for(int i=; i<=*n; i++) ans[TOT]=i,TOT++;

        TOT--;

        for(int i=; i<=TOT; i++) printf("%d ",ans[i]);

        printf("\n");

        for(int i=; i<=n; i++) G[ans[i]][ans[i+]]=,G[ans[i+]][ans[i]]=;

        for(int i=; i<=n; i++) G[ans[i]][ans[i+n]]=,G[ans[i+n]][ans[i]]=;

        TOT=; ans[TOT]=; TOT++;

        for(int i=n+; i<=*n; i++) ans[TOT]=i,TOT++;

        ans[TOT]=n+; TOT++; ans[TOT]=n; TOT++;

        for(int i=; i<=n-; i++) ans[TOT]=i,TOT++;

        TOT--;

        for(int i=; i<=TOT; i++) printf("%d ",ans[i]);

        printf("\n");

        for(int i=; i<=n; i++) G[ans[i]][ans[i+]]=,G[ans[i+]][ans[i]]=;

        for(int i=; i<=n; i++) G[ans[i]][ans[i+n]]=,G[ans[i+n]][ans[i]]=;

        FF=;

        memset(flag,,sizeof flag);

        dfs();

    }

    return ;

}