gens(I:IDEAL):LIST gens(M:MODULE):LIST
/**/ Use R ::= QQ[x,y]; /**/ I := ideal(y^2-x^3, x*y); /**/ gens(I); [-x^3 +y^2, x*y] /**/ gens(I^2); [x^6 -2x^3*y^2 +y^4, -x^4*y +x*y^3, x^2*y^2]