The cyclic comparison ratio and the cyclic constant K_p (cyclicA, cyclicB, cyclicRatio, cyclicConstant)
DefinitionHlawkaSchatten_DiagonalConstruction_CyclicFour scalar definitions, for a real exponent and a real parameter :
For , cyclicA and cyclicB are, respectively, the common lpNorm value of each of the three cyclic witness vectors and the common lpNorm value of each of their three pairwise sums (a companion bundle supplies the vectors themselves); for and , cyclicRatio is the resulting ratio, for that witness triple, of a triple deficit to a pair-deficit sum; cyclicConstant, , is its supremum over the fixed interval .
For real , is continuous on with a positive denominator throughout, so this supremum is attained there, making a maximum rather than merely a supremum. is the candidate diagonal Hlawka constant: for it is a necessary lower bound for any constant that works on real or complex diagonal triples in dimension at least three, and — proved elsewhere, for — it is also sufficient, making it the sharp diagonal constant in that range.
import Mathlib.Analysis.InnerProductSpace.Basic
import Mathlib.Analysis.InnerProductSpace.Dual
import Mathlib.Analysis.Normed.Lp.PiLp
import Mathlib.Analysis.SpecialFunctions.Pow.Continuity
import Mathlib.Topology.Order.Compact
/-
Copyright (c) 2026 Ezzeri Esa. All rights reserved.
Released under Apache 2.0 license as described in the file LICENSE.
Authors: Ezzeri Esa
-/
/-!
# The cyclic comparison constant
The constant is defined from an explicit scalar formula on a fixed compact
interval. Its denominator is positive, so continuity gives an attained
maximum without presupposing the global Hlawka inequality.
-/
namespace HlawkaSchatten.DiagonalConstruction
noncomputable def cyclicA (p t : ℝ) : ℝ := (t ^ p + 2) ^ (1 / p)
noncomputable def cyclicB (p t : ℝ) : ℝ :=
(2 * |1 - t| ^ p + (2 : ℝ) ^ p) ^ (1 / p)
noncomputable def cyclicRatio (p t : ℝ) : ℝ :=
(3 * cyclicA p t - (3 : ℝ) ^ (1 / p) * |2 - t|) /
(6 * cyclicA p t - 3 * cyclicB p t)
noncomputable def cyclicConstant (p : ℝ) : ℝ :=
sSup (cyclicRatio p '' Set.Icc (1 / 2) 2)
end HlawkaSchatten.DiagonalConstruction
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.