∀ {R : Type u_1} {M : Type u_2} [inst : Semiring R] [inst_1 : AddCommMonoid M] [inst_2 : Module R M]
  (motive : Module.Finite R M → Prop) (x : Module.Finite R M),
  (∀ (s : Finset M) (hs : Submodule.span R ↑s = ⊤), motive ⋯) → motive x