mirror of https://github.com/nmvdw/HITs-Examples
Removed bad hints
This commit is contained in:
parent
e6bf0f9d5d
commit
5ee7053631
|
@ -84,7 +84,7 @@ Open Scope logic_scope.
|
|||
Section hPropLattice.
|
||||
Context `{Univalence}.
|
||||
|
||||
Instance lor_commutative : Commutative lor.
|
||||
Global Instance lor_commutative : Commutative lor.
|
||||
Proof.
|
||||
unfold Commutative.
|
||||
intros.
|
||||
|
@ -183,10 +183,3 @@ Section hPropLattice.
|
|||
}.
|
||||
|
||||
End hPropLattice.
|
||||
|
||||
Hint Resolve
|
||||
commutative_min commutative_max associative_min associative_max
|
||||
idempotent_min idempotent_max
|
||||
neutralL_min neutralR_min
|
||||
absorption_min_max absorption_max_min
|
||||
: lattice_hints.
|
|
@ -17,9 +17,9 @@ hrecursion.
|
|||
exact _.
|
||||
- apply lor.
|
||||
- intros ; symmetry ; apply lor_assoc.
|
||||
- intros ; apply lor_comm.
|
||||
- intros ; apply lor_nl.
|
||||
- intros ; apply lor_nr.
|
||||
- apply lor_commutative.
|
||||
- apply lor_nl.
|
||||
- apply lor_nr.
|
||||
- intros ; apply lor_idem.
|
||||
Defined.
|
||||
|
||||
|
|
Loading…
Reference in New Issue