Changeset b87513c in git for libfac/factor

Timestamp:

Aug 6, 2001, 10:33:08 AM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

f9aada33010d06acda2bec6c9b188429c57541e2

Parents:

e90314894f11eeb9e91dd2e8b38dbaa5f46569d9

Message:

* hannes: code cleanup


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

Location:

libfac/factor

Files:

• Factor.cc (modified) (4 diffs)
• Truefactor.cc (modified) (3 diffs)

libfac/factor/Factor.cc

@@ -1 +1 @@
 /* Copyright 1996 Michael Messollen. All rights reserved. */
 ///////////////////////////////////////////////////////////////////////////////
-static char * rcsid = "$Id: Factor.cc,v 1.7 2001-06-21 14:57:05 Singular Exp $ ";
+static char * rcsid = "$Id: Factor.cc,v 1.8 2001-08-06 08:32:54 Singular Exp $ ";
 static char * errmsg = "\nYou found a bug!\nPlease inform (Michael Messollen) michael@math.uni-sb.de \nPlease include above information and your input (the ideal/polynomial and characteristic) in your bug-report.\nThank you.";
 ///////////////////////////////////////////////////////////////////////////////
@@ -527 +527 @@
                degree(getMipo(Extension,'x')) );
       TIMING_START(evaluate_time);
-     #if 0             
+     #if 1
       Outputlist = factorize(F,Extension);
      #else
@@ -637 +637 @@
       DEBOUTLN(cout, "Univ. Factorization over extension of degree ",
                degree(getMipo(Extension,'x')) );
-     #if 0             
+     #if 1
       UnivariateFactorlist = factorize(ffuni,Extension);
      #else
@@ -823 +823 @@
 /*
 $Log: not supported by cvs2svn $
+Revision 1.7  2001/06/21 14:57:05  Singular
+*hannes/GP: Factorize, newfactoras, ...
+
 Revision 1.6  2001/06/18 08:44:41  pfister
 * hannes/GP/michael: factory debug, Factorize

libfac/factor/Truefactor.cc

@@ -2 +2 @@
 ///////////////////////////////////////////////////////////////////////////////
 // emacs edit mode for this file is -*- C++ -*-
-//static char * rcsid = "@(#) $Id: Truefactor.cc,v 1.6 2001-06-27 13:58:06 Singular Exp $";
+//static char * rcsid = "@(#) $Id: Truefactor.cc,v 1.7 2001-08-06 08:32:54 Singular Exp $";
 ///////////////////////////////////////////////////////////////////////////////
 // Factory - Includes
@@ -223 +223 @@
     //cout << "           1:" << change_poly(factor.factor(),SubstitutionList,1) <<endl;
     c= mydivremt(U,test_f,a,b);
-    if (  c  && b == U.genZero() && !hasAlgVar(test_f)) // factor.getFactor() divides U
+    if (  c  && b == U.genZero() && !hasAlgVar(test_f))
+    // factor.getFactor() divides U
     {
       //cout << " teilt:" << test_f <<endl;
@@ -409 +410 @@
 /*
 $Log: not supported by cvs2svn $
+Revision 1.6  2001/06/27 13:58:06  Singular
+*hannes/GP: debug newfactoras, char_series, ...
+
 Revision 1.5  2001/06/21 14:57:06  Singular
 *hannes/GP: Factorize, newfactoras, ...