Changeset fa8e1c in git for libfac/charset

Timestamp:

Jul 30, 2002, 5:16:19 PM (22 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

d30633d0f627edf89314db9dd9d3806c2cf1baa6

Parents:

184d6ddc5316c2d09e7582a4cfc49adf1add3e0a

Message:

*hannes: fix for alg. extension


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

File:

• libfac/charset/alg_factor.cc (modified) (5 diffs)

libfac/charset/alg_factor.cc

@@ -3 +3 @@
 // emacs edit mode for this file is -*- C++ -*-
 ////////////////////////////////////////////////////////////
-static char * rcsid = "$Id: alg_factor.cc,v 1.8 2001-08-06 08:32:53 Singular Exp $";
+static char * rcsid = "$Id: alg_factor.cc,v 1.9 2002-07-30 15:16:19 Singular Exp $";
 ////////////////////////////////////////////////////////////
 // FACTORY - Includes
@@ -194 +194 @@
       // for now we use this workaround with Factorize...
       // ...but it should go away soon!!!!
-      testlist= Factorize(R);
+      Variable X;
+      if (getAlgVar(R,X))
+      { 
+        if (R.isUnivariate())
+          testlist=factorize( R, X );
+        else  
+          testlist= Factorize(R, X, 0);
+      }
+      else 
+        testlist= Factorize(R);
       DEBOUTLN(cout, "testlist= ", testlist);
       testlist.removeFirst();
@@ -640 +649 @@
       DEBDECLEVEL(cout,"newfactoras");
       return Factorlist;
-      ;
     }
   }
@@ -649 +657 @@
       DEBDECLEVEL(cout,"newfactoras");
       return Factorlist;
-    ;
   }
 
@@ -676 +683 @@
 /*
 $Log: not supported by cvs2svn $
+Revision 1.8  2001/08/06 08:32:53  Singular
+* hannes: code cleanup
+
 Revision 1.7  2001/06/27 13:58:05  Singular
 *hannes/GP: debug newfactoras, char_series, ...