simpa [sub_val_eq, zero_valtn_decr _ h] using ih
case succ
R : Type u
inst✝¹ : CommRing R
inst✝ : IsDomain R
p : R
evr : ENatValRing p
x : R
h : v evr.valtn x = 0
m : ℕ
ih : sub_val evr m x = x
⊢ sub_val evr (Nat.succ m) x = x
no goals