Skip to main content
AlexKontorovich/PrimeNumberTheoremAnd
Source indexedtheorem · leanprover/lean4:v4.32.0

eSHP.exists_prime_gap

PrimeNumberTheoremAnd.IEANTN.eSHP.eSHP · PrimeNumberTheoremAnd/IEANTN/eSHP/eSHP.lean:453 to 477

Mathematical statement

Exact Lean statement

@[blueprint
  "exists-prime-gap"
  (title := "Existence of prime gap")
  (statement := /--
  Every gap $g < 1307$ that is even or one occurs as a prime
  gap with first prime at most $3278018069102480227$. -/)
  (proof := /-- This follows from the Table 9 row for
  $(1306, 3278018069102480227)$, which gives the bound for
  every smaller even gap or the gap $1$. -/)
  (latexEnv := "proposition")
  (discussion := 951)]
theorem exists_prime_gap (g : ℕ) (hg : g ∈ Set.Ico 1 1307) (hg' : Even g ∨ g = 1) :
    first_gap g ≤ 3278018069102480227

Complete declaration

Lean source

Canonical source
Full Lean sourceLean 4
@[blueprint  "exists-prime-gap"  (title := "Existence of prime gap")  (statement := /--  Every gap $g < 1307$ that is even or one occurs as a prime  gap with first prime at most $3278018069102480227$. -/)  (proof := /-- This follows from the Table 9 row for  $(1306, 3278018069102480227)$, which gives the bound for  every smaller even gap or the gap $1$. -/)  (latexEnv := "proposition")  (discussion := 951)]theorem exists_prime_gap (g : ) (hg : g  Set.Ico 1 1307) (hg' : Even g  g = 1) :    first_gap g  3278018069102480227 := by  have hrec : first_gap_record 1306 3278018069102480227 := by    exact table_9_prime_gap 1306 3278018069102480227 (by decide)  rcases hrec with hfg1306, hprev  have hcases : g < 1306  g = 1306 := by    have hg_upper : g < 1307 := hg.2    omega  rcases hcases with hglt | rfl  · have hmem : g  Finset.Ico 1 1306 := by      exact Finset.mem_Ico.mpr hg.1, hglt    have hfg_mem := hprev g hmem hg'    exact le_of_lt hfg_mem.2  · rw [hfg1306]