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

Improved lattice hints

Browse Source
This commit is contained in:
Niels
2017-08-18 11:18:37 +02:00
parent 8ff54def39
commit 29f3f31cec
2 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
FiniteSets/fsets/operations.v
View File

@@ -45,7 +45,6 @@ Section operations.
Proof. Proof.
simple refine (FSet_rec _ _ _ true (fun _ => false) andb _ _ _ _ _) simple refine (FSet_rec _ _ _ true (fun _ => false) andb _ _ _ _ _)
; try eauto with bool_lattice_hints typeclass_instances. ; try eauto with bool_lattice_hints typeclass_instances.
intros ; symmetry ; eauto with lattice_hints typeclass_instances.
Defined. Defined.
Definition single_product {A B : Type} (a : A) : FSet B -> FSet (A * B). Definition single_product {A B : Type} (a : A) : FSet B -> FSet (A * B).

3
FiniteSets/lattice.v
View File

@@ -37,6 +37,7 @@ Arguments JoinSemiLattice _ {_} {_}.
Create HintDb joinsemilattice_hints. Create HintDb joinsemilattice_hints.
Hint Resolve associativity : joinsemilattice_hints. Hint Resolve associativity : joinsemilattice_hints.
Hint Resolve (associativity _ _ _)^ : joinsemilattice_hints.
Hint Resolve commutative : joinsemilattice_hints. Hint Resolve commutative : joinsemilattice_hints.
Hint Resolve idempotency : joinsemilattice_hints. Hint Resolve idempotency : joinsemilattice_hints.
Hint Resolve neutralityL : joinsemilattice_hints. Hint Resolve neutralityL : joinsemilattice_hints.
@@ -65,6 +66,7 @@ Arguments Lattice _ {_} {_} {_}.
Create HintDb lattice_hints. Create HintDb lattice_hints.
Hint Resolve associativity : lattice_hints. Hint Resolve associativity : lattice_hints.
Hint Resolve (associativity _ _ _)^ : lattice_hints.
Hint Resolve commutative : lattice_hints. Hint Resolve commutative : lattice_hints.
Hint Resolve absorb : lattice_hints. Hint Resolve absorb : lattice_hints.
Hint Resolve idempotency : lattice_hints. Hint Resolve idempotency : lattice_hints.
@@ -189,6 +191,7 @@ End sub_lattice.
Create HintDb bool_lattice_hints. Create HintDb bool_lattice_hints.
Hint Resolve associativity : bool_lattice_hints. Hint Resolve associativity : bool_lattice_hints.
Hint Resolve (associativity _ _ _)^ : bool_lattice_hints.
Hint Resolve commutative : bool_lattice_hints. Hint Resolve commutative : bool_lattice_hints.
Hint Resolve absorb : bool_lattice_hints. Hint Resolve absorb : bool_lattice_hints.
Hint Resolve idempotency : bool_lattice_hints. Hint Resolve idempotency : bool_lattice_hints.