def
definition
gamma
show as:
view math explainer →
open explainer
Generate a durable explainer page for this declaration.
open lean source
IndisputableMonolith.Relativity.ILG.PPN on GitHub at line 14.
browse module
All declarations in this module, on Recognition.
explainer page
depends on
used by
-
phi_fifth_in_alpha_band -
rs_pattern_sqrt_components_neutral -
cubicConstraint -
hexagonalConstraint -
LatticeParams -
monoclinicConstraint -
orthorhombicConstraint -
tetragonalConstraint -
trigonalConstraint -
euler_mascheroni_bounds -
euler_mascheroni_implies_ne_zero -
euler_mascheroni_implies_pos -
gamma -
gamma_lt_two_thirds -
gamma_numerical_bounds -
gamma_pos -
coupling_from_spectral -
ChristoffelData -
christoffel_from_metric -
christoffel_symmetric -
ConnectionCert -
flat_christoffel_vanish -
metric_compatibility -
HilbertVariationCert -
hilbert_variation_holds -
einstein_symmetric -
einstein_tensor -
ricci_tensor -
scalar_curvature -
sourced_efe_coord -
vacuum_efe_coord -
algebraic_bianchi -
riemann_antisymmetric_last_two -
RiemannCert -
riemann_tensor -
contracted_bianchi -
efe_with_source -
StressEnergyCert -
vacuum_is_special_case -
gamma
formal source
11noncomputable def beta_pot (ψ : RefreshField) (p : ILGParams) : ℝ := 1
12
13/-- Minimal PPN scaffold: define γ, β to be 1 at leading order (GR limit). -/
14noncomputable def gamma (_C_lag _α : ℝ) : ℝ := 1
15noncomputable def beta (_C_lag _α : ℝ) : ℝ := 1
16
17/-- PPN γ definition (for paper reference). -/
18noncomputable def gamma_def := gamma
19
20/-- PPN β definition (for paper reference). -/
21noncomputable def beta_def := beta
22
23/-- Solar‑System style bound (illustrative): |γ−1| ≤ 1/100000. -/
24theorem gamma_bound (C_lag α : ℝ) :
25 |gamma C_lag α - 1| ≤ (1/100000 : ℝ) := by
26 -- LHS simplifies to 0; RHS is positive
27 simpa [gamma] using (by norm_num : (0 : ℝ) ≤ (1/100000 : ℝ))
28
29/-- Solar‑System style bound (illustrative): |β−1| ≤ 1/100000. -/
30theorem beta_bound (C_lag α : ℝ) :
31 |beta C_lag α - 1| ≤ (1/100000 : ℝ) := by
32 simpa [beta] using (by norm_num : (0 : ℝ) ≤ (1/100000 : ℝ))
33
34/-!
35Linearised small-coupling PPN model (illustrative).
36These definitions produce explicit bounds scaling with |C_lag·α|.
37-/
38
39/-- Linearised γ with small scalar coupling. -/
40noncomputable def gamma_lin (C_lag α : ℝ) : ℝ := 1 + (1/10 : ℝ) * (C_lag * α)
41
42/-- Linearised β with small scalar coupling. -/
43noncomputable def beta_lin (C_lag α : ℝ) : ℝ := 1 + (1/20 : ℝ) * (C_lag * α)
44