fix(library/data/finset/bigops): remove extraneous parameter

This commit is contained in:
Jeremy Avigad 2015-07-11 14:43:18 +10:00 committed by Leonardo de Moura
parent 9810105a2a
commit 98cace9bf8

View file

@ -118,8 +118,8 @@ section deceqA
(by rewrite Union_empty)
(take s1 a Pa IH, by rewrite [image_insert, *Union_insert, IH])
lemma Union_const [deceqB : decidable_eq B] {f : A → finset B} {s : finset A} {t : finset B}
(a : A) : s ≠ ∅ → (∀ x, x ∈ s → f x = t) → Union s f = t :=
lemma Union_const [deceqB : decidable_eq B] {f : A → finset B} {s : finset A} {t : finset B} :
s ≠ ∅ → (∀ x, x ∈ s → f x = t) → Union s f = t :=
begin
induction s with a' s' H IH,
{intros [H1, H2], exfalso, apply H1 !rfl},