rw [←p3]
case inr.ha
R : Type u
inst✝ : CommRing R
inst : IsDomain R
p : R
valp : SurjVal p
p3 : p = 3
⊢ 1 ≤ v valp 3
case inr.ha
R : Type u
inst✝ : CommRing R
inst : IsDomain R
p : R
valp : SurjVal p
p3 : p = 3
⊢ 1 ≤ v valp p