pith. machine review for the scientific record. sign in
theorem

theta_RS_inside_experimental

proved
show as:
view math explainer →
module
IndisputableMonolith.StandardModel.StrongCP
domain
StandardModel
line
260 · github
papers citing
none yet

open explainer

Generate a durable explainer page for this declaration.

open lean source

IndisputableMonolith.StandardModel.StrongCP on GitHub at line 260.

browse module

All declarations in this module, on Recognition.

explainer page

Tracked in the explainer inventory; generation is lazy so crawlers do not trigger LLM jobs.

open explainer

depends on

used by

formal source

 257noncomputable def theta_experimental_max : ℝ := 1e-10
 258
 259/-- The RS-predicted θ lies strictly inside the experimental interval. -/
 260theorem theta_RS_inside_experimental :
 261    -theta_experimental_max < theta_RS_predicted ∧
 262    theta_RS_predicted < theta_experimental_max := by
 263  unfold theta_RS_predicted theta_experimental_max
 264  refine ⟨?_, ?_⟩ <;> norm_num
 265
 266/-- |θ_RS| < 10⁻¹⁰ — RS satisfies the experimental bound trivially. -/
 267theorem abs_theta_RS_lt_bound :
 268    |theta_RS_predicted| < theta_experimental_max := by
 269  unfold theta_RS_predicted theta_experimental_max
 270  simp
 271  norm_num
 272
 273/-- The RS J-cost gap: any allowed θ ≠ 0 in the 8-tick lattice carries
 274    J-cost ≥ 1 − cos(π/4) ≈ 0.293. So the structural selection of θ = 0
 275    is not just a minimum but is separated from the next-best by a
 276    macroscopic gap. -/
 277theorem strong_cp_gap :
 278    1 - Real.cos (Real.pi / 4) > 0.29 := by
 279  have : Real.cos (Real.pi / 4) = Real.sqrt 2 / 2 := Real.cos_pi_div_four
 280  rw [this]
 281  have h_sqrt2 : Real.sqrt 2 < 1.42 := by
 282    rw [show (1.42 : ℝ) = Real.sqrt (1.42 ^ 2) from by
 283      rw [Real.sqrt_sq]; norm_num]
 284    apply Real.sqrt_lt_sqrt
 285    · norm_num
 286    · norm_num
 287  linarith
 288
 289/-- **STRONG CP NUMERICAL CERTIFICATE**.
 290    Combines the structural (8-tick + J-min) and numerical (interval) statements. -/