∀ {R : Type u_2} {M : Type u_1} [inst : CommRing R] [inst_1 : AddCommGroup M] [inst_2 : Module R M]
  (motive : Nonempty ((I : Type u_1) × Module.Basis I R M) → Prop) (x : Nonempty ((I : Type u_1) × Module.Basis I R M)),
  (∀ (κ : Type u_1) (b : Module.Basis κ R M), motive ⋯) → motive x