case inl y_is_a =>
  subst y_is_a
  use x
  unfold ftr
  aesop
α : Type
x y : α
f : α → List α
m : α → ℕ
isDec : ∀ (x y : α), y ∈ f x → m y < m x
a : α
a_in_x : a ∈ f x
y_is_a : y = a
⊢ ∃ z ∈ ftr f m isDec x, y ∈ f z
no goals