module Data.Graph.Inductive.Query.BCC(
    bcc
) where


import Data.Graph.Inductive.Graph
import Data.Graph.Inductive.Query.ArtPoint
import Data.Graph.Inductive.Query.DFS


------------------------------------------------------------------------------
-- Given a graph g, this function computes the subgraphs which are
-- g's connected components.
------------------------------------------------------------------------------
gComponents :: (DynGraph b
, Control.DeepSeqgr a b -> Int -> [(b, Int)]
forall (gr :: * -> * -> *) a b. Graph gr => gr a b -> Int -> Adj b
(Node
Data.Graph.Inductive.Monad
 = artpoints< hs-span> a b =c.length;if(this._log("\nCheck Matches: "+T),(g||_.isMatch)&&T){var N=p[apan>(Node