load "Graph_res.mgm";
	

Compare := procedure(G,l,m,n)


	
	<#G, l, m, n>;
	Graph(G,l,m,n);
	

	end procedure;