wolffd@0: % A - B
wolffd@0: %     |
wolffd@0: % D - C - E
wolffd@0: 
wolffd@0: A=1;B=2;C=3;D=4;E=5;
wolffd@0: dag = zeros(5,5);
wolffd@0: dag(A,B)=1;
wolffd@0: %dag(A,D)=1;
wolffd@0: dag(B,C)=1;
wolffd@0: dag(C,D)=1;
wolffd@0: dag(E,C)=1;
wolffd@0: [d, pre, post, cycle, f, pred] = dfs(dag, A, 0)
wolffd@0: 
wolffd@0: [T, pre, post, cycle] = mk_rooted_tree(dag, A)
wolffd@0: 
wolffd@0: %[T, pre, post, cycle] = mkRootedTree(dag, A)