Changeset e451f48 in git


Ignore:
Timestamp:
Feb 21, 2012, 12:45:56 PM (12 years ago)
Author:
Martin Lee <martinlee84@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
c3ef86fc6fe8d559f94547cd26b2b837ec45f614
Parents:
3f8663db4115fa2cabdf28fc5755f5b71aca1c8f
git-author:
Martin Lee <martinlee84@web.de>2012-02-21 12:45:56+01:00
git-committer:
Martin Lee <martinlee84@web.de>2012-04-04 14:42:26+02:00
Message:
fix: Q(a) check
File:
1 edited

Legend:

Unmodified
Added
Removed
  • factory/facMul.cc

    r3f8663 re451f48  
    26252625  }
    26262626#ifdef HAVE_FLINT
    2627   fmpq_poly_t FLINTA,FLINTB;
    2628   fmpq_poly_init (FLINTA);
    2629   fmpq_poly_init (FLINTB);
    2630   convertFacCF2Fmpq_poly_t (FLINTA, A);
    2631   convertFacCF2Fmpq_poly_t (FLINTB, B);
    2632   fmpq_poly_rem (FLINTA, FLINTB, FLINTA);
    2633   bool result= fmpq_poly_is_zero (FLINTA);
    2634   fmpq_poly_clear (FLINTA);
    2635   fmpq_poly_clear (FLINTB);
    2636   return result;
     2627  Variable alpha;
     2628  if (!hasFirstAlgVar (A, alpha) && !hasFirstAlgVar (B, alpha))
     2629  {
     2630    fmpq_poly_t FLINTA,FLINTB;
     2631    fmpq_poly_init (FLINTA);
     2632    fmpq_poly_init (FLINTB);
     2633    convertFacCF2Fmpq_poly_t (FLINTA, A);
     2634    convertFacCF2Fmpq_poly_t (FLINTB, B);
     2635    fmpq_poly_rem (FLINTA, FLINTB, FLINTA);
     2636    bool result= fmpq_poly_is_zero (FLINTA);
     2637    fmpq_poly_clear (FLINTA);
     2638    fmpq_poly_clear (FLINTB);
     2639    return result;
     2640  }
    26372641#else
    26382642  return fdivides (A, B); //maybe NTL?
Note: See TracChangeset for help on using the changeset viewer.