{R : Type u_1} →
  {M : Type u_5} →
    [inst : Semiring R] →
      [inst_1 : AddCommMonoid M] →
        [inst_2 : Module R M] → (p : Submodule R M) → (q : Submodule R ↥p) → ↥q ≃ₗ[R] ↥(Submodule.map p.subtype q)