i1 : R = QQ[x,y,z, MonomialOrder => {Eliminate 0, Eliminate 1}]
o1 = R
o1 : PolynomialRing
i2 : selectInSubring(1,vars R)
o2 = | y z |
1 2
o2 : Matrix R <--- R
i4 : R = QQ[x,y,z, MonomialOrder => {Eliminate 1, Eliminate 1}]
o4 = R
o4 : PolynomialRing
i5 : selectInSubring(1,vars R)
o5 = | y z |
1 2
o5 : Matrix R <--- R
i6 : R = QQ[x,y,z, MonomialOrder => {Eliminate 2, Eliminate 1}]
o6 = R
o6 : PolynomialRing
i7 : selectInSubring(1,vars R)
o7 = | z |
1 1
o7 : Matrix R <--- R
I think we should fix that by retaining those blocks, rather than by writing special purpose code to compensate for their absence (which we have already had to do once before). Then the answer on o2 above would be | x y z |. Any comments?
Your first example illustrates that M2 is expecting both source and target to by polynomial rings. We should fix that, too.
> --
> You received this message because you are subscribed to the Google Groups "Macaulay2" group.
> To post to this group, send email to maca...@googlegroups.com.
> To unsubscribe from this group, send email to macaulay2+...@googlegroups.com.
> For more options, visit this group at http://groups.google.com/group/macaulay2?hl=en.
Your first example illustrates that M2 is expecting both source and target to by polynomial rings. We should fix that, too.
-- Mike
>
> I have needed to take the kernel of a map from a polynomial ring to a function field on numerous occasions, and if that ends up being fixed along with the map-to-QQ case, then excellent!
>
I think that already works:
i1 : F = frac(QQ[x,y])
o1 = F
o1 : FractionField
i2 : f = map(F,QQ[r,s,t],{x/y,x^2/(y-1),x+y})
2
x x
o2 = map(F,QQ[r, s, t],{-, -----, x + y})
y y - 1
o2 : RingMap F <--- QQ[r, s, t]
i3 : ker f
2 2 2
o3 = ideal(r t + r s - r*s*t + 2r*s - s*t + s)
o3 : Ideal of QQ[r, s, t]