DA.Weight(F:POLY):INT
Use QQ[x[1..2,0..20]]; F:=x[1,2]^2x[1,1]3+x[2,1]; DA.Weight(F); 5 ------------------------------- F:=x[1,2]^2x[1,1]^3+x[2,1]; DA.Weight(F); 7 -------------------------------