- Timestamp:
- Mar 12, 1998, 3:31:13 PM (26 years ago)
- Branches:
- (u'spielwiese', '2fa36c576e6a4ddbb1093b43c7f8e9835e17e52a')
- Children:
- 195424a9a77b57c412c3492fea3a288b9e27eb68
- Parents:
- 17ce9d288ac1fc0cdd5ff71f3681357576be06a3
- Location:
- factory
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
factory/fac_ezgcd.cc
r17ce9d rc6caf1 1 1 /* emacs edit mode for this file is -*- C++ -*- */ 2 /* $Id: fac_ezgcd.cc,v 1.1 0 1998-03-10 14:48:24schmidt Exp $ */2 /* $Id: fac_ezgcd.cc,v 1.11 1998-03-12 14:30:50 schmidt Exp $ */ 3 3 4 4 #include <config.h> … … 247 247 248 248 CanonicalForm limit = power( CanonicalForm(2), degree( Db ) ) * 249 tmax( max Coeff( Lb ), tmax( maxCoeff( Db ), maxCoeff( F ) ) );249 tmax( maxNorm( Lb ), tmax( maxNorm( Db ), maxNorm( F ) ) ); 250 250 int p = pk.getp(); 251 251 int k = pk.getk(); … … 264 264 { 265 265 CanonicalForm limit = power( CanonicalForm(2), tmin( degF, degG ) ) * 266 gcd( icontent( lcF ), icontent( lcG ) ) * tmin( max Coeff( F ), maxCoeff( G ) );266 gcd( icontent( lcF ), icontent( lcG ) ) * tmin( maxNorm( F ), maxNorm( G ) ); 267 267 int p, i = 0; 268 268 do { -
factory/fac_multivar.cc
r17ce9d rc6caf1 1 1 /* emacs edit mode for this file is -*- C++ -*- */ 2 /* $Id: fac_multivar.cc,v 1. 7 1997-08-29 08:38:28schmidt Exp $ */2 /* $Id: fac_multivar.cc,v 1.8 1998-03-12 14:30:55 schmidt Exp $ */ 3 3 4 4 #include <config.h> … … 69 69 for ( i = 1; i <= k; i++ ) 70 70 M += degs[i]; 71 CanonicalForm b = 2 * max Coeff( f ) * power( CanonicalForm( 3 ), M );71 CanonicalForm b = 2 * maxNorm( f ) * power( CanonicalForm( 3 ), M ); 72 72 CanonicalForm B = p; 73 73 k = 1; -
factory/fac_util.cc
r17ce9d rc6caf1 1 1 /* emacs edit mode for this file is -*- C++ -*- */ 2 /* $Id: fac_util.cc,v 1. 7 1998-03-12 10:27:15schmidt Exp $ */2 /* $Id: fac_util.cc,v 1.8 1998-03-12 14:31:02 schmidt Exp $ */ 3 3 4 4 #include <config.h> … … 8 8 #include "cf_defs.h" 9 9 #include "canonicalform.h" 10 #include "cf_algorithm.h"11 10 #include "cf_iter.h" 12 11 #include "fac_util.h" … … 143 142 144 143 CanonicalForm 145 maxCoeff( const CanonicalForm & f )146 {147 if ( f.inCoeffDomain() )148 return abs( f );149 else {150 CanonicalForm M = 0, m;151 for ( CFIterator i = f; i.hasTerms(); i++ )152 if ( (m = maxCoeff( i.coeff() )) > M )153 M = m;154 return M;155 }156 }157 158 159 CanonicalForm160 144 mappksymmetric ( const CanonicalForm & f ) 161 145 { -
factory/fac_util.h
r17ce9d rc6caf1 1 1 /* emacs edit mode for this file is -*- C++ -*- */ 2 /* $Id: fac_util.h,v 1. 5 1997-06-19 12:23:08schmidt Exp $ */2 /* $Id: fac_util.h,v 1.6 1998-03-12 14:31:07 schmidt Exp $ */ 3 3 4 4 #ifndef INCL_FAC_UTIL_H … … 39 39 void divremainder( const CanonicalForm & f, const CanonicalForm & g, CanonicalForm & quot, CanonicalForm & rem, const modpk & pk ); 40 40 41 CanonicalForm maxCoeff( const CanonicalForm & f );42 43 41 bool Hensel ( const CanonicalForm & U, CFArray & G, const CFArray & lcG, const Evaluation & A, const modpk & bound, const Variable & x ); 44 42 -
factory/sm_sparsemod.cc
r17ce9d rc6caf1 1 1 /* emacs edit mode for this file is -*- C++ -*- */ 2 /* $Id: sm_sparsemod.cc,v 1. 6 1998-03-10 14:48:29schmidt Exp $ */2 /* $Id: sm_sparsemod.cc,v 1.7 1998-03-12 14:31:13 schmidt Exp $ */ 3 3 4 4 //{{{ docu … … 474 474 deg = 1; 475 475 CanonicalForm B, L, Bound, lcF = Leitkoeffizient( primif); //lc( primif ) ; 476 B = 2 * max Coeff( primif ) * maxCoeff( g ) ;476 B = 2 * maxNorm( primif ) * maxNorm( g ) ; 477 477 L = lcF ; 478 478 Bound = abs( 2 * B * L + 1 );
Note: See TracChangeset
for help on using the changeset viewer.