source: git/Tst/Short/bug_quotient.tst @ 051432

spielwiese
Last change on this file since 051432 was c1b787, checked in by Hans Schönemann <hannes@…>, 14 years ago
bug in quotient fixed (see Short/bug_quotient.tst) git-svn-id: file:///usr/local/Singular/svn/trunk@12413 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 506 bytes
Line 
1LIB "tst.lib";
2tst_init();
3
4ring S=0,(x,y,z,u,v),dp;
5ideal I;
6I[1]=6z-1;
7I[2]=6y-1;
8I[3]=12x+6u+6v+1;
9I[4]=12u2+12v2-1;
10I[5]=432v4-36v2+1;
11dim(std(I));
12//option(prot);
13def J=quot(module(I),module(ideal(xyzuv)),1);
14dim(std(J));kill J;
15def J=quot(module(I),module(ideal(xyzuv)),2);
16dim(std(J));kill J;
17def J=quot(module(I),module(ideal(xyzuv)),3);
18dim(std(J));kill J;
19def J=quot(module(I),module(ideal(xyzuv)),4);
20dim(std(J));
21J;kill J;
22def J=quotient(I,ideal(xyzuv));
23dim(std(J));
24J;kill S;
25tst_status(1);$
Note: See TracBrowser for help on using the repository browser.