1
0
mirror of https://github.com/nmvdw/HITs-Examples synced 2025-11-02 22:53:51 +01:00

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

View File

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