source: git/Tst/Old/coef.tst @ b35b93

spielwiese
Last change on this file since b35b93 was b35b93, checked in by Olaf Bachmann <obachman@…>, 26 years ago
This commit was generated by cvs2svn to compensate for changes in r1396, which included commits to RCS files with non-trunk default branches. git-svn-id: file:///usr/local/Singular/svn/trunk@1397 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 568 bytes
Line 
1//---------------------------------------------
2// an error of 0.8.8f (duco)
3ring  r11=5,(s,x(1..5),y(1..5)),(dp(1),dp(10));
4short=1;
5map taylor=r11,s,1+s*x(1),1+s*x(2),1+s*x(3),1+s*x(4),1+s*x(5),1+s*y(1),1+s*y(2),1+s*y(3),1+s*y(4),1+s*y(5);
6poly form=x(1)*x(2)*x(3)*x(4)*x(5)-y(1)*y(2)*y(3)*y(4)*y(5);
7poly ontw=taylor(form);
8ontw;
9matrix ce=coef(ontw,s);
10ce;  //ergebnis ist falsch; mit char=7 aber richtig.
11kill r11;
12//-------------------------------------------------
13//an error of 0.8.8c (martin)
14ring r=32003,(x,y),ds;
15poly f=1+444x+xy+x3y;
16coef(f,x);
17kill r;
18$
Note: See TracBrowser for help on using the repository browser.