source: git/Tst/Buch/Example_B_7_5.tst @ a7efa79

spielwiese
Last change on this file since a7efa79 was a7efa79, checked in by Hans Schönemann <hannes@…>, 16 years ago
*hannes: new book version git-svn-id: file:///usr/local/Singular/svn/trunk@10182 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 361 bytes
RevLine 
[a7efa79]1LIB "tst.lib";
2tst_init();
3
4==================================== example B.7.5 =======================
5
6LIB"absfact.lib"; 
7
8ring R1=0,(x,y),dp;
9poly f=(x2+y2)^3*(x3+y2)^5*(x4+4)^2;
10def S1 =absFactorize(f);
11setring(S1);
12absolute_factors;
13
14ring R2=0,(x,y,z,w),dp;
15poly f=(x2+y2+z2)^2+w4;
16def S2 =absFactorize(f);
17setring(S2);
18absolute_factors;
19
20tst_status(1);$
21
Note: See TracBrowser for help on using the repository browser.