Skip to content
This repository was archived by the owner on Jul 24, 2024. It is now read-only.

Commit ed4882b

Browse files
committed
chore(data/finset/basic): generalize finset.nonempty_mk_coe to nonempty_mk (#16399)
1 parent 019df1c commit ed4882b

File tree

1 file changed

+2
-3
lines changed

1 file changed

+2
-3
lines changed

src/data/finset/basic.lean

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -530,9 +530,8 @@ by simp only [mem_cons, or_imp_distrib, forall_and_distrib, forall_eq]
530530

531531
@[simp] lemma nonempty_cons (h : a ∉ s) : (cons a s h).nonempty := ⟨a, mem_cons.2 $ or.inl rfl⟩
532532

533-
@[simp] lemma nonempty_mk_coe : ∀ {l : list α} {hl}, (⟨↑l, hl⟩ : finset α).nonempty ↔ l ≠ []
534-
| [] hl := by simp
535-
| (a :: l) hl := by simp [← multiset.cons_coe]
533+
@[simp] lemma nonempty_mk {m : multiset α} {hm} : (⟨m, hm⟩ : finset α).nonempty ↔ m ≠ 0 :=
534+
by induction m using multiset.induction_on; simp
536535

537536
@[simp] lemma coe_cons {a s h} : (@cons α a s h : set α) = insert a s := by { ext, simp }
538537

0 commit comments

Comments
 (0)