Changeset ba2be4 in git for Singular/LIB/modstd.lib

Timestamp:

Jul 8, 2010, 12:36:30 PM (14 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

3a2b8e5d6b761f4acde24375e684b3c6daf02645

Parents:

99af0d3e643769a827817de5d58cba7541a19539

Message:

steidel: minor fixes

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

File:

• Singular/LIB/modstd.lib (modified) (5 diffs)

Singular/LIB/modstd.lib

@@ -1 @@
-//GP, last modified 23.10.06
 ////////////////////////////////////////////////////////////////////////////////
 version="$Id$";
@@ -502 +501 @@
 @*       - variant = 3: homogenize - std(.,#[1]) resp. groebner - dehomogenize,
 @*       - variant = 4: std(.,#[1]) resp. groebner,
-@*       - variant = 5: liftstd.
+@*       - variant = 5: liftstd1.
 EXAMPLE: example modpStd; shows an example
 "
@@ -801 +800 @@
       {
          variant = 5;
-         if(printlevel >= 10) { "variant = 2"; }
+         if(printlevel >= 10) { "variant = 5"; }
+         "=============================================================";
+         "WARNING: This variant is not applicable if ordering is mixed.";
+         "=============================================================";
          matrix trans;
       }
@@ -1100 +1102 @@
    ideal J1 = modStd(I,1,1);
    J1;
-   // requires MP
+   //requires MP
    //ideal J2 = modStd(I,3);
    //J2;
@@ -1109 +1111 @@
    ideal I = cyclic(4);
    ideal J1 = modStd(I,1);
-   // requires MP
-   //ideal J2 = modStd(I,2,1);
-   //size(reduce(J1,J2));
-   //size(reduce(J2,J1));
+   ideal J2 = modStd(I,1,1);
+   size(reduce(J1,J2));
+   size(reduce(J2,J1));
 }