`rung`

definition

show as: view math explainer →

module: IndisputableMonolith.Masses.RSBridge.Anchor
domain: Masses
line: 94 · github
papers citing: none yet

open explainer

Generate a durable explainer page for this declaration.

open lean source

IndisputableMonolith.Masses.RSBridge.Anchor on GitHub at line 94.

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

  91  residueAtAnchor f = residueAtAnchor g := by
  92  simp [residueAtAnchor, hZ]
  93
  94noncomputable def rung : Fermion → ℤ
  95| .e   => 2   | .mu  => 13  | .tau => 19
  96| .u   => 4   | .c   => 15  | .t   => 21
  97| .d   => 4   | .s   => 15  | .b   => 21
  98| .nu1 => 0   | .nu2 => 11  | .nu3 => 19
  99
 100def M0 : ℝ := 1
 101@[simp] theorem M0_pos : 0 < M0 := by
 102  dsimp [M0]; norm_num
 103
 104noncomputable def massAtAnchor (f : Fermion) : ℝ :=
 105  M0 * Real.exp (((rung f : ℝ) - 8 + gap (ZOf f)) * Real.log (Constants.phi))
 106
 107theorem anchor_ratio (f g : Fermion) (hZ : ZOf f = ZOf g) :
 108  massAtAnchor f / massAtAnchor g =
 109    Real.exp (((rung f : ℝ) - rung g) * Real.log (Constants.phi)) := by
 110  unfold massAtAnchor
 111  set Af := ((rung f : ℝ) - 8 + gap (ZOf f)) * Real.log (Constants.phi)
 112  set Ag := ((rung g : ℝ) - 8 + gap (ZOf g)) * Real.log (Constants.phi)
 113  -- Since M0=1, factor cancels directly
 114  calc
 115    (M0 * Real.exp Af) / (M0 * Real.exp Ag)
 116        = (Real.exp Af) / (Real.exp Ag) := by simpa [M0]
 117    _ = Real.exp (Af - Ag) := by
 118              simpa [Real.exp_sub] using (Real.exp_sub Af Ag).symm
 119    _ = Real.exp ((((rung f : ℝ) - 8 + gap (ZOf f)) - ((rung g : ℝ) - 8 + gap (ZOf g)))
 120                   * Real.log (Constants.phi)) := by
 121              have : Af - Ag
 122                    = (((rung f : ℝ) - 8 + gap (ZOf f)) - ((rung g : ℝ) - 8 + gap (ZOf g)))
 123                       * Real.log (Constants.phi) := by
 124                        simp [Af, Ag, sub_eq_add_neg, add_comm, add_left_comm, add_assoc,

papers checked against this theorem

No papers in the current corpus map onto this theorem yet.