fixfixfix

thofma · Sep 19, 2024 · 0e68637 · 0e68637
1 parent c7425f2
commit 0e68637
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/src/FieldFactory/ab_exts.jl b/src/FieldFactory/ab_exts.jl
@@ -1048,7 +1048,8 @@ function discriminant_conductorQQ(O::AbsSimpleNumFieldOrder, C::ClassField, m::I
 
   R=residue_ring(FlintZZ, m, cached=false)[1]
 
-  for (p,v) in lp
+  for (_p,v) in lp
+    p = ZZ(p)
     if v==1
       ap=n
       if cyc_prime
@@ -1137,7 +1138,8 @@ function discriminantQQ(O::AbsSimpleNumFieldOrder, C::ClassField, m::Int)
 
   R=residue_ring(FlintZZ, m, cached=false)[1]
 
-  for (p,v) in lp
+  for (_p,v) in lp
+    p = ZZ(p)
     if v==1
       ap=n
       if cyc_prime
@@ -1291,7 +1293,8 @@ function _is_conductor_minQQ(C::Hecke.ClassField, n::Int)
   K=nf(O)
 
   R=residue_ring(FlintZZ, mm, cached=false)[1]
-  for (p,v) in lp.fac
+  for (_p,v) in lp.fac
+    p = ZZ(_p)
     if isodd(p)
       if v==1
         x=_unit_grp_residue_field_mod_n(Int(p), n)[1]