∀ {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] (I : Set k) {m n : ℕ} (s : Affine.Simplex k P n) (e : Fin (n + 1) ≃ Fin (m + 1)) (p : P)
  (motive : p ∈ Affine.Simplex.setInterior I (s.reindex e) → Prop) (x : p ∈ Affine.Simplex.setInterior I (s.reindex e)),
  (∀ (w : Fin (m + 1) → k) (hw : ∑ i, w i = 1) (hwI : ∀ (i : Fin (m + 1)), w i ∈ I)
      (h : (Finset.affineCombination k Finset.univ (s.reindex e).points) w = p), motive ⋯) →
    motive x