have k : y * z ≤ x := Nat.le_trans (Nat.le_add_right _ _) h
x y z✝ z : ℕ
h : y * z + y ≤ x
⊢ (x - y * Nat.succ z) % y = x % y
x y z✝ z : ℕ
h : y * z + y ≤ x
k : y * z ≤ x
⊢ (x - y * Nat.succ z) % y = x % y