Seven points in the unit square contain a close pair
ProvedCirclePackingConstants.seven_unit_square_close_paircircle-packingdiscrete-geometrypacking
Let be seven points in the unit square . Then two of the points are at squared Euclidean distance at most ; equivalently, some pair is at distance at most .
This is the global optimality statement for the normalized seven-point problem. Together with the affine normalization from disk centers to points in the unit square, it yields the upper bound on the supremal radius for seven equal disks.
Preamble
import Definitions.Def_CirclePackingConstants noncomputable section namespace CirclePackingConstants
Formal statement
theorem seven_unit_square_close_pair :
∀ p : Fin 7 → Point,
(∀ i, 0 ≤ (p i).1 ∧ (p i).1 ≤ 1 ∧ 0 ≤ (p i).2 ∧ (p i).2 ≤ 1) →
∃ i j, i ≠ j ∧
sqDist (p i) (p j) ≤ (4 - 2 * Real.sqrt 3) ^ 2 := by sorrySource
User-supplied circles_in_square_n7.pdf, p. 7 (Global optimality theorem: among seven points in the unit square some pair has distance at most 4 - 2*sqrt 3), with the exact integer verifier in Appendix A, pp. 10-12.