| LIB "cisimplicial.lib";
intmat A[2][5] = 60,0,140,150,21,0,60,140,150,21;
print(A);
==> 60 0 140 150 21
==> 0 60 140 150 21
printlevel = 0;
isCI(A);
==> // It is a complete intersection
==> 1
printlevel = 1;
isCI(A);
==> // Generators of the toric ideal
==> toric[1]=-x(1)^7*x(2)^7+x(3)^3
==> toric[2]=x(5)^10-x(1)*x(2)*x(4)
==> toric[3]=-x(1)^5*x(2)^5+x(4)^2
==> // It is a complete intersection
==> 1
intmat B[3][5] = 12,0,0,1,2,0,10,0,3,2,0,0,8,3,3;
print(B);
==> 12 0 0 1 2
==> 0 10 0 3 2
==> 0 0 8 3 3
isCI(B);
==> // It is NOT a Complete Intersection.
==> 0
printlevel=0;
|