∀ {k : Type u_2} {V : Type u_3} {P : Type u_1} [inst : Ring k] [inst_1 : AddCommGroup V] [inst_2 : Module k V]
  [inst_3 : AddTorsor V P] {n : ℕ} (s : Affine.Simplex k P n) (S : AffineSubspace k P),
  affineSpan k (Set.range s.points) ≤ S → ∀ (i : Fin (n + 1)), s.points i ∈ S