Checks whether C1 and C2 are equal.
Uses the facets of C1 and C2 (as in many examples the Stanley-Reisner ideal cannot be computed as it is too big to write down).
i1 : R=QQ[x_0..x_4]; |
i2 : C=simplex R; |
i3 : bC=boundaryOfPolytope C o3 = 3: x x x x x x x x x x x x x x x x x x x x 0 1 2 3 0 1 2 4 0 1 3 4 0 2 3 4 1 2 3 4 o3 : complex of dim 3 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {1, 5, 10, 10, 5, 0}, Euler = -1 |
i4 : dbC=dualize bC o4 = 0: v v v v v 0 1 2 3 4 o4 : co-complex of dim 0 embedded in dim 4 (printing facets) equidimensional, simplicial, F-vector {0, 5, 10, 10, 5, 1}, Euler = 1 |
i5 : bC==dualize dbC o5 = true |