Changeset 0c42a8 in git

Timestamp:

Jul 22, 2014, 10:27:31 AM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

cc16f03d558b50b0724f4d7bbac2f7df23d80592

Parents:

a6220140edf75f76ad53c0c68c15bc93888c1868

Message:

Gerhard fixes for genus with block orderings

File:

• Singular/LIB/normal.lib (modified) (1 diff)

Singular/LIB/normal.lib

@@ -2283 +2283 @@
    else
    {
-      def R=basering;
+     def R=changeord(list(list("dp",1:nvars(basering))));
+     setring R;
+     ideal I=imap(R0,I);
+     I=std(I);
    }
    if(dim(I)==2)