#include<fstream>
#include<cstdlib>
using namespace std;
int n,m,nrc;
int *A[100010],*AT[100010]; //graful si graful transpus
int postordine[100010],nr;
bool vizitat[100010];
int *componenta[100010];

void DFS(int x)
{
	int i;
	vizitat[x]=true;
	for(i=1;i<=A[x][0];i++)
	{
		if(vizitat[A[x][i]]==false)
			DFS(A[x][i]);
	}
	postordine[++nr]=x; //numerotez nodurile grafului in postordine
	//nodul x este numerotat dupa ce toti succesorii sai au fost numerotati
}

void DFST(int x)
{
	int i;
	vizitat[x]=false;
	componenta[nrc][0]++;
	componenta[nrc]=(int*)realloc(componenta[nrc],(componenta[nrc][0]+1)*sizeof(int));
	componenta[nrc][componenta[nrc][0]]=x;
	for(i=1;i<=AT[x][0];i++)
	{
		if(vizitat[AT[x][i]]==true)
			DFST(AT[x][i]);
	}
}

int main()
{
	int i,x,y,j;
	ifstream fin("ctc.in");
	fin>>n>>m;
	for(i=1;i<=n;i++)
	{
		A[i]=(int *)realloc(A[i],sizeof(int));
		A[i][0]=0;
		AT[i]=(int *)realloc(AT[i],sizeof(int));
		AT[i][0]=0;
	}
	for(i=1;i<=m;i++)
	{
		fin>>x>>y;
		//construiesc graful
		A[x][0]++;
		A[x]=(int *)realloc(A[x],(A[x][0]+1)*sizeof(int));
		A[x][A[x][0]]=y;
		//construiesc graful transpus
		AT[y][0]++;
		AT[y]=(int *)realloc(AT[y],(AT[y][0]+1)*sizeof(int));
		AT[y][AT[y][0]]=x;
	}
	fin.close();
	
	//parcurgem graful DFS determinand ordinea nodurilor
	for(i=1;i<=n;i++)
	{
		if(vizitat[i]==false)
			DFS(i);
	}
	
	for(i=1;i<=n;i++)
	{
		componenta[i]=(int*)realloc(componenta[i],sizeof(int));
		componenta[i][0]=0;
	}
	//parcurgem DFS graful transpus,prelucrand nodurile in postordine
	for(i=n;i>0;i--)
	{
		if(vizitat[postordine[i]]==true)
		{
			//componenta tare-conexa a nodului curent nu a fost determinata
			nrc++;
			DFST(postordine[i]);
		}
	}
	ofstream fout("ctc.out");
	fout<<nrc<<"\n";
	for(i=1;i<=nrc;i++)
	{
		for(j=1;j<=componenta[i][0];j++)
			fout<<componenta[i][j]<<' ';
		fout<<"\n";
	}
	fout.close();
	return 0;
}