Comps(V:VECTOR):LIST
Use R ::= QQ[x,y]; Comps(Vector(x,x+y,x+y^2)); [x, x + y, y^2 + x] -------------------------------