-- -*- M2-comint -*- {* hash: -1514543522 *} i1 : R=QQ[x_0..x_4] o1 = R o1 : PolynomialRing 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 : C0=simplex(R) o3 = 4: x x x x x 0 1 2 3 4 o3 : complex of dim 4 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {1, 5, 10, 10, 5, 1}, Euler = 0 i4 : I=ideal(x_0*x_1,x_1*x_2,x_2*x_3,x_3*x_4,x_4*x_0) o4 = ideal (x x , x x , x x , x x , x x ) 0 1 1 2 2 3 3 4 0 4 o4 : Ideal of R i5 : C=idealToComplex(I) o5 = 1: x x x x x x x x x x 0 2 0 3 1 3 1 4 2 4 o5 : complex of dim 1 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {1, 5, 5, 0, 0, 0}, Euler = -1 i6 : embeddingComplex C o6 = 4: x x x x x 0 1 2 3 4 o6 : complex of dim 4 embedded in dim 4 (printing facets) equidimensional, simplicial i7 : idealToComplex(I,C0) o7 = 1: x x x x x x x x x x 0 2 0 3 1 3 1 4 2 4 o7 : complex of dim 1 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {1, 5, 5, 0, 0, 0}, Euler = -1 i8 : complexToIdeal(C) o8 = ideal (x x , x x , x x , x x , x x ) 0 1 1 2 2 3 0 4 3 4 o8 : Ideal of R i9 : cC=idealToCoComplex(I,C0) o9 = 2: x x x x x x x x x x x x x x x 0 1 3 0 2 3 0 2 4 1 2 4 1 3 4 o9 : co-complex of dim 2 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {0, 0, 0, 5, 5, 1}, Euler = 1 i10 : cC==complement C o10 = true i11 : I==coComplexToIdeal(cC) o11 = true i12 : dualize cC o12 = 1: v v v v v v v v v v 0 2 0 3 1 3 1 4 2 4 o12 : complex of dim 1 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {1, 5, 5, 0, 0, 0}, Euler = -1 i13 :