i1 : R=QQ[x,y,z,w]; |
i2 : V0=matrix({{0,1,2,3},{-1,1,2,1}});
2 4
o2 : Matrix ZZ <--- ZZ
|
i3 : intersectionValRings(V0,R)
2
o3 = QQ[w, z, y, x*w, x*z, x*y, x z]
o3 : monomial subalgebra of R
|
The object intersectionValRings is a method function with options.