{M : Type u_1} →
  [inst : AddMonoid M] →
    (S : AddSubmonoid M) →
      (motive : ↥S.addUnits → Sort u_2) →
        (x : ↥S.addUnits) → ((val : AddUnits M) → (h : val ∈ S.addUnits) → motive ⟨val, h⟩) → motive x