theorem
proved
add_comm
show as:
view math explainer →
open explainer
Read the cached plain-language explainer.
open lean source
IndisputableMonolith.Relativity.Fields.Scalar on GitHub at line 36.
browse module
All declarations in this module, on Recognition.
explainer page
depends on
used by
-
H_dAlembert -
sub_eq_add -
PhiInt -
PhiInt -
canonicalPhiRingObj -
costFamily_neg_param -
PhiRingObj -
galerkinNS_hasDerivAt_duhamelRemainder_mode -
unitSphereSurface_D3 -
Jcost_one_plus_eps_quadratic -
Jcost_small_strain_bound -
dAlembert_to_ODE_general -
dAlembert_to_ODE_general -
dAlembert_product -
dAlembert_to_ODE_general_theorem -
dAlembert_to_ODE_theorem -
dAlembert_to_ODE_theorem -
Jcost_one_plus_eps_quadratic -
Jcost_small_strain_bound -
Jcost_log_second_deriv_normalized -
neutralityScore_shift1_of_periodic8 -
add_comm -
add_right_cancel -
dalembert_deriv_ode -
defect_symmetric -
fromInt_toInt -
conservation_from_balance -
kernel_response_limit -
response_function_is_real_part -
n_of_r_mono_A_of_nonneg_p -
cone_bound -
cone_bound_saturates -
reach_rad_le -
reach_time_eq -
ledger_fraction_kn_forced_under_passive_bound -
ledger_fraction_numerator_offset_forced -
anchor_ratio -
roots_form_group -
fib_recurrence -
measurement_bridge_C_eq_2A
formal source
33def smul (c : ℝ) (φ : ScalarField) : ScalarField :=
34 { ψ := fun x => c * φ.ψ x }
35
36theorem add_comm (φ₁ φ₂ : ScalarField) :
37 ∀ x, eval (add φ₁ φ₂) x = eval (add φ₂ φ₁) x := by
38 intro x
39 simp [eval, add]
40 ring
41
42theorem smul_zero (φ : ScalarField) :
43 ∀ x, eval (smul 0 φ) x = 0 := by
44 intro x
45 simp [eval, smul]
46
47/-- Directional derivative of scalar field in direction μ. -/
48noncomputable def directional_deriv (φ : ScalarField) (μ : Fin 4) (x : Fin 4 → ℝ) : ℝ :=
49 let h := (0.001 : ℝ)
50 let x_plus := fun ν => if ν = μ then x ν + h else x ν
51 (φ.ψ x_plus - φ.ψ x) / h
52
53/-- Directional derivative is linear in the field. -/
54theorem deriv_add (φ₁ φ₂ : ScalarField) (μ : Fin 4) (x : Fin 4 → ℝ) :
55 directional_deriv (add φ₁ φ₂) μ x =
56 directional_deriv φ₁ μ x + directional_deriv φ₂ μ x := by
57 simp [directional_deriv, add]
58 ring
59
60theorem deriv_smul (c : ℝ) (φ : ScalarField) (μ : Fin 4) (x : Fin 4 → ℝ) :
61 directional_deriv (smul c φ) μ x = c * directional_deriv φ μ x := by
62 simp only [directional_deriv, smul]
63 ring
64
65/-- Derivative of constant field is zero. -/
66theorem deriv_constant (c : ℝ) (μ : Fin 4) (x : Fin 4 → ℝ) :