-- -*- M2-comint -*- hash: 13563708675191590637

i1 : R = ring(hirzebruchSurface(2, Variable => y))

o1 = R

o1 : PolynomialRing

i2 : E = dualRingToric(R, SkewVariable => f)

o2 = E

o2 : PolynomialRing, 4 skew commutative variable(s)

i3 : RY = dualRingToric E

o3 = RY

o3 : PolynomialRing

i4 : degrees RY == degrees R

o4 = true

i5 : S = ZZ/101[x,y,z, Degrees => {1,1,2}]

o5 = S

o5 : PolynomialRing

i6 : E' = dualRingToric S

o6 = E'

o6 : PolynomialRing, 3 skew commutative variable(s)

i7 : coefficientRing E' === coefficientRing S

o7 = true

i8 : 
