∀ {R : Type u_2} {A : Type u_1} [inst : CommSemiring R] [inst_1 : Semiring A] [inst_2 : Algebra R A] {r : R}
  (motive : Nonempty (Invertible ((algebraMap R A) r)) → Prop) (x : Nonempty (Invertible ((algebraMap R A) r))),
  (∀ (i : Invertible ((algebraMap R A) r)), motive ⋯) → motive x