Clear questions and runnable code get the best and fastest answer 

PerlMonks 
Re: How to compare two undirected graphs?by LanX (Canon) 
on Oct 18, 2010 at 12:56 UTC ( #865925=note: print w/ replies, xml )  Need Help?? 
Your description is confusing. Comparing the "shape" sound like a isomorphism test. In this case be aware that the "graph isomorphism problem" is NPcomplete. Then you say your nodes are already named and have "children". General graphs have no children they have neighbours. So maybe you are speaking of trees or lattices (which have a bottom and a top element). But names and other properties should simplify the comparison it can be easier to normalize both graph according those weights and consequently ordering the nodes. This depends on the memory representation, e.g. when taking an incidence matrix of both graphs you can order rows and columns according to the associated weights (e.g. first row/column representing the "top node" and so on). Graphs with the same incidence matrix after permutation are isomorphic. Of course this becomes more complicated when having a nontrivial automorphism group in large graphs which is the reason for the mentioned NPcompleteness. In short there is no general fast solution for arbitrary graphs when they get big, but "a number of important special cases of the graph isomorphism problem have efficient, polynomialtime solutions"
Cheers Rolf UPDATE:added links
In Section
Seekers of Perl Wisdom

