TaskResult.Arg
module Node : MyARG.Node
module Edge : MyARG.Edge
val main_entry : Node.t
val next : Node.t -> (Edge.t * Node.t) list