mirror of
https://github.com/nmvdw/HITs-Examples
synced 2026-01-10 00:43:56 +01:00
Further cleaning
This commit is contained in:
@@ -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.
|
||||
|
||||
Reference in New Issue
Block a user