left
α : Type
f : α → List α
m : α → ℕ
isDec : ∀ (x y : α), y ∈ f x → m y < m x
x y : α
y_in : y = x
⊢ y = x ∨ ∃ a ∈ f x, y ∈ ftr f m isDec a
case h
α : Type
f : α → List α
m : α → ℕ
isDec : ∀ (x y : α), y ∈ f x → m y < m x
x y : α
y_in : y = x
⊢ y = x