intro h ha
case cons.h.mpr
α : Type u
inst✝ : DecidableEq α
a : α
x : Array α
IH : Nodup x ↔ List.Nodup x.data
⊢ (∀ (a' : α), a' ∈ x → ¬a = a') → ¬a ∈ x
case cons.h.mpr
α : Type u
inst✝ : DecidableEq α
a : α
x : Array α
IH : Nodup x ↔ List.Nodup x.data
h : ∀ (a' : α), a' ∈ x → ¬a = a'
ha : a ∈ x
⊢ False