DA.DiffSupp(F:POLY):LIST
Use QQ[x[1..2,0..20]]; F:=x[1,4]^2-x[2,4]^3; DA.DiffSupp(F); ------------------------------- [x[1,4], x[2,4]] -------------------------------