use a
case cons
α✝ : Type u
inst✝² : DecidableEq α✝
β✝ : Type v
inst✝¹ : DecidableEq β✝
m : Type ?u.171629 → Type ?u.171631
α : Type u_1
β : Type ?u.171637
inst✝ : Monad m
a : α
tail✝ : List α
tail_ih✝ : tail✝ = [] ↔ ∀ (a : α), a ∉ tail✝
⊢ ∃ x, ¬x = a → x ∈ tail✝
case h
α✝ : Type u
inst✝² : DecidableEq α✝
β✝ : Type v
inst✝¹ : DecidableEq β✝
m : Type ?u.171629 → Type ?u.171631
α : Type u_1
β : Type ?u.171637
inst✝ : Monad m
a : α
tail✝ : List α
tail_ih✝ : tail✝ = [] ↔ ∀ (a : α), a ∉ tail✝
⊢ ¬a = a → a ∈ tail✝