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

Fixed NeutralL and NeutralR

Browse Source
This commit is contained in:
Niels
2017-08-01 17:25:57 +02:00
parent b3b3e5b6c2
commit e6bf0f9d5d
3 changed files with 21 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
FiniteSets/fsets/operations.v
View File

@@ -15,12 +15,12 @@ hrecursion.
- intro a'.
exists (Trunc (-1) (a = a')).
exact _.
- apply lor.
- intros ; apply lor_assoc. exact _.
- intros ; apply lor_comm. exact _.
- intros ; apply lor_nl. exact _.
- intros ; apply lor_nr. exact _.
- intros ; apply lor_idem. exact _.
- apply lor.
- intros ; symmetry ; apply lor_assoc.
- intros ; apply lor_comm.
- intros ; apply lor_nl.
- intros ; apply lor_nr.
- intros ; apply lor_idem.
Defined.
Definition subset : FSet A -> FSet A -> hProp.