fix: remove typeclass assumptions for Nodup.eraseP (#4790)

The `α` in the typeclass assumptions wasn't even the element type of the
list.
This commit is contained in:
Markus Himmel 2024-07-21 09:51:42 +02:00 committed by GitHub
parent bdfaa00b1e
commit 08acf5a136
No known key found for this signature in database
GPG key ID: B5690EEEBB952194

View file

@ -3082,7 +3082,7 @@ theorem eraseP_eq_iff {p} {l : List α} :
(replicate n a).eraseP p = replicate n a := by
rw [eraseP_of_forall_not (by simp_all)]
theorem Nodup.eraseP [BEq α] [LawfulBEq α] (p) : Nodup l → Nodup (l.eraseP p) :=
theorem Nodup.eraseP (p) : Nodup l → Nodup (l.eraseP p) :=
Nodup.sublist <| eraseP_sublist _
theorem eraseP_comm {l : List α} (h : ∀ a ∈ l, ¬ p a ¬ q a) :