have : le n m' := ‹∃ k', n + k' ≃ m'›
n m' k' : Nat
h✝ : n + step k' ≃ step m'
this✝¹ : step (n + k') ≃ step m'
this✝ : n + k' ≃ m'
this : ∃ k', n + k' ≃ m'
⊢ n ≤ step m'
n m' k' : Nat
h✝ : n + step k' ≃ step m'
this✝² : step (n + k') ≃ step m'
this✝¹ : n + k' ≃ m'
this✝ : ∃ k', n + k' ≃ m'
this : le n m'
⊢ n ≤ step m'