S=QQ[q1,q2,q3,p1,p2,p3,x1,x2,x3,MonomialOrder=>Eliminate 6];
I=ideal(x1-q1^2-q2^2-q3^2,x2-p1^2-p2^2-p3^2,x3-q1*p1-q2*p2-q3*p3);
J=I+ideal(q1*p2-q2*p1,q1*p3-q3*p1,q2*p3-q3*p2)
selectInSubring(1,gens gb J)
________________________________________
From: maca...@googlegroups.com [maca...@googlegroups.com] on behalf of Hans-Christian Herbig [herb...@gmail.com]
Sent: Thursday, August 09, 2012 2:56 PM
To: maca...@googlegroups.com
Subject: [Macaulay2] intersection of an ideal with a subring
Hi,
I wonder whether one can use M2 for the following type of problem
(see below). I couldn't actually find it in the documentation.
I would like to determine the intersection of an ideal with
a subring.
EXAMPLE (related to rotation in QQ^3):
base ring:
R=QQ[q1,q2,q3,p1,p2,p3]
the ideal in R:
I=(q2*p3-q3*p2, q3^*p1-q1*p3, q1*p2-q2*p1)
Now I would like to intersect I with the subring S of R:
QQ[x1,x2,x3]
given by the polynomials
x1=q1*q1+q2*q2+q3*q3
x2=p1*p1+p2*p2+p3*p3
x3=q1*p1+q2?p2+q3*p3
Expected answer:
x3*x3-x1*x2 (Cauchy-Schwarz)
Comment: S is the subring of O(3) invariants in R.
Maybe somebody can give me a hint.
Many thanks and best regards, Hans-Christian Herbig
--
You received this message because you are subscribed to the Google Groups "Macaulay2" group.
To view this discussion on the web visit https://groups.google.com/d/msg/macaulay2/-/BGjH-8qCMzAJ.
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.