∀ {R : Type u_1} [inst : CommRing R] (K : Type u_2) [inst_1 : Field K] [inst_2 : Algebra R K] {V : Type u_3}
  [inst_3 : AddCommGroup V] [inst_4 : Module K V] [inst_5 : Module R V] [inst_6 : IsScalarTower R K V] [IsDomain R]
  [IsPrincipalIdealRing R] [Module.IsTorsionFree R K] (M : Submodule R V) [Submodule.IsLattice K M], Module.Free R ↥M