-- -*- M2-comint -*- hash: 11422385270271471702

i1 : R=QQ[x_0..x_4]

o1 = R

o1 : PolynomialRing

i2 : m=vector {1,-2,1,0,0}

o2 = |  1 |
     | -2 |
     |  1 |
     |  0 |
     |  0 |

       5
o2 : ZZ

i3 : laurent(m,R)

     x x
      0 2
o3 = ----
       2
      x
       1

o3 : frac R

i4 : R=QQ[x_0..x_4]

o4 = R

o4 : PolynomialRing

i5 : addCokerGrading(R);

              5       4
o5 : Matrix ZZ  <-- ZZ

i6 : I=ideal(x_0*x_1,x_1*x_2,x_2*x_3,x_3*x_4,x_4*x_0)

o6 = ideal (x x , x x , x x , x x , x x )
             0 1   1 2   2 3   3 4   0 4

o6 : Ideal of R

i7 : mg=mingens I;

             1      5
o7 : Matrix R  <-- R

i8 : f=firstOrderDeformation(mg, vector {-1,-1,0,2,0})

       2
      x
       3
o8 = ----
     x x
      0 1

o8 : first order deformation space of dimension 1

i9 : laurent f

       2
      x
       3
o9 = ----
     x x
      0 1

o9 : frac R

i10 : 
