source: git/Tst/Long/eliminate_8.tst @ 0bc5ed4

spielwiese
Last change on this file since 0bc5ed4 was c961655, checked in by Olaf Bachmann <obachman@…>, 23 years ago
* added git-svn-id: file:///usr/local/Singular/svn/trunk@4903 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 1.5 KB
Line 
1LIB "tst.lib"; tst_init(); option(prot);
2
3ring w6=32003,(x(1..16)),dp;
4ideal i0=
5x(1)+x(2)+x(3)+x(4),
6x(1)^2*x(2)^2+x(2)*x(3)*x(5)*x(6)+x(3)*x(4)*x(9)*x(10)+x(4)*x(5)*x(13)*x(14),
7x(1)*x(2)^2*x(3)+x(2)*x(3)*x(6)*x(7),
8x(3)*x(4)*x(10)*x(11)+x(4)*x(5)*x(14)*x(15),
9x(1)*x(2)*x(3)*x(4)+x(2)*x(3)*x(7)*x(8),
10x(3)*x(4)*x(11)*x(12)+x(4)*x(5)*x(15)*x(16),
11x(1)*x(2)*x(4)*x(5)+x(2)*x(3)*x(8)*x(9),
12x(3)*x(4)*x(12)*x(13)+x(1)*x(4)*x(5)*x(16),
13x(1)*x(2)*x(5)*x(6)+x(5)*x(6)^2*x(7),
14x(7)*x(8)*x(9)*x(10)+x(8)*x(9)*x(13)*x(14),
15x(2)*x(3)*x(5)*x(6)+x(6)^2*x(7)^2+x(7)*x(8)*x(10)*x(11)+x(8)*x(9)*x(14)*x(15),
16x(3)*x(4)*x(5)*x(6)+x(6)*x(7)^2*x(8),
17x(7)*x(8)*x(11)*x(12)+x(8)*x(9)*x(15)*x(16),
18x(4)*x(5)^2*x(6)+x(6)*x(7)*x(8)*x(9),
19x(7)*x(8)*x(12)*x(13)+x(1)*x(8)*x(9)*x(16),
20x(1)*x(2)*x(9)*x(10)+x(5)*x(6)*x(10)*x(11),
21x(9)*x(10)*x(11)*x(12)+x(12)*x(13)^2*x(14),
22x(2)*x(3)*x(9)*x(10)+x(6)*x(7)*x(10)*x(11),
23x(10)*x(11)^2*x(12)+x(12)*x(13)*x(14)*x(15),
24x(3)*x(4)*x(9)*x(10)+x(7)*x(8)*x(10)*x(11)+x(11)^2*x(12)^2+
25x(12)*x(13)*x(15)*x(16),
26x(4)*x(5)*x(9)*x(10)+x(8)*x(9)*x(10)*x(11),
27x(11)*x(12)^2*x(13)+x(1)*x(12)*x(13)*x(16),
28x(1)*x(2)*x(13)*x(14)+x(5)*x(6)*x(14)*x(15),
29x(1)*x(13)*x(14)*x(16)+x(9)*x(10)*x(15)*x(16),
30x(2)*x(3)*x(13)*x(14)+x(6)*x(7)*x(14)*x(15),
31x(10)*x(11)*x(15)*x(16)+x(1)*x(14)*x(15)*x(16),
32x(3)*x(4)*x(13)*x(14)+x(7)*x(8)*x(14)*x(15),
33x(11)*x(12)*x(15)*x(16)+x(1)*x(15)*x(16)^2,
34x(4)*x(5)*x(13)*x(14)+x(8)*x(9)*x(14)*x(15)+x(12)*x(13)*x(15)*x(16)+
35x(1)^2*x(16)^2;
36
37eliminate(i0,x(1)*x(2));
38
39tst_status(1);$
Note: See TracBrowser for help on using the repository browser.