| LIB "sing.lib";
int p = printlevel;
printlevel = 1;
ring r = 199,(x,y,z,u,v),(c,ws(4,3,2,3,4));
ideal i = xz-y2,yz2-xu,xv-yzu,yu-z3,z2u-yv,zv-u2;
//a cyclic quotient singularity
list L = T_12(i,1);
==> // dim T_1 = 5
==> // dim T_2 = 3
print(L[5]); //matrix of infin. deformations
==> 0, 0, 0, 0, 0,
==> yz, y, z2, 0, 0,
==> -z3,-z2,-zu,yz, yu,
==> -z2,-z, -u, 0, 0,
==> zu, u, v, -z2,-zu,
==> 0, 0, 0, u, v
printlevel = p;
|