have ⟨d, (_ : n + d ≃ m)⟩ := le_defn.mp ‹n ≤ m›
ℕ : Type
inst✝³ : Core ℕ
inst✝² : Induction ℕ
inst✝¹ : Addition ℕ
inst✝ : Sign ℕ
order_inst : Order ℕ
n m : ℕ
x✝ : n ≤ m
⊢ n ≤ step m
ℕ : Type
inst✝³ : Core ℕ
inst✝² : Induction ℕ
inst✝¹ : Addition ℕ
inst✝ : Sign ℕ
order_inst : Order ℕ
n m : ℕ
x✝ : n ≤ m
d : ℕ
h✝ : n + d ≃ m
⊢ n ≤ step m