Changeset 3aada99 in git for libfac/factor
- Timestamp:
- May 25, 2007, 2:59:05 PM (17 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 692d218d6fbfc960fa37620a9dc07deed71c36f7
- Parents:
- e2ad5d3410ef71539dbf81f623d9f232c39c891b
- Location:
- libfac/factor
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
libfac/factor/Factor.cc
re2ad5d r3aada99 1 1 /* Copyright 1996 Michael Messollen. All rights reserved. */ 2 2 /////////////////////////////////////////////////////////////////////////////// 3 static char * rcsid = "$Id: Factor.cc,v 1.3 1 2007-05-22 14:49:52Singular Exp $ ";3 static char * rcsid = "$Id: Factor.cc,v 1.32 2007-05-25 12:59:05 Singular Exp $ "; 4 4 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."; 5 5 /////////////////////////////////////////////////////////////////////////////// … … 1028 1028 return fdivides(rF,rG);; 1029 1029 #else 1030 if (degree(F,F.mvar()) > degree(G,F.mvar())) return false; 1031 return true; 1030 CanonicalForm a,b; 1031 mydivrem(G,F,a,b); 1032 if (b.isZero()) return true; 1033 else return false; 1032 1034 #endif 1033 1035 } … … 1347 1349 /* 1348 1350 $Log: not supported by cvs2svn $ 1351 Revision 1.31 2007/05/22 14:49:52 Singular 1352 *hannes: format 1353 1349 1354 Revision 1.30 2007/05/22 14:30:53 Singular 1350 1355 *hannes: diophant_error -
libfac/factor/helpstuff.cc
re2ad5d r3aada99 2 2 //////////////////////////////////////////////////////////// 3 3 // emacs edit mode for this file is -*- C++ -*- 4 // static char * rcsid = "$Id: helpstuff.cc,v 1. 4 2001-06-19 15:29:04Singular Exp $";4 // static char * rcsid = "$Id: helpstuff.cc,v 1.5 2007-05-25 12:59:05 Singular Exp $"; 5 5 //////////////////////////////////////////////////////////// 6 6 // FACTORY - Includes … … 12 12 13 13 bool 14 mydivremt ( const CanonicalForm& f, const CanonicalForm& g, CanonicalForm& a, CanonicalForm& b ){ 14 mydivremt ( const CanonicalForm& f, const CanonicalForm& g, CanonicalForm& a, CanonicalForm& b ) 15 { 15 16 bool retvalue; 16 17 CanonicalForm aa,bb; … … 23 24 24 25 void 25 mydivrem( const CanonicalForm& f, const CanonicalForm& g, CanonicalForm& a, CanonicalForm& b ){ 26 mydivrem( const CanonicalForm& f, const CanonicalForm& g, CanonicalForm& a, CanonicalForm& b ) 27 { 26 28 bool retvalue; 27 29 CanonicalForm aa,bb; … … 175 177 /* 176 178 $Log: not supported by cvs2svn $ 179 Revision 1.4 2001/06/19 15:29:04 Singular 180 *hannes: optim. 181 177 182 Revision 1.3 1997/09/12 07:19:56 Singular 178 183 * hannes/michael: libfac-0.3.0
Note: See TracChangeset
for help on using the changeset viewer.