-- -*- M2-comint -*- {* hash: -1666455569 *} i1 : R = ZZ[x,y] o1 = R o1 : PolynomialRing i2 : f = random(R^2,R^{2:-1}) o2 = | 7x+2y 3x | | 4x 6x | 2 2 o2 : Matrix R <--- R i3 : g = vars R ++ vars R o3 = | x y 0 0 | | 0 0 x y | 2 4 o3 : Matrix R <--- R i4 : quotient(f,g) o4 = {1} | 7 3 | {1} | 2 0 | {1} | 4 6 | {1} | 0 0 | 4 2 o4 : Matrix R <--- R i5 : f = f + map(target f, source f, id_(R^2)) o5 = | 7x+2y+1 3x | | 4x 6x+1 | 2 2 o5 : Matrix R <--- R i6 : quotient(f,g) o6 = {1} | 7 3 | {1} | 2 0 | {1} | 4 6 | {1} | 0 0 | 4 2 o6 : Matrix R <--- R i7 :