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