source: git/Tst/Plural/doc-poly-expr.tst @ a6e7454

spielwiese
Last change on this file since a6e7454 was a6e7454, checked in by Viktor Levandovskyy <levandov@…>, 20 years ago
nontrivial examples from Plural doc git-svn-id: file:///usr/local/Singular/svn/trunk@6653 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 377 bytes
Line 
1LIB "tst.lib";
2tst_init();
3ring r=0,(x,y),dp;
4poly f = 10x2y3 +2x2y2-2xy+y -x+2;
5lead(f);
6leadmonom(f);
7simplify(f,1);     // normalize leading coefficient
8poly g = 1/2x2 + 1/3y;
9cleardenom(g);
10int i = 102;
11poly(i);
12typeof(_);
13kill(r);
14ring r=0,(x,y),dp;
15system("PLURAL",1,1);
16// it is a Weyl algebra
17r;
18yx;      // not correct input
19y*x;     // correct input
20tst_status(1);$
Note: See TracBrowser for help on using the repository browser.