source: git/Tst/Manual/is_regs.tst @ 6fb723

spielwiese
Last change on this file since 6fb723 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: 249 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "sing.lib";
3int p      = printlevel;
4printlevel = 1;
5ring r1    = 32003,(x,y,z),ds;
6ideal i    = x8,y8,(x+y)^4;
7is_regs(i);
8module m   = [x,0,y];
9i          = x8,(x+z)^4;;
10is_regs(i,m);
11printlevel = p;
12tst_status(1);$
Note: See TracBrowser for help on using the repository browser.