def
definition
scale
show as:
view math explainer →
open explainer
Generate a durable explainer page for this declaration.
open lean source
IndisputableMonolith.Cosmology.LargeScaleStructureFromRS on GitHub at line 29.
browse module
All declarations in this module, on Recognition.
explainer page
used by
-
pentatonicSize -
scale_fibonacci -
third_quality -
PhiInt -
ResonantScale -
phi_energy_rung_pos -
luminosity_tier_local -
NuclearTier -
nuclear_tier_local -
E_coh -
J_mass -
M_max -
OptimalConfig -
two_rung_gap_eq_phi_squared -
J_bit_pos -
J_nonneg -
alphaInv_dimensionless -
barrierLadder -
higher_temp_faster -
k_larger_shell_than_li -
energyScale -
hcp_ratio_near_phi -
argon_ea_zero -
shell -
familyLadderStep -
P_vs_NP_resolved -
J_cost -
phi_critical_energy -
sc_gap_scale -
alphaInv_linear_rate -
deriv_alphaInv_of_gap -
exponential_form_uniqueness_ode_principle -
log_alphaInv_eq -
C006_certificate -
c020_derivation_strategy -
vev_from_ledger -
vev_implies_scale -
vev_phi_ladder_position -
vev_phi_window -
vev_structure
formal source
26
27theorem lssRegime_count : Fintype.card LSSRegime = 5 := by decide
28
29noncomputable def scale (k : ℕ) : ℝ := phi ^ k
30
31theorem scale_ratio (k : ℕ) : scale (k + 1) / scale k = phi := by
32 unfold scale
33 have hpos : (0 : ℝ) < phi ^ k := pow_pos phi_pos k
34 rw [div_eq_iff hpos.ne', pow_succ]
35 ring
36
37theorem scale_pos (k : ℕ) : 0 < scale k := pow_pos phi_pos k
38
39structure LargeScaleStructureCert where
40 five_regimes : Fintype.card LSSRegime = 5
41 phi_ratio : ∀ k, scale (k + 1) / scale k = phi
42 scale_always_pos : ∀ k, 0 < scale k
43
44noncomputable def largeScaleStructureCert : LargeScaleStructureCert where
45 five_regimes := lssRegime_count
46 phi_ratio := scale_ratio
47 scale_always_pos := scale_pos
48
49end IndisputableMonolith.Cosmology.LargeScaleStructureFromRS