no goals
R : Type u_1
inst✝⁸ : CommRing R
S : Submonoid R
P : Type ?u.1120670
inst✝⁷ : CommRing P
inst✝⁶ : Algebra R P
loc : IsLocalization S P
K : Type u_2
K' : Type ?u.1121134
inst✝⁵ : Field K
inst✝⁴ : Field K'
inst✝³ : Algebra R K
inst✝² : IsFractionRing R K
inst✝¹ : Algebra R K'
inst✝ : IsFractionRing R K'
I✝ J : FractionalIdeal R⁰ K
h : K →ₐ[R] K'
I : Ideal R
⊢ ↑I = 1 ↔ I = 1
simpa only [Ideal.one_eq_top] using coeIdeal_inj