∀ (R : Type u) (M : Type v) [inst : Semiring R] [StrongRankCondition R] [inst_2 : AddCommMonoid M] [inst_3 : Module R M]
  [inst_4 : Module.Free R M], Module.rank R M = Cardinal.mk (Module.Free.ChooseBasisIndex R M)