source: git/Tst/Manual/algebra_containment.tst @ 7bb006

spielwiese
Last change on this file since 7bb006 was 894057, checked in by Oleksandr Motsak <motsak@…>, 13 years ago
ADD: Tests from online manual (res+stat on mamawutz): short ones Tst/Manual/s.lst
  • Property mode set to 100644
File size: 404 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "algebra.lib";
3int p = printlevel; printlevel = 1;
4ring R = 0,(x,y,z),dp;
5ideal A=x2+y2,z2,x4+y4,1,x2z-1y2z,xyz,x3y-1xy3;
6poly p1=z;
7poly p2=
8x10z3-x8y2z3+2x6y4z3-2x4y6z3+x2y8z3-y10z3+x6z4+3x4y2z4+3x2y4z4+y6z4;
9algebra_containment(p1,A);
10algebra_containment(p2,A);
11list L = algebra_containment(p2,A,1);
12L[1];
13def S = L[2]; setring S;
14check;
15printlevel = p;
16tst_status(1);$
Note: See TracBrowser for help on using the repository browser.