@Carl Love I know:P.....I've also tried Tree := Tree, {whattype(expr)},{whattype(elem)}; but I get the same error...what can I do?

@Carl Love I know:P.....I've also tried Tree := Tree, {whattype(expr)},{whattype(elem)}; but I get the same error...what can I do?

I replaced Tree := Tree, {whattype(elem),elem} with Tree := Tree, {whattype(elem)} and I get the following output and error :

Error, (in GraphTheory:-Graph) invalid edge/arc: {2}

I replaced Tree := Tree, {whattype(elem),elem} with Tree := Tree, {whattype(elem)} and I get the following output and error :

Error, (in GraphTheory:-Graph) invalid edge/arc: {2}

I see....What do you recommend I should do?

I see....What do you recommend I should do?

@Carl Love Well this is what I was going to ask you ...how can I extend it to for expression that have int,diff, cos or sine in them(cos(x)^2+....) or expressions of the form x=y+z....or in other world ca I make it possible to process almost all math expressions?
Last but not least what should I do if I want to add some colour to differentiate between constants and variables,etc?

What I get for cos(x)^2+1....for the rest of exprs in similair

@Carl Love Well this is what I was going to ask you ...how can I extend it to for expression that have int,diff, cos or sine in them(cos(x)^2+....) or expressions of the form x=y+z....or in other world ca I make it possible to process almost all math expressions?
Last but not least what should I do if I want to add some colour to differentiate between constants and variables,etc?

What I get for cos(x)^2+1....for the rest of exprs in similair

I works fine on Maple 15.:)

I works fine on Maple 15.:)

No worries ....your command works however at the expense of producing an incomplete graph...this is for Func:= ToInert(x+2*y*z^2)...it produces a directed unweighted graph with 3 vertices and 2 arc(s) instead of 9 vertices and 8 arcs

No worries ....your command works however at the expense of producing an incomplete graph...this is for Func:= ToInert(x+2*y*z^2)...it produces a directed unweighted graph with 3 vertices and 2 arc(s) instead of 9 vertices and 8 arcs

@Carl Love I'm using the worksheet provided by you and I followed your instructions,My version of maple is 13.

@Carl Love I'm using the worksheet provided by you and I followed your instructions,My version of maple is 13.

@CarlLove Also can I extent your scheme to abbreviate the vertex labels in such a way what integrals and diff equations are also processed?