∀ {R : Type u_1} {M : Type u_2} [inst : Semiring R] [inst_1 : AddCommMonoid M] [inst_2 : Module R M] (p : Submodule R M)
  (p' : Submodule R ↥p), Submodule.comap p.subtype (Submodule.map p.subtype p') = p'