mirror of
https://github.com/archlinuxarm/PKGBUILDs.git
synced 2024-09-19 22:08:32 +00:00
20 lines
745 B
Diff
20 lines
745 B
Diff
From 3edb98db78dd49bb8b4137b46781a7cd570c2556 Mon Sep 17 00:00:00 2001
|
|
From: Bill Allombert <Bill.Allombert@math.u-bordeaux.fr>
|
|
Date: Sun, 28 Mar 2021 13:27:24 +0200
|
|
Subject: [PATCH] rnfdisc_factored: remove spurious Q_primpart [#2284]
|
|
|
|
diff --git a/src/basemath/base2.c b/src/basemath/base2.c
|
|
index b2b63ada5..531f5c558 100644
|
|
--- a/src/basemath/base2.c
|
|
+++ b/src/basemath/base2.c
|
|
@@ -3582,7 +3582,7 @@ rnfdisc_factored(GEN nf, GEN pol, GEN *pd)
|
|
|
|
nf = checknf(nf);
|
|
pol = rnfdisc_get_T(nf, pol, &lim);
|
|
- disc = nf_to_scalar_or_basis(nf, nfX_disc(nf, Q_primpart(pol)));
|
|
+ disc = nf_to_scalar_or_basis(nf, nfX_disc(nf, pol));
|
|
pol = nfX_to_monic(nf, pol, NULL);
|
|
fa = idealfactor_partial(nf, disc, lim);
|
|
P = gel(fa,1); l = lg(P);
|
|
|