∀ {𝕜 : Type u_1} {V : Type u_2} {P : Type u_3} [inst : RCLike 𝕜] [inst_1 : NormedAddCommGroup V]
  [inst_2 : InnerProductSpace 𝕜 V] [inst_3 : MetricSpace P] [inst_4 : NormedAddTorsor V P] {n : ℕ}
  (s : Affine.Simplex 𝕜 P n),
  s.orthogonalProjectionSpan = EuclideanGeometry.orthogonalProjection (affineSpan 𝕜 (Set.range s.points))