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

Added member as exist

This commit is contained in:
Niels van der Weide 2017-10-09 13:59:59 +02:00
parent 16e0e6f63d
commit 01d0908b8a
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
FiniteSets/misc/dec_fset.v
View File

@ -118,6 +118,16 @@ Section quantifiers.
Defined. Defined.
End quantifiers. End quantifiers.
Section exists_isIn.
Context {A : Type} `{Univalence}.
Theorem exist_isIn (a : A) (X : FSet A)
: a ∈ X = exist (fun b => BuildhProp(Trunc (-1) (a = b))) X.
Proof.
hinduction X ; try (intros ; apply path_ishprop) ; cbn ; try reflexivity.
Defined.
End exists_isIn.
Section simple_example. Section simple_example.
Context `{Univalence}. Context `{Univalence}.