ambient S
This example shows how to recover the polynomial ring when a torus acted upon.
i1 : R = QQ[x_1..x_4] o1 = R o1 : PolynomialRing
i2 : T = diagonalAction(matrix {{0,1,-1,1},{1,0,-1,-1}}, R) * 2 o2 = R <- (QQ ) via | 0 1 -1 1 | | 1 0 -1 -1 | o2 : DiagonalAction
i3 : S = R^T o3 = 2 QQ[x x x , x x x ] 1 2 3 1 3 4 o3 : RingOfInvariants
i4 : ambient S o4 = R o4 : PolynomialRing