Multinomial capacity of the coupled floor profile at every q
Provedmme_CW_primary_profile_capacity_quarter_rootThe multinomial capacity of the coupled floor profile dominates the raw laser base, for every .
With , , , write
Then, eventually in and whenever , , ,
What is actually being proved. At the level of exponential rates the two sides agree exactly: writing and , the identity
holds for every — is precisely the maximiser. So there is no slack to exploit, and the whole content of the statement is that the Stirling polynomial corrections and the cost of rounding down to an integer are absorbed by the quarter-root loss , which decays faster than any polynomial but slower than any exponential.
This is the general- form of mme_CW_q6_primary_profile_capacity_quarter_root; the hypothesis is weakened from the full pruning triple to , since the ratio condition is not used here.
import Mathlib.Analysis.SpecialFunctions.Exp import Mathlib.Analysis.SpecialFunctions.Pow.Real import Mathlib.Analysis.SpecificLimits.Basic open Filter Topology
theorem mme_CW_primary_profile_capacity_quarter_root
(q : ℕ) (hq : 3 ≤ q) (tau : ℝ) (htau : 2 ≤ 3 * tau) :
∀ᶠ N : ℕ in atTop,
let lambda : ℝ := 2 / ((q : ℝ) ^ (3 * tau) + 2)
let L : ℕ := ⌊lambda * (N : ℝ)⌋₊
let Gcount : ℕ := N - L
let side : ℕ := q ^ (4 * Gcount + 2 * L)
let raw : ℝ :=
4 * (q : ℝ) ^ (3 * tau) * ((q : ℝ) ^ (3 * tau) + 2)
let Zcount : ℕ :=
Nat.choose (2 * N) L * Nat.choose (2 * N - L) L
let Xcount : ℕ := Nat.choose N Gcount
let middle : ℕ := Nat.choose (2 * Gcount) Gcount
let capacity : ℝ :=
((Zcount : ℝ) ^ 3 * (middle : ℝ) ^ 2) /
(16 * (Xcount : ℝ) ^ 4)
let loss : ℝ :=
(Real.sqrt (Real.sqrt (((N + 1 : ℕ) : ℝ))))⁻¹
(0 < L ∧ 0 < Gcount ∧ L + Gcount = N) →
(raw * Real.exp (-(loss / 2))) ^ (2 * N) ≤
(capacity * Real.exp (-((N : ℝ) * loss / 2))) *
((((side * side * side : ℕ) : ℝ)) ^ tau) := by
sorry