Changeset 6328e6 in git for Singular/LIB/normal.lib

Timestamp:

Jun 17, 1998, 11:23:17 AM (26 years ago)

Author:

Gerhard Pfister <pfister@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

b36a605f72f6fa1deb19ac35b765fdc465b701c1

Parents:

18170d05793a142f0b1462ba66b211e5e02f8a22

Message:

* better examples


git-svn-id: file:///usr/local/Singular/svn/trunk@2179 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/LIB/normal.lib (modified) (4 diffs)

Singular/LIB/normal.lib

@@ -6 +6 @@
 ///////////////////////////////////////////////////////////////////////////////
 
-version="$Id: normal.lib,v 1.6 1998-05-14 18:45:10 Singular Exp $";
+version="$Id: normal.lib,v 1.7 1998-06-17 09:23:17 pfister Exp $";
 info="
 LIBRARY: normal.lib: PROCEDURE FOR NORMALIZATION (I)
@@ -652 +652 @@
 example
 { "EXAMPLE:"; echo = 2;
-   ring  r = 0,(x,y,z),dp;
-
+ //Theo1
+ ring r=32003,(x,y,z),wp(2,3,6);
+ ideal i=zy2-zx3-x6;
+
+ list pr=normal(i);
+ def r1=pr[1];
+ setring r1;
+ KK;
+ setring r;
 }
 
@@ -1225 +1232 @@
 example
 { "EXAMPLE:";echo = 2;
-   LIB"normal.lib";
-   //Huneke
-ring qr=31991,(a,b,c,d,e),dp;
-ideal i=
-5abcde-a5-b5-c5-d5-e5,
-ab3c+bc3d+a3be+cd3e+ade3,
-a2bc2+b2cd2+a2d2e+ab2e2+c2de2,
-abc5-b4c2d-2a2b2cde+ac3d2e-a4de2+bcd2e3+abe5,
-ab2c4-b5cd-a2b3de+2abc2d2e+ad4e2-a2bce3-cde5,
-a3b2cd-bc2d4+ab2c3e-b5de-d6e+3abcd2e2-a2be4-de6,
-a4b2c-abc2d3-ab5e-b3c2de-ad5e+2a2bcde2+cd2e4,
-b6c+bc6+a2b4e-3ab2c2de+c4d2e-a3cde2-abd3e2+bce5;
+//Theo1
+ring r=32003,(x,y,z),wp(2,3,6);
+ideal i=zy2-zx3-x6;
 
 list pr=normal(i);
@@ -1242 +1240 @@
 setring r1;
 KK;
+setring r;
 }