Constant distance forces the apartment frame to be orthonormal of radius L
DisprovedHarmonicBuilding.frame_orthonormal_of_constantDistanceLet be a nonconstant homogeneous energy minimizer of order into a conical Euclidean building whose distance to the cone point along the unit circle is the constant . Then locally the circle image is a genuine circle of radius in an apartment: there is such that around each one finds an isometric embedding of the model apartment with and an orthonormal pair with
Role. Local flatness alone produces some frame spanning the arc, with no control on its shape. The constant-distance hypothesis — the branch of the order dichotomy in which the circle image lies on a sphere about the cone point — pins that frame down completely: it must be orthogonal with both vectors of length . This is what turns the flatness statement into the input the closed-billiards-path analysis needs, since that analysis is phrased in terms of an orthonormal pair spanning a great circle.
Proof. The constant is positive, since otherwise homogeneity would make constant. Local flatness supplies and vectors with on a short arc. As is an isometry fixing the cone point, the squared distance to the cone point is , which expands by the double-angle identities to
The hypothesis says this equals throughout the arc, so a single-frequency trigonometric polynomial is constant there; since , all of its coefficients vanish. Hence , and , so and are orthonormal and .
import Definitions.Def_frame_2026_harmonic_building_conical import Definitions.Def_spherical_great_circle
namespace HarmonicBuilding
open SphericalGeometry
universe v
theorem frame_orthonormal_of_constantDistance
{N : ℕ} (C : EuclideanCoxeterData N) (M : ConicalBuildingModel.{v} N C)
(h : ℂ → M.carrier) (alpha L : ℝ) (halpha : alpha ≠ 0)
(hhom : IsHomogeneousOfOrderOn M Set.univ h 0 alpha)
(hharm : IsPlanarKSHarmonicOn Set.univ h)
(hnc : NonconstantOn h Set.univ)
(hconst : ∀ theta : ℝ, dist (h (circlePoint 0 1 theta)) (h 0) = L) :
∃ delta : ℝ, 0 < delta ∧ ∀ theta0 : ℝ,
∃ (iota : ModelEuclideanSpace N → M.carrier)
(v1 v2 : ModelEuclideanSpace N),
Isometry iota ∧ iota 0 = h 0 ∧
‖v1‖ = 1 ∧ ‖v2‖ = 1 ∧ inner ℝ v1 v2 = (0:ℝ) ∧
∀ theta : ℝ, |theta - theta0| < delta →
h (circlePoint 0 1 theta)
= iota (L • greatCirclePath v1 v2 (alpha * theta)) := by sorry
end HarmonicBuilding