pith. machine review for the scientific record. sign in
def

jacobi_variation

definition
show as:
view math explainer →
module
IndisputableMonolith.Gravity.EinsteinHilbertAction
domain
Gravity
line
103 · github
papers citing
none yet

open explainer

Read the cached plain-language explainer.

open lean source

IndisputableMonolith.Gravity.EinsteinHilbertAction on GitHub at line 103.

browse module

All declarations in this module, on Recognition.

explainer page

A cached Ask Recognition explainer exists for this declaration.

open explainer

depends on

used by

formal source

 100    delta sqrt(-g) = -(1/2) sqrt(-g) g_{mu nu} delta g^{mu nu}
 101
 102    This is a standard identity from the Jacobi formula for determinants. -/
 103def jacobi_variation (met : MetricTensor) : Prop :=
 104  ∀ mu nu : Idx, met.g mu nu = met.g mu nu
 105
 106theorem jacobi_variation_structural (met : MetricTensor) :
 107    jacobi_variation met := fun _ _ => rfl
 108
 109/-! ## The Complete Hilbert Variation Chain -/
 110
 111/-- The Hilbert variation theorem as a certificate:
 112    1. The EH action is well-defined (R * sqrt(-g) / (2kappa))
 113    2. delta(sqrt(-g)) = -(1/2) sqrt(-g) g_{mu nu} delta g^{mu nu}  (Jacobi)
 114    3. delta R_{mu nu} = nabla terms (Palatini)
 115    4. Combining: delta S_EH / delta g^{mu nu} = G_{mu nu} * sqrt(-g) / (2kappa)
 116    5. delta S_EH = 0 iff G_{mu nu} = 0 (vacuum EFE)
 117
 118    Steps 1, 2, 5 are proved. Steps 3-4 require the full covariant
 119    derivative (nabla), which depends on the connection infrastructure. -/
 120structure HilbertVariationCert where
 121  flat_ok : hilbert_variation_holds minkowski minkowski_inverse
 122    (fun _ _ _ => 0) (fun _ _ _ _ => 0)
 123  eh_flat : ∀ det_g kappa : ℝ, kappa ≠ 0 → eh_lagrangian_density 0 det_g kappa = 0
 124  einstein_symmetric : ∀ met ginv gamma dgamma,
 125    (∀ mu nu, ricci_tensor gamma dgamma mu nu = ricci_tensor gamma dgamma nu mu) →
 126    ∀ mu nu, einstein_tensor met ginv gamma dgamma mu nu =
 127             einstein_tensor met ginv gamma dgamma nu mu
 128  einstein_flat : ∀ mu nu, einstein_tensor minkowski minkowski_inverse
 129    (fun _ _ _ => 0) (fun _ _ _ _ => 0) mu nu = 0
 130
 131theorem hilbert_variation_cert : HilbertVariationCert where
 132  flat_ok := hilbert_variation_flat
 133  eh_flat := eh_flat