dan/HITs-Examples
1
0
Fork 0
mirror of https://github.com/nmvdw/HITs-Examples synced 2025-11-03 15:13:51 +01:00
Code Issues Releases Wiki Activity

Splitted cons_repr

Browse Source
This commit is contained in:
Niels
2017-08-02 11:40:03 +02:00
parent 5ee7053631
commit 2ccece3225
10 changed files with 840 additions and 839 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
FiniteSets/implementations/lists.v
View File

@@ -1,5 +1,7 @@
(* Implementation of [FSet A] using lists *)
Require Import HoTT HitTactics.
Require Import representations.cons_repr FSets.
From fsets Require Import operations_cons_repr isomorphism length.
Section Operations.
Variable A : Type.
@@ -80,7 +82,7 @@ Section ListToSet.
Defined.
Lemma append_FSetCappend (l1 l2 : list A) :
list_to_setC (append l1 l2) = FSetC.append (list_to_setC l1) (list_to_setC l2).
list_to_setC (append l1 l2) = operations_cons_repr.append (list_to_setC l1) (list_to_setC l2).
Proof.
induction l1 ; simpl in *.
- reflexivity.
@@ -117,7 +119,7 @@ Section ListToSet.
Defined.
Lemma length_sizeC (l : list A) :
cardinality l = cons_repr.length (list_to_setC l).
cardinality l = length (list_to_setC l).
Proof.
induction l.
- cbn.