source: git/Tst/Short/bug_42.tst @ 0054e7

spielwiese
Last change on this file since 0054e7 was 9491d6, checked in by Hans Schönemann <hannes@…>, 18 years ago
*pfister/hannes: bug_42 fixed git-svn-id: file:///usr/local/Singular/svn/trunk@9125 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 426 bytes
Line 
1LIB "tst.lib";
2tst_init();
3// error in radical with powers of polynomials in the ideal
4LIB "primdec.lib";
5ring r = (0, b, c, h), (a, d, e, f, g, i), (C, lp);
6poly p1 =(b2)*i2+(-2bch)*i+(c2h2);
7poly p2 =(c)*g2+gi2;
8poly p3 =(h)*f+(c)*g+i2;
9poly p4 =(h)*e+(b)*g+(h)*i;
10poly p5 =d;
11poly p6 =(c)*a+(b)*f+(c)*i;
12ideal i = p1, p2, p3, p4, p5, p6;
13zero_decomp(std(i), ideal(1), 0);
14zero_decomp(std(i), ideal(1), 1);
15
16tst_status(1);$
Note: See TracBrowser for help on using the repository browser.