m_c_predicted_pos

formal source

  77  unfold m_c_predicted_via_RS
  78  norm_num
  79
  80theorem m_c_predicted_pos (alpha_at_mc alpha_at_MZ : ℝ)
  81    (h_alpha_pos : 0 < alpha_at_mc) (h_alpha_0_pos : 0 < alpha_at_MZ) :
  82    0 < m_c_predicted alpha_at_mc alpha_at_MZ := by
  83  unfold m_c_predicted
  84  exact m_running_pos m_c_at_MZ_GeV alpha_at_mc alpha_at_MZ 5
  85    m_c_at_MZ_pos h_alpha_pos h_alpha_0_pos
  86
  87/-! ## Master cert -/
  88
  89structure CharmMSBarCert where
  90  rung_eq_15 : r_charm = 15
  91  pdg_pos : 0 < m_c_PDG_GeV
  92  pdg_central : m_c_PDG_GeV = 1.27
  93  prediction_pos : ∀ alpha_at_mc alpha_at_MZ : ℝ,
  94      0 < alpha_at_mc → 0 < alpha_at_MZ →
  95      0 < m_c_predicted alpha_at_mc alpha_at_MZ
  96
  97theorem charmMSBarCert_holds : CharmMSBarCert :=
  98  { rung_eq_15 := rfl
  99    pdg_pos := m_c_PDG_pos
 100    pdg_central := rfl
 101    prediction_pos := m_c_predicted_pos }
 102
 103end
 104
 105end IndisputableMonolith.Physics.CharmMSBarScoreCard