{R : Type u} →
  {M : Type v} →
    [inst : Semiring R] →
      [StrongRankCondition R] →
        [inst_2 : AddCommMonoid M] →
          [inst_3 : Module R M] →
            [Module.Free R M] → (ι : Type u_2) → [Unique ι] → Module.finrank R M = 1 → Module.Basis ι R M