Cod sursa(job #485256)

Utilizator darkseekerBoaca Cosmin darkseeker Data 17 septembrie 2010 18:18:32
Problema Ciclu Eulerian Scor 10
Compilator cpp Status done
Runda Arhiva educationala Marime 2.03 kb
#include <list>
#include <cstdlib>
#include <cstdio>
#include <queue>
#define MAXN 100010
#define MAXM 500010
#define pb push_back
using namespace std;
list<int> v[MAXN];
queue<int> q;
int c[MAXM],c1[MAXM],g[MAXN],n,m;
bool viz[MAXN];
FILE *fin=freopen("ciclueuler.in","r",stdin);
FILE *fout=freopen("ciclueuler.out","w",stdout);
void citeste(void)
{
	int e1,e2,i;
	fscanf(fin,"%d %d",&n,&m);
	for(i=1;i<=m;i++)
	{
		fscanf(fin,"%d %d",&e1,&e2);
		v[e1].pb(e2);
		v[e2].pb(e1);
		g[e1]++;
		g[e2]++;
	}
}
bool grad_par()
{
	int i;
	for(i=1;i<=n;i++)
		if(g[i]%2!=0)
			return 0;
		return 1;
}
void dfs()
{
	list<int>::iterator it;
	q.push(1);
	while(!q.empty())
	{
		for(it=v[q.front()].begin();it!=v[q.front()].end();it++)
			if(!viz[*it])
			{
				q.push(*it);
				viz[*it]=1;
			}
			q.pop();
	}
}
bool conex()
{
	int i;
	dfs();
	for(i=1;i<=n;i++)
		if(!viz[i])
			return 0;
	return 1;
}
void erase(int e1,int e2)
{	
	g[e1]--;
	g[e2]--;
	list<int>::iterator it;
	for(it=v[e1].begin();it!=v[e1].end();it++)
		if(*it==e2)
			{
				v[e1].erase(it);
				break;
		}
	for(it=v[e2].begin();it!=v[e2].end();it++)
		if(*it==e1)
			{
				v[e2].erase(it);
				break;
		}
}
		
bool eulerian()
{
	if(grad_par()&&conex())
		return 1;
	else
		return 0;
}
void ciclu()
{
	int p,x,i,base=1,top=0,pozx;
	c[1]=1;
	do
	{
		base++;
		c[base]=v[c[base-1]].front();
		erase(c[base],c[base-1]);
	}while(c[base]!=1);
	while(base-1<m)
	{
		for(i=1;i<=base-1;i++)
			if(!v[c[i]].empty())
			{
				x=i;
				i=base-1;
			}
	p=1;
	c1[p]=x;
	do
	{
		p++;
		c1[p]=v[c1[p-1]].front();
		erase(c1[p],c1[p-1]);
	}while(c1[p]!=x);
	for(i=1;i<=base;i++)
		if(c[i]==x)
		{
			pozx=i;
			i=base;
		}
	for(i=1;i<=base;i++)
		if(i>pozx)
			c[p-1+i]=c[i];
	for(i=2;i<=p;i++)
		c[pozx+i-1]=c1[i];
	base+=p-1;
	}
}
int main()
{
	citeste();
	if(!eulerian())
		fprintf(fout,"%d",-1);
	else
	{
		ciclu();
		for(int i=1;i<=m;i++)
			fprintf(fout," %d",c[i]);
	}
	return 0;
}