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

Further cleaning

This commit is contained in:
Niels
2017-09-01 17:08:00 +02:00
parent dfd590724b
commit 4ab70ae1fe
3 changed files with 10 additions and 18 deletions

View File

@@ -15,11 +15,6 @@ Section TR.
| inr tt, inr tt => Unit_hp
end.
Global Instance R_mere : is_mere_relation _ R.
Proof.
intros x y ; destruct x ; destruct y ; apply _.
Defined.
Global Instance R_refl : Reflexive R.
Proof.
intro x ; destruct x as [[ ] | [ ]] ; apply tt.