[cl-graph-devel] Problem with find-connected-components

[Daniel Katz]

On Sep 9, 2007, at 10:25 PM, Gary King wrote:
> The problem you ran into was caused by some bit-rot in subgraph- 
> containing. I'll be updating the project soon but if you want to  
> keep experimenting, replace the current definition of find- 
> connected-components with this:
>
> (defmethod find-connected-components ((graph basic-graph))
>   (collect-elements
>    (make-iterator (connected-components graph) :unique t :transform  
> #'parent)
>    :transform
>    (lambda (component)
>      (subgraph-containing graph (element component)
>                           :depth most-positive-fixnum))))

This did the trick.  Thanks!

Dan