dan
/
HITs-Examples
mirror of https://github.com/nmvdw/HITs-Examples
1
0
Fork 0
Code Issues Releases Wiki Activity

Clarified proof of notIn_ext_union_singleton

This commit is contained in:
Niels van der Weide 2017-10-11 17:45:37 +02:00
parent 91899aef6f
commit c6f756a856
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
FiniteSets/subobjects/b_finite.v
View File

@ -411,9 +411,9 @@ Section kfin_bfin.
destruct (dec (a = b)) as [Hb | Hb]; cbn. destruct (dec (a = b)) as [Hb | Hb]; cbn.
* refine (Empty_rec _). * refine (Empty_rec _).
rewrite Hb in Ha. rewrite Hb in Ha.
contradiction. apply (HYb Ha).
* reflexivity. * reflexivity.
* destruct (dec (b = b)); [ reflexivity | contradiction ]. * destruct (dec (b = b)) ; [ reflexivity | contradiction ].
Defined. Defined.
Theorem bfin_union : @closedUnion A Bfin. Theorem bfin_union : @closedUnion A Bfin.