Skip to content

Commit

Permalink
feat(data/finset) remove unnecessary assumption from card_eq_succ
Browse files Browse the repository at this point in the history
  • Loading branch information
kckennylau committed Feb 27, 2019
1 parent 3f47739 commit 8acb668
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/data/finset.lean
Expand Up @@ -948,7 +948,7 @@ calc card s = card ((range n).attach.image $ λi, f i.1 (mem_range.1 i.2)) :
... = card (range n) : card_attach
... = n : card_range n

lemma card_eq_succ [decidable_eq α] {s : finset α} {a : α} {n : ℕ} :
lemma card_eq_succ [decidable_eq α] {s : finset α} {n : ℕ} :
s.card = n + 1 ↔ (∃a t, a ∉ t ∧ insert a t = s ∧ card t = n) :=
iff.intro
(assume eq,
Expand Down

0 comments on commit 8acb668

Please sign in to comment.