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

Merge branch 'master' of https://github.com/nmvdw/HITs-Examples

This commit is contained in:
Niels 2017-08-18 11:34:41 +02:00
parent 41b952e0d0 da60017367
commit 39d888951e
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
FiniteSets/variations/k_finite.v
View File

@ -144,6 +144,17 @@ Section k_properties.
- apply path_ishprop. - apply path_ishprop.
Defined. Defined.
Lemma I_Kfinite : Kf interval.
Proof.
apply Kf_unfold.
exists {|Interval.one|}.
intro a. simpl.
simple refine (interval_ind (fun z => Trunc (-1) (z = Interval.one)) _ _ _ a); simpl.
- apply (tr seg).
- apply (tr idpath).
- apply path_ishprop.
Defined.
End k_properties. End k_properties.
Section alternative_definition. Section alternative_definition.