···1122+ - [Cycles.Johnson]: Enumerate elementary cycles (Johnson, 1975)
33+ (contributed by Timothy Bourke)
24 - [Traverse.Bfs]: new function `{fold,iter}_component_dist` to
35 perform a breadth-first traversal with the distance from the source
46
+1-1
src/cycles.mli
···8080 val fold_succ : (V.t -> 'a -> 'a) -> t -> V.t -> 'a -> 'a
8181end
82828383-(** Implementation of Johnson's 1975 algoirthm for "Finding all the Elementary
8383+(** Implementation of Johnson's 1975 algorithm for "Finding all the Elementary
8484 Cycles of a Directed Graph". It does not do any preprocessing, i.e., no
8585 removal of self-loops and no dissection into strongly connected
8686 components.