no goals
R : Type u_1
R₁ : Type ?u.1095879
R₂ : Type u_2
R₃ : Type ?u.1095885
R₄ : Type ?u.1095888
S : Type ?u.1095891
K : Type ?u.1095894
K₂ : Type ?u.1095897
M : Type u_4
M' : Type ?u.1095903
M₁ : Type ?u.1095906
M₂ : Type u_3
M₃ : Type ?u.1095912
M₄ : Type ?u.1095915
N : Type ?u.1095918
N₂ : Type ?u.1095921
ι : Type ?u.1095924
V : Type ?u.1095927
V₂ : Type ?u.1095930
inst✝¹¹ : Semiring R
inst✝¹⁰ : Semiring R₂
inst✝⁹ : Semiring R₃
inst✝⁸ : AddCommMonoid M
inst✝⁷ : AddCommMonoid M₂
inst✝⁶ : AddCommMonoid M₃
σ₁₂ : R →+* R₂
σ₂₃ : R₂ →+* R₃
σ₁₃ : R →+* R₃
inst✝⁵ : RingHomCompTriple σ₁₂ σ₂₃ σ₁₃
inst✝⁴ : Module R M
inst✝³ : Module R₂ M₂
inst✝² : Module R₃ M₃
σ₂₁ : R₂ →+* R
τ₁₂ : R →+* R₂
τ₂₃ : R₂ →+* R₃
τ₁₃ : R →+* R₃
inst✝¹ : RingHomCompTriple τ₁₂ τ₂₃ τ₁₃
F : Type u_5
sc : SemilinearMapClass F τ₁₂ M M₂
inst✝ : RingHomSurjective τ₁₂
f : F
p : Submodule R₂ M₂
⊢ range f ≤ p ↔ comap f p = ⊤
rw [range_eq_map, map_le_iff_le_comap, eq_top_iff]