dan
/
HITs-Examples
mirror of https://github.com/nmvdw/HITs-Examples
1
0
Fork 0
Code Issues Releases Wiki Activity

`commutative` -> `commutativity` 

In accordance with the rest of the interfaces
This commit is contained in:
Dan Frumin 2017-09-17 19:45:32 +02:00
parent c2babb9422
commit 2cd3beec43
3 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
FiniteSets/interfaces/lattice_examples.v
View File

@ -51,7 +51,7 @@ End BoolLattice.
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 (associativity _ _ _)^ : bool_lattice_hints.
Hint Resolve commutative : bool_lattice_hints. Hint Resolve commutativity : 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.
Hint Resolve neutralityL : bool_lattice_hints. Hint Resolve neutralityL : bool_lattice_hints.
@ -247,4 +247,4 @@ Section hPropLattice.
absorption_min_max := _ ; absorption_min_max := _ ;
absorption_max_min := _ absorption_max_min := _
}. }.
End hPropLattice. End hPropLattice.

10
FiniteSets/interfaces/lattice_interface.v
View File

@ -8,7 +8,7 @@ Section binary_operation.
(f : operation A). (f : operation A).
Class Commutative := Class Commutative :=
commutative : forall x y, f x y = f y x. commutativity : forall x y, f x y = f y x.
Class Associative := Class Associative :=
associativity : forall x y z, f (f x y) z = f x (f y z). associativity : forall x y z, f (f x y) z = f x (f y z).
@ -36,7 +36,7 @@ Arguments Idempotent {_} _.
Arguments NeutralL {_} _ _. Arguments NeutralL {_} _ _.
Arguments NeutralR {_} _ _. Arguments NeutralR {_} _ _.
Arguments Absorption {_} _ _. Arguments Absorption {_} _ _.
Arguments commutative {_} {_} {_} _ _. Arguments commutativity {_} {_} {_} _ _.
Arguments associativity {_} {_} {_} _ _ _. Arguments associativity {_} {_} {_} _ _ _.
Arguments idempotency {_} {_} {_} _. Arguments idempotency {_} {_} {_} _.
Arguments neutralityL {_} {_} {_} {_} _. Arguments neutralityL {_} {_} {_} {_} _.
@ -79,7 +79,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 (associativity _ _ _)^ : joinsemilattice_hints.
Hint Resolve commutative : joinsemilattice_hints. Hint Resolve commutativity : joinsemilattice_hints.
Hint Resolve idempotency : joinsemilattice_hints. Hint Resolve idempotency : joinsemilattice_hints.
Hint Resolve neutralityL : joinsemilattice_hints. Hint Resolve neutralityL : joinsemilattice_hints.
Hint Resolve neutralityR : joinsemilattice_hints. Hint Resolve neutralityR : joinsemilattice_hints.
@ -108,8 +108,8 @@ 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 (associativity _ _ _)^ : lattice_hints.
Hint Resolve commutative : lattice_hints. Hint Resolve commutativity : lattice_hints.
Hint Resolve absorb : lattice_hints. Hint Resolve absorb : lattice_hints.
Hint Resolve idempotency : lattice_hints. Hint Resolve idempotency : lattice_hints.
Hint Resolve neutralityL : lattice_hints. Hint Resolve neutralityL : lattice_hints.
Hint Resolve neutralityR : lattice_hints. Hint Resolve neutralityR : lattice_hints.

2
FiniteSets/subobjects/b_finite.v
View File

@ -428,7 +428,7 @@ Section kfin_bfin.
apply path_forall. intro a. apply path_forall. intro a.
unfold union, sub_union, max_fun. unfold union, sub_union, max_fun.
rewrite HX. rewrite HX.
rewrite (commutative (X' a)). rewrite (commutativity (X' a)).
rewrite (associativity _ (X' a)). rewrite (associativity _ (X' a)).
apply path_iff_hprop. apply path_iff_hprop.
* intros Ha. * intros Ha.