∀ {R : Type u} [inst : Ring R] {Q : Type v} [inst_1 : AddCommGroup Q] [inst_2 : Module R Q] {M : Type u_1}
  [inst_3 : AddCommGroup M] [inst_4 : Module R M] (e : Q ≃ₗ[R] M), Module.Baer R Q → Module.Baer R M