#include<bits/stdc++.h>
using namespace std;
struct OPT{
	int id;
	int a[5],b[5],c[5];
}opt[8];
int n,top=0;
void sol(int l,int r){
	if(r-l+1<=4){
		//balabala
		return ;
	}
	for(int i=l;i<=r;i+=4){
		sol(i,i+3);
	}
}
int pd[20];
void make_new(){
	memset(pd,0,sizeof(pd));
	top++;
	opt[top].id=0;
	for(int i=1;i<=4;i++){
		opt[top].a[i]=opt[top].b[i]=opt[top].c[i]=2000;
	}
}
void add(int c,int a,int b){
	if(c>n)return ;
	if(pd[a]||pd[b]||opt[top].id==4)make_new();
	pd[c]=1;opt[top].id++;
	opt[top].c[opt[top].id]=c;
	opt[top].a[opt[top].id]=a;
	opt[top].b[opt[top].id]=b;
}
void sol(int n){
	top=0;
	make_new();
	for(int i=1;i<n;i+=2){
		add(i+1,i,i+1);
	}
	for(int i=1;i<n;i+=4){
		add(i+3,i+1,i+3);
		add(i+2,i+1,i+2);
	}
	for(int i=4;i<n;i+=4){
		add(i+4,i,i+4);
		add(i+1,i,i+1);
		add(i+2,i,i+2);
		add(i+3,i,i+3);
	}
	cout<<top<<endl;
	for(int i=1;i<=top;i++){
		for(int j=1;j<=4;j++)
		cout<<opt[i].c[j]<<" "<<opt[i].a[j]<<" "<<opt[i].b[j]<<endl;
	}
}
int main(){
	cin>>n;
	sol(n);
	if(n>12)return -1;
}