Documentation

MathlibNt.AnalyticNumberTheory.Chen1973.Chen1973Lemma6AggregateDerivativeMoment

theorem AnalyticNumberTheory.LargeSieve.totient_block_sum_le_weighted (D Q : ) (hD : 0 < D) (A : ) (hA : ∀ (q : ), 0 A q) :
qFinset.Ioc D Q, 1 / q.totient * A q (∑ qFinset.Icc 1 Q, q / q.totient * A q) / D
theorem AnalyticNumberTheory.LargeSieve.primitive_LDeriv_fourth_block_cauchy (D Q : ) (s : ) (r M : ) (hD : 0 < D) (hQ : 2 Q) (hr : 0 < r) (hsphere : zMetric.sphere s r, Chen1973Lemma3Domain z z.re z.im) (hnorm : zMetric.sphere s r, z M) :
qFinset.Ioc D Q, 1 / q.totient * χ : PrimitiveCharacter q, chen1973PrimitiveLDeriv q s χ ^ 4 21000000 * Q ^ 2 * M ^ 2 * (1 + Real.log (Q * (1 + M))) ^ 4 / D / r ^ 4

Actual primitive L-functions: the reciprocal-totient block fourth moment on a circle is controlled before applying Cauchy to the whole finite ℓ⁴ family.

theorem AnalyticNumberTheory.LargeSieve.primitive_LDeriv_fourth_block_vertical (D Q : ) (σ t r : ) (hD : 0 < D) (hQ : 2 Q) (hr : 0 < r) (hband : 1 / 2 σ - r) :
qFinset.Ioc D Q, 1 / q.totient * χ : PrimitiveCharacter q, chen1973PrimitiveLDeriv q (σ + t * Complex.I) χ ^ 4 21000000 * Q ^ 2 * (|σ| + |t| + r) ^ 2 * (1 + Real.log (Q * (1 + (|σ| + |t| + r)))) ^ 4 / D / r ^ 4

All heights, with the circle hypotheses derived from the actual band. The conductor cost is Q²/D, not an extra count of individual characters.

theorem AnalyticNumberTheory.LargeSieve.chen1973Lemma6_eq19_LDeriv_fourth_aggregate (x L level D Q : ) (σ t r : ) (hD : 0 < D) (hQ : 2 Q) (hr : 0 < r) (hband : 1 / 2 σ - r) (hcell : chen1973Lemma6ConductorBlock x L levelFinset.Ioc D Q) :
chen1973Lemma6Eq19LDerivFourthMoment x L level (σ + t * Complex.I) chen1973Lemma6Eq19I x L level * (21000000 * Q ^ 2 * (|σ| + |t| + r) ^ 2 * (1 + Real.log (Q * (1 + (|σ| + |t| + r)))) ^ 4 / D / r ^ 4)

Actual equation-(19) conductor weights applied only after the aggregate reciprocal-totient bound. The logarithm is kept, not enlarged to a conductor power.

theorem AnalyticNumberTheory.LargeSieve.chen1973Lemma6_eq19_LDeriv_fourth_beta (x L level D Q : ) (hx : 3 x) (hD : 0 < D) (hQ : 2 Q) (hcell : chen1973Lemma6ConductorBlock x L levelFinset.Ioc D Q) (t : ) :
have β := chen1973Lemma6Beta x; have r := 1 / (2 * Real.log x); chen1973Lemma6Eq19LDerivFourthMoment x L level (β + t * Complex.I) chen1973Lemma6Eq19I x L level * (21000000 * Q ^ 2 * (|β| + |t| + r) ^ 2 * (1 + Real.log (Q * (1 + (|β| + |t| + r)))) ^ 4 / D / r ^ 4)

Chen's actual beta line, with the Cauchy radius and band paid internally.