// http://infoarena.ro/problema/ctc

#include <fstream>

using namespace std;

int n, m, ni, a[2000][2000], t[2000][2000], v[2000], vt[2000], nr, s[2000][2000];
bool p[2000];
ifstream fi("ctc.in");
ofstream fo("ctc.out");

void DFS (int nc) {
  int i;

  for (i = 1; i <= n; i++) // pentru fiecare nod
    if (a[nc][i] == 1 and v[i] == 0) {// i este vecin nevizitat al nodului curent?
      v[i] = 1;// Marcam i ca fiind vizitat.
      DFS(i);// Continuam parcurgerea in adancime.
    }
}

void DFSt (int nc) { // nodul curent
  int i;

  for (i = 1; i <= n; i++) // pentru fiecare nod
    if (t[nc][i] == 1 and vt[i] == 0) {// i este vecin nevizitat al nodului curent?
      vt[i] = 1;// Marcam i ca fiind vizitat.
      DFSt(i);// Continuam parcurgerea in adancime.
    }
}

int main() {
  int i, j, l, c;

  fi >> n >> m;  // Se citeste numarul de noduri si numarul de muchii.
  for (i = 1; i <= m; i++) {// Pentru fiecare muchie
    fi >> l >> c;// Se citesc informatiile despre o arc.
    a[l][c] = 1; t[c][l] = 1;// Se actualizeaza matricea de adiacenta/
  }
  for (i = 1; i <= n; i++)
    p[i] = true;
  for (i = 1; i <= n; i++) {
    if (v[i] == 0 and p[i]) {
      v[i] = 1; vt[i] = 1;
      nr++; l = 0;
      DFS(i);
      DFSt(i);
      for (j = 1; j <= n; j++)
        if (v[j] + vt[j] == 2) { // i face parte din componenta tare conexa curenta
          l++; s[nr][l] = j; p[j] = false;
        }
      s[nr][0] = l;
      for (j = 1; j <= n; j++)  // La urmatoarea parcurgere niciun nod nu este vizitat
        v[j] = vt[j] = 0;
    }
  }
  fo << nr << endl;
  for (c = 1; c <= nr; c++) { // Scriem pe rand componentele.
    for (n = 1; n <= s[c][0]; n++)
      fo << s[c][n] << ' ';
    fo << endl;
  }
  return 0;
}