trivialDeformations -- Compute the trivial deformations.

i1 : R=QQ[x_0..x_4];

i2 : addCokerGrading(R)

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

              5       4
o2 : Matrix ZZ  <-- ZZ

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

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

o3 : Ideal of R

i4 : C=idealToComplex I

o4 = 1: x x  x x  x x  x x  x x  
         0 2  0 3  1 3  1 4  2 4

o4 : complex of dim 1 embedded in dim 4 (printing facets)
     equidimensional, simplicial, F-vector {1, 5, 5, 0, 0, 0}, Euler = -1

i5 : T=trivialDeformations C

      x   x   x   x   x   x   x   x   x   x   x   x   x   x   x   x   x   x  
       1   2   3   4   0   2   3   4   0   1   3   4   0   1   2   4   0   1 
o5 = {--, --, --, --, --, --, --, --, --, --, --, --, --, --, --, --, --, --,
      x   x   x   x   x   x   x   x   x   x   x   x   x   x   x   x   x   x  
       0   0   0   0   1   1   1   1   2   2   2   2   3   3   3   3   4   4 
     ------------------------------------------------------------------------
     x   x
      2   3
     --, --}
     x   x
      4   4

o5 : List

i6 : tally apply(T,isTrivial)

o6 = Tally{true => 20}

o6 : Tally