#include <bits/stdc++.h>
using namespace std;
using ll=long long;
const ll ILL=2167167167167167167;
const int INF=2100000000;
#define rep(i,a,b) for (int i=(int)(a);i<(int)(b);i++)
#define all(p) p.begin(),p.end()
template<class T> using pq_ = priority_queue<T, vector<T>, greater<T>>;
template<class T> int LB(vector<T> &v,T a){return lower_bound(v.begin(),v.end(),a)-v.begin();}
template<class T> int UB(vector<T> &v,T a){return upper_bound(v.begin(),v.end(),a)-v.begin();}
template<class T> bool chmin(T &a,T b){if(b<a){a=b;return 1;}else return 0;}
template<class T> bool chmax(T &a,T b){if(a<b){a=b;return 1;}else return 0;}
template<class T> void So(vector<T> &v) {sort(v.begin(),v.end());}
template<class T> void Sore(vector<T> &v) {sort(v.begin(),v.end(),[](T x,T y){return x>y;});}
bool yneos(bool a,bool upp=false){if(a){cout<<(upp?"YES\n":"Yes\n");}else{cout<<(upp?"NO\n":"No\n");}return a;}
template<class T> void vec_out(vector<T> &p,int ty=0){
    if(ty==2){cout<<'{';for(int i=0;i<(int)p.size();i++){if(i){cout<<",";}cout<<'"'<<p[i]<<'"';}cout<<"}\n";}
    else{if(ty==1){cout<<p.size()<<"\n";}for(int i=0;i<(int)(p.size());i++){if(i) cout<<" ";cout<<p[i];}cout<<"\n";}}
template<class T> T vec_min(vector<T> &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmin(ans,x);return ans;}
template<class T> T vec_max(vector<T> &a){assert(!a.empty());T ans=a[0];for(auto &x:a) chmax(ans,x);return ans;}
template<class T> T vec_sum(vector<T> &a){T ans=T(0);for(auto &x:a) ans+=x;return ans;}
int pop_count(long long a){int res=0;while(a){res+=(int)(a&1),a>>=1;}return res;}
template<class T> T square(T a){return a * a;}




void solve();
// DEAR MYSTERIES / TOMOO
int main() {
    ios::sync_with_stdio(false);
    cin.tie(nullptr);

    int t = 1;
    // cin >> t;
    rep(i, 0, t) solve();
}

void solve(){
    int N;
    cin >> N;
    if (N == 2) {
        cout << "1\n";
        cout << "1 2 1\n";
        cout << "1 1\n";
        return;
    }
    cout << 2 * N - 3 << "\n";
    cout << "1 2 1\n";
    cout << "2 3 3\n";
    cout << "2 3 4\n";
    rep(i, 3, N) {
        cout << i << " " << i + 1 << " " << i * 2 - 1 << "\n";
        cout << 2 << " " << i + 1 << " " << i * 2 << "\n";
    }
    rep(j, 1, N) {
        cout << j << " 1";
        rep(k, 0, j - 1) {
            cout << " " << k * 2 + 2;
        }
        cout << "\n";
    }
    rep(j, 2, N) {
        cout << j - 1 << " 3";
        rep(k, 0, j - 2) {
            cout << " " << k * 2 + 4;
        }
        cout << "\n";
    }
    rep(i, 2, N) {
        rep(j, i + 1, N) {
            cout << j - 1;
            for (int k = i; k > 2; k--) {
                cout << " " << k * 2 - 2;
            }
            cout << " 2";
            cout << " " << (i + 1) * 2 - 1;
            rep(k, i + 1, j) {
                cout << " " << k * 2;
            }
            cout << "\n";
        }
    }
}
/*
 *
 * メタ推理をすると
 * M = (N - 2) * 2 + 1
 * なので、0, 1 だけ特別視して、
 * なんとかできないかな
 * i - 0 - k - 1 - j
 * みたいな
 * これが 2 * i + 4 * k + 2 * j + 2
 * 平方数は (mod 4) + 1 なので、これだとダメそう
 * 0 - 1 を 3 だとして、
 * i - 0 - k - 1 - 0 - j
 * 2 * i + 4 * k + 5 + 2 * j
 * (i + j) が偶数ならこっちにする
 * 単純パスじゃないじゃん
 *
 * 1 - 2 - ... - (N - 1)
 * かつ、0 から任意の頂点へ辺があるとする
 * 1 - 2 : 4
 * 2 - 3 : 5
 * 3 - 4 : 7
 * ...
 * k : k + 1 : 2 * k + 1
 * これをすると、1 から [2, N) は easy
 * 0 - 1 : 3
 * 0 - i : 2 * (i - 1)
 * とすると、i < j は
 * i -> 1 -> 0 -> i + 1 -> j
 * 0 からは？
 * 0 - 4 に 16 を割り当てるといける？
 * これだと辺の数が足りないぜ
 * 全部繋げて、2 でいいのか
 * 賢いな
 *
 * 色々試行錯誤した結果、
 * ,3, 5, 7, 9
 * 1, 2, 4, 6 でいいということに？
 *
 * 4 を　2 回使っていいならできた
 *
 */