Terminal products control all three entrance logarithmic columns
ProvedBianchiIX.entrance_terminal_wall_formsbianchi-ix-era-statisticsdynamical-systems
Let , , , , and . Put , , . Suppose
Then
Preamble
import Mathlib.Analysis.Calculus.Deriv.Pow import Mathlib.Analysis.Calculus.Deriv.Mul import Mathlib.Analysis.Calculus.Deriv.Add import Mathlib.Analysis.Real.Sqrt import Mathlib.Tactic.Linarith import Mathlib.Tactic.Ring import Mathlib.Analysis.Calculus.Deriv.Inv import Mathlib.Tactic.FieldSimp import Mathlib.Tactic.LinearCombination import Mathlib.Analysis.SpecialFunctions.Sqrt import Mathlib.Analysis.Calculus.ImplicitContDiff import Mathlib.Analysis.Calculus.Deriv.Prod import Mathlib.Analysis.SpecialFunctions.ExpDeriv import Mathlib.Analysis.SpecialFunctions.Log.Basic import Mathlib.Analysis.SpecialFunctions.Pow.Real namespace BianchiIX end BianchiIX noncomputable section open BianchiIX
Formal statement
theorem BianchiIX.entrance_terminal_wall_forms {A k u v w U W θ ω : ℝ}
(hA : 0 ≤ A) (hk : 1 ≤ k) (hu : 0 < u ∧ u ≤ 1) (hv : 0 < v ∧ v ≤ 1)
(hw : 0 < w ∧ w ≤ 1) (hU : 0 ≤ U) (hW : 0 ≤ W) (hθ : 0 ≤ θ) (hω : 0 ≤ ω ∧ ω ≤ 1)
(hsq : (U + W) ^ 2 ≤ 2 * (u * v + v ^ 2 * w ^ 2 * ω))
(hfast : (U + W) * U ≤ 2 * u * v)
(hslow : (U + W) * W ≤ w * (u * v + v ^ 2 * w * ω))
(hsum : U + W ≤ 2 * v) :
let b := U + W
let J := u * v + v ^ 2 * w * (θ + ω)
let K := u + v * w ^ 2
b ^ 2 / k ^ 2 ≤ 4 ∧
b / k * (U * (1 / u + A) + W * (A / k ^ 2)) ≤ (2 + 4 * A) * (v / k) ∧
b / k * (U * A + W * (1 / w + A / k ^ 2)) ≤ (2 + 4 * A) * (J / k) ∧
b / k * (U * (A * k / v) + W * (A / v)) ≤ (2 + 4 * A) * K := by sorry
Source