-- -*- M2-comint -*- hash: 5941945382283793895

i1 : R = QQ[x,y]

o1 = R

o1 : PolynomialRing

i2 : I = ideal(x*(y^3-1),x^2)

               3       2
o2 = ideal (x*y  - x, x )

o2 : Ideal of R

i3 : cv = isCellular (I,ReturnCellVars=>true)

o3 = {y}

o3 : List

i4 : ud = cellularBinomialUnmixedDecomposition (I,CellVariables=>cv)

                3       2
o4 = {ideal (x*y  - x, x )}

o4 : List

i5 : 
