/**/ Use R ::= QQ[x,y,z];
/**/ F := 3*x^2*y + 5*y^3 - x*y^5;
/**/ coefficients(F);
[-1, 3, 5]
ScalarProduct(Coefficients(F), Support(F)) = F;
True
-------------------------------
V := Vector(3x^2+y, x-5z^3); --***OBSOLETE MANUAL: WORK IN PROGRESS***
Coefficients(V);
[-5, 3, 1, 1]
-------------------------------
ScalarProduct(Coefficients(V), Support(V)) = V;
True
-------------------------------
/**/ coefficients(x^3*z+x*y+x*z+y+2*z, x);
[z, 0, y + z, y + 2z]
-------------------------------
/**/ F := (1 + 2x + 3y^4 + 5z^6)^7;
/**/ Skeleton := [1, x^3, y^12, z^19, x^2*y^8*z^12];
/**/ coefficients(F, Skeleton);
[1, 280, 945, 0, 567000]
|