1
0
mirror of https://github.com/nmvdw/HITs-Examples synced 2025-11-04 07:33:51 +01:00

Strengthened mere choice

This commit is contained in:
Niels
2017-08-14 12:43:15 +02:00
parent bf0b9f8771
commit 0f6e98a377
2 changed files with 31 additions and 15 deletions

View File

@@ -110,8 +110,7 @@ Section structure_k_finite.
intros.
destruct X0 as [SX EX].
rewrite EX.
simple refine (Trunc_ind _ _ (merely_choice SX)).
intros [SXE | H1].
destruct (merely_choice SX) as [SXE | H1].
- rewrite SXE.
apply (tr (inl idpath)).
- apply (tr (inr H1)).