Changeset 81f4bd5 in git

Timestamp:

Dec 17, 2013, 1:14:40 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'c5facdfddea2addfd91babd8b9019161dea4b695')

Children:

ce70e6c75303dccbb031dc5e9e87c5a9cd45aaf8

Parents:

d0e03be624a4a267bffe008f58988c85be1dfe2d

Message:

fix: missing compoments in normal (Santiago Laplagne)

File:

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

Singular/LIB/normal.lib

@@ -4445 +4445 @@
         printlevel = printlevel + 1;
         ideal JDefault = 0; // Now it uses the default J;
-        list nor1 = normalM(Id1, decomp, withDelta, denomOption, JDefault, JDefault)[1];
-        list nor2 = normalM(Id2, decomp, withDelta, denomOption, JDefault, JDefault)[1];
+        list nor1 = normalM(Id1, decomp, withDelta, denomOption, JDefault, JDefault);
+        list nor2 = normalM(Id2, decomp, withDelta, denomOption, JDefault, JDefault);
         printlevel = printlevel - 1;
         option(set,save_opt);
-        return(list(nor1, nor2));
+        list res = nor1 + nor2;
+        return(res);
       }
     }
@@ -4568 +4569 @@
 
       ideal JDefault = 0;  // Now it uses the default J;
-      list nor1 = normalM(Id1, decomp, withDelta, denomOption, JDefault, JDefault)[1];
-      list nor2 = normalM(Id2, decomp, withDelta, denomOption, JDefault, JDefault)[1];
+      list nor1 = normalM(Id1, decomp, withDelta, denomOption, JDefault, JDefault);
+      list nor2 = normalM(Id2, decomp, withDelta, denomOption, JDefault, JDefault);
       printlevel = printlevel - 1;
       option(set,save_opt);
-      return(list(nor1, nor2));
+      list res = nor1 + nor2;
+      return(res);
     }
   }