left
case mp.inl
n : Nat
x : ENat
m : Nat
h : n ≤ m
hm : x.leNat m = false
k : Nat
hlt : n < k
⊢ n + 1 ≤ k ∨ x.leNat k = false
case mp.inl.h
n : Nat
x : ENat
m : Nat
h : n ≤ m
hm : x.leNat m = false
k : Nat
hlt : n < k
⊢ n + 1 ≤ k