def
definition
alpha
show as:
view math explainer →
open explainer
Read the cached plain-language explainer.
open lean source
IndisputableMonolith.Constants.Alpha on GitHub at line 38.
browse module
All declarations in this module, on Recognition.
explainer page
Derivations using this theorem
depends on
used by
-
phi_cubed_in_theta_band -
rs_pattern_sqrt_components_neutral -
H_RSZeroParameterStatus -
cubicConstraint -
hexagonalConstraint -
LatticeParams -
monoclinicConstraint -
orthorhombicConstraint -
tetragonalConstraint -
trigonalConstraint -
geometric_seed_eq -
row_hartree_over_rest -
row_hartree_over_rest_eq -
row_rydberg_over_rest -
row_rydberg_over_rest_eq -
alpha_over_pi_small -
Lambda_no_fine_tuning -
Omega_Lambda_RS -
Omega_Lambda_RS_well_defined -
alpha_over_pi_bounds -
dark_energy_base_value -
dark_energy_match -
Omega_L_pred -
love_changes_individual_sigma -
love_equilibrates -
loveOperator -
alphaInverseRS -
codata_in_band -
a_baryon_keplerian -
btfr_mass_velocity_relation -
C_ilg_prefactor_pos -
eight_tick_period -
ParamProps -
Params -
w_t_ge_one -
w_t_nonneg -
w_t_nonneg_with -
w_t_with -
rotational_flatness_forced -
rotational_flatness_implies_nonzero_vflat
formal source
35@[simp] def alphaInv : ℝ := alpha_seed * Real.exp (-(f_gap / alpha_seed))
36
37/-- Fine-structure constant (α_EM). -/
38@[simp] def alpha : ℝ := 1 / alphaInv
39
40/-! ### Numeric Verification
41
42The derived constants in this module are **symbolic formulas**. Any numeric
43evaluation/match-to-CODATA checks are quarantined in
44`IndisputableMonolith/Constants/AlphaNumericsScaffold.lean` so they cannot be
45accidentally pulled into the certified surface.
46-/
47
48/-! ### Provenance Witnesses -/
49
50lemma alpha_components_derived :
51 (∃ (seed gap : ℝ),
52 alphaInv = seed * Real.exp (-(gap / seed)) ∧
53 seed = alpha_seed ∧
54 gap = f_gap) := by
55 refine ⟨alpha_seed, f_gap, ?_⟩
56 simp
57
58end
59
60end Constants
61end IndisputableMonolith