#include <bits/stdc++.h>
using namespace std;
inline long long rd() {
  long long x = 0;
  int ch = getchar(), f = 1;
  while (!isdigit(ch) && (ch != '-') && (ch != EOF)) ch = getchar();
  if (ch == '-') {
    f = -1;
    ch = getchar();
  }
  while (isdigit(ch)) {
    x = (x << 1) + (x << 3) + ch - '0';
    ch = getchar();
  }
  return x * f;
}
inline void rt(long long x) {
  if (x < 0) putchar('-'), x = -x;
  if (x >= 10)
    rt(x / 10), putchar(x % 10 + '0');
  else
    putchar(x + '0');
}
struct cyc {
  vector<int> v;
  void print() {
    rt(v.size()), putchar(' ');
    for (int i = int(0); i <= (int)(v.size() - 1); i++) rt(v[i]), putchar(' ');
    putchar('\n');
  }
  void p(int x) { v.push_back(x); }
};
vector<cyc> ans;
void pt(int a, int b, int c) {
  cyc x;
  x.p(a), x.p(b), x.p(c), ans.push_back(x);
}
void pt(int a, int b, int c, int d) {
  cyc x;
  x.p(a), x.p(b), x.p(c), x.p(d), ans.push_back(x);
}
int n;
int main() {
  n = rd();
  if (n % 2 == 0) {
    pt(1, 2, 3), pt(1, 2, 4), pt(3, 4, 1), pt(3, 4, 2);
    for (int i = 5; i <= n; i += 2) {
      pt(1, i, i + 1), pt(2, i, i + 1), pt(1, i, 2, i + 1);
      for (int j = 3; j < i; j += 2)
        pt(i, j, i + 1, j + 1), pt(i, j, i + 1, j + 1);
    }
  } else {
    for (int i = 2; i <= n; i += 2) {
      pt(1, i, i + 1), pt(1, i, i + 1);
      for (int j = 2; j < i; j += 2)
        pt(i, j, i + 1, j + 1), pt(i, j, i + 1, j + 1);
    }
  }
  rt(ans.size()), putchar('\n');
  for (int i = int(0); i <= (int)(ans.size() - 1); i++) ans[i].print();
}
