Skip to content

Commit

Permalink
big_setU1 -> big_fsetU1
Browse files Browse the repository at this point in the history
  • Loading branch information
strub authored and affeldt-aist committed Dec 21, 2020
1 parent 16b421f commit 0eaabe8
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion theories/csum.v
Original file line number Diff line number Diff line change
Expand Up @@ -188,7 +188,7 @@ have {PAe} -> : P = [fset x | x in A :: e]%fset.
move=> {P} /andP[]; rewrite fset_cons => Ae ue.
set E := [fset x | x in e]%fset; have Ee : E =i e by move=> x; rewrite !inE.
rewrite -Ee in Ae; move: (ih _ Ee ue) => {}ih.
rewrite /trivIfset /fcover !big_setU1 // eq_sym.
rewrite /trivIfset /fcover !big_fsetU1 // eq_sym.
have := leq_card_fcover E; rewrite -(mono_leqif (leq_add2l #|` A|)).
move/(leqif_trans (leq_card_fsetU _ _)) => /= ->.
have [dAcE|dAcE]/= := boolP [disjoint A & fcover E]%fset; last first.
Expand Down

0 comments on commit 0eaabe8

Please sign in to comment.