-- -*- M2-comint -*- hash: 17371651025706802306

i1 : R = QQ[x,y,u,v, Degrees => {{1,0}, {1,0}, {0,1}, {0,1}}]

o1 = R

o1 : PolynomialRing

i2 : I = ideal(x*u, y*u, y*v) -- a birational map

o2 = ideal (x*u, y*u, y*v)

o2 : Ideal of R

i3 : degreeOfMapIter(I, 5)

o3 = 1

i4 : I = ideal(x*u, y*v, x*v + y*u) -- a non birational map

o4 = ideal (x*u, y*v, y*u + x*v)

o4 : Ideal of R

i5 : degreeOfMapIter(I, 5)

o5 = 2

i6 : A = matrix{ {x^5*u,  x^2*v^2},
                 {y^5*v, x^2*u^2},
                 {0,     y^2*v^2}
               };

             3      2
o6 : Matrix R  <-- R

i7 : I = minors(2, A)  -- a non birational

             7 3    2 5 3   5 2   2   7 3
o7 = ideal (x u  - x y v , x y u*v , y v )

o7 : Ideal of R

i8 : degreeOfMapIter(I, 5)

o8 = 10

i9 : 
