sorry
case succ
R : Type u
inst✝¹ : CommRing R
inst✝ : IsDomain R
p : R
evr : ENatValRing p
x : R
m : ℕ
h : v evr.valtn x = ↑m + 1
x_pos_val : 0 < v evr.valtn x
⊢ v evr.valtn (decr_val evr x) = ↑m + 1 - 1
no goals