All proofs
Project-declaredLean 4.32.0 · mathlib@81a5d257c8e4

Dirichlet thm

dirichlet_thm

Project documentation

Dirichlet's theorem on primes in arithmetic progressions. If q1q\ge 1, a<qa<q, and gcd(a,q)=1\gcd(a,q)=1, then infinitely many primes satisfy pa(modq)p\equiv a\pmod q.

Exact Lean statement

@[blueprint
  (title := "Dirichlet's theorem")
  (statement := /-- Any primitive residue class contains an infinite number of primes. -/)
  (proof := /--
  If this were not the case, then the sum $\sum_{p \leq x: p = a\ (q)} \log p$
  would be bounded in $x$, contradicting Theorem \ref{chebyshev-asymptotic-pnt}.
  -/)
  (proofUses := ["chebyshev-asymptotic-pnt"])
  (latexEnv := "corollary")]
theorem dirichlet_thm {q : ℕ} {a : ℕ} (hq : q ≥ 1) (ha : Nat.Coprime a q) (ha' : a < q) :
    Infinite { p // p.Prime ∧ p % q = a }

Formal artifact

Lean source

Canonical source
Full Lean sourceLean 4
@[blueprint  (title := "Dirichlet's theorem")  (statement := /-- Any primitive residue class contains an infinite number of primes. -/)  (proof := /--  If this were not the case, then the sum $\sum_{p \leq x: p = a\ (q)} \log p$  would be bounded in $x$, contradicting Theorem \ref{chebyshev-asymptotic-pnt}.  -/)  (proofUses := ["chebyshev-asymptotic-pnt"])  (latexEnv := "corollary")]theorem dirichlet_thm {q : } {a : } (hq : q  1) (ha : Nat.Coprime a q) (ha' : a < q) :    Infinite { p // p.Prime  p % q = a } := by  have : {p | p.Prime  p % q = a}.Infinite := by    have : {p | p.Prime  p ≡ a [MOD q]}.Infinite := by      have := @infinite_setOf_prime_and_eq_mod      specialize @this q <| NeZero.of_pos hq      simp_all only [isUnit_iff_exists_inv, forall_exists_index,  ZMod.natCast_eq_natCast_iff]      exact this (IsUnit.exists_right_inv (show IsUnit (a : ZMod q) from by        rwa [ZMod.isUnit_iff_coprime])).choose (IsUnit.exists_right_inv (show IsUnit (a : ZMod q)          from by rwa [ZMod.isUnit_iff_coprime])).choose_spec    exact this.mono fun p hp  hp.1, by simpa [ModEq, mod_eq_of_lt ha'] using hp.2  exact Set.infinite_coe_iff.mpr this
Project
Prime Number Theorem and More
License
Apache-2.0
Commit
a93551347dce
Source
PrimeNumberTheoremAnd/Consequences.lean:2514-2534

Reuse this declaration

Bring the exact result into your workflow

The import identifies the source module. Your project still needs the pinned package dependency shown on this page.

What this badge means

This completion status comes from the project or community source. It has not yet been represented here as an independent rebuild and axiom audit.

Continue in this project

Related declarations

Project-declaredLean 4.32.0

Admissible bound mono

admissible_bound.mono

Plain-language statement

For positive parameters A,B,C,RA,B,C,R, the classical error-bound function A(logxR)Bexp ⁣(ClogxR)A\left(\frac{\log x}{R}\right)^B\exp\!\left(-C\sqrt{\frac{\log x}{R}}\right) is nonincreasing once xexp ⁣(R(2B/C)2)x\ge \exp\!\left(R(2B/C)^2\right).

analytic number theoryprime numbersasymptotics

Source project: Prime Number Theorem and More

Person-level attribution pending.

View proof record
Project-declaredLean 4.32.0

Analytic On div Removable zero

AnalyticOn_divRemovable_zero

Plain-language statement

Let ff be analytic on an open set ss containing 00, and suppose f(0)=0f(0)=0. Define g(z)=f(z)/zg(z)=f(z)/z for z0z\ne0 and g(0)=f(0)g(0)=f'(0). Then the apparent singularity at 00 is removable and gg is analytic throughout ss.

analytic number theoryprime numbersasymptotics

Source project: Prime Number Theorem and More

Person-level attribution pending.

View proof record
Project-declaredLean 4.32.0

Analytic On div Removable zero closed Ball

AnalyticOn_divRemovable_zero_closedBall

Plain-language statement

Suppose R>0R>0 and ff is analytic on the closed disc zR|z|\le R with f(0)=0f(0)=0. Define g(z)=f(z)/zg(z)=f(z)/z for z0z\ne0 and g(0)=f(0)g(0)=f'(0). Then gg is analytic on the entire closed disc, including at the removed singularity.

analytic number theoryprime numbersasymptotics

Source project: Prime Number Theorem and More

Person-level attribution pending.

View proof record