Odoc_dep.Depval set_to_list : String.Set.t -> String.Set.elt listtype node = {id : id;mutable near : String.Set.t;mutable far : (id * String.Set.t) list;reflex : bool;}type graph = node listval trans_closure : node list -> String.Set.t -> node -> String.Set.tval compute_trans_closure : node list -> unit