Changeset 01e8874 in git for libfac/charset
- Timestamp:
- Jun 4, 2009, 7:54:59 PM (15 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- 51d7f7bf9e26957b6f4bfed8b88ec964eb69f77a
- Parents:
- ca4d0e6c613744c68c30ffd7c388dc69dcc0a538
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libfac/charset/alg_factor.cc
rca4d0e6 r01e8874 2 2 // emacs edit mode for this file is -*- C++ -*- 3 3 //////////////////////////////////////////////////////////// 4 /* $Id: alg_factor.cc,v 1.2 6 2008-11-06 14:47:03Singular Exp $ */4 /* $Id: alg_factor.cc,v 1.27 2009-06-04 17:54:59 Singular Exp $ */ 5 5 //////////////////////////////////////////////////////////// 6 6 // FACTORY - Includes … … 11 11 #include <SqrFree.h> 12 12 #include <helpstuff.h> 13 #include <assert.h> 13 14 // Charset - Includes 14 15 #include "csutil.h" … … 155 156 // sqr-free routine for algebraic extensions 156 157 // we need it! Ex.: f=c^2+2*a*c-1; as=[a^2+1]; f=(c+a)^2 157 static CFFList 158 alg_sqrfree( const CanonicalForm & f ){159 CFFList L;160 161 L.append(CFFactor(f,1));162 return L;163 }158 //static CFFList alg_sqrfree( const CanonicalForm & f ) 159 //{ 160 // CFFList L; 161 // 162 // L.append(CFFactor(f,1)); 163 // return L; 164 //} 164 165 165 166 // Calculates a square free norm … … 438 439 CanonicalForm alg_lc(const CanonicalForm &f) 439 440 { 440 if (f.inCoeffDomain()) return f;441 441 if (f.level()>0) 442 442 { 443 443 return alg_lc(f.LC()); 444 444 } 445 assert(f.inCoeffDomain()); 446 return f; 445 447 } 446 448 … … 829 831 /* 830 832 $Log: not supported by cvs2svn $ 833 Revision 1.26 2008/11/06 14:47:03 Singular 834 *hannes: newfactoras 835 831 836 Revision 1.25 2008/11/06 14:05:51 Singular 832 837 *hannes: newfactoras
Note: See TracChangeset
for help on using the changeset viewer.