aboutsummaryrefslogtreecommitdiffhomepage
path: root/theories/Classes
diff options
context:
space:
mode:
authorGravatar msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-04-15 19:22:35 +0000
committerGravatar msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-04-15 19:22:35 +0000
commitdd9cce8acc710976605ee077889ade5a01609db4 (patch)
tree7c142980c1c80ee4c48ae910bb631e69d92f8043 /theories/Classes
parentf907cc977bb80e3654174de03aeaed2cb4aa4a7e (diff)
More renamings to avoid clashes (e.g. with CoRN).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10802 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Classes')
-rw-r--r--theories/Classes/RelationClasses.v30
1 files changed, 15 insertions, 15 deletions
diff --git a/theories/Classes/RelationClasses.v b/theories/Classes/RelationClasses.v
index 6a002d97a..a57914fdd 100644
--- a/theories/Classes/RelationClasses.v
+++ b/theories/Classes/RelationClasses.v
@@ -133,34 +133,34 @@ Ltac obligations_tactic ::= simpl_relation.
(** Logical implication. *)
-Program Instance impl_reflexive : Reflexive impl.
-Program Instance impl_transitive : Transitive impl.
+Program Instance impl_Reflexive : Reflexive impl.
+Program Instance impl_Transitive : Transitive impl.
(** Logical equivalence. *)
-Program Instance iff_reflexive : Reflexive iff.
-Program Instance iff_symmetric : Symmetric iff.
-Program Instance iff_transitive : Transitive iff.
+Program Instance iff_Reflexive : Reflexive iff.
+Program Instance iff_Symmetric : Symmetric iff.
+Program Instance iff_Transitive : Transitive iff.
(** Leibniz equality. *)
-Program Instance eq_reflexive : Reflexive (@eq A).
-Program Instance eq_symmetric : Symmetric (@eq A).
-Program Instance eq_transitive : Transitive (@eq A).
+Program Instance eq_Reflexive : Reflexive (@eq A).
+Program Instance eq_Symmetric : Symmetric (@eq A).
+Program Instance eq_Transitive : Transitive (@eq A).
(** Various combinations of reflexivity, symmetry and transitivity. *)
(** A [PreOrder] is both Reflexive and Transitive. *)
Class PreOrder A (R : relation A) :=
- preorder_reflexive :> Reflexive R ;
- preorder_transitive :> Transitive R.
+ PreOrder_Reflexive :> Reflexive R ;
+ PreOrder_Transitive :> Transitive R.
(** A partial equivalence relation is Symmetric and Transitive. *)
Class PER (carrier : Type) (pequiv : relation carrier) :=
- per_symmetric :> Symmetric pequiv ;
- per_transitive :> Transitive pequiv.
+ PER_Symmetric :> Symmetric pequiv ;
+ PER_Transitive :> Transitive pequiv.
(** We can build a PER on the Coq function space if we have PERs on the domain and
codomain. *)
@@ -179,9 +179,9 @@ Program Instance [ PER A (R : relation A), PER B (R' : relation B) ] =>
(** The [Equivalence] typeclass. *)
Class Equivalence (carrier : Type) (equiv : relation carrier) :=
- equivalence_reflexive :> Reflexive equiv ;
- equivalence_symmetric :> Symmetric equiv ;
- equivalence_transitive :> Transitive equiv.
+ Equivalence_Reflexive :> Reflexive equiv ;
+ Equivalence_Symmetric :> Symmetric equiv ;
+ Equivalence_Transitive :> Transitive equiv.
(** We can now define antisymmetry w.r.t. an equivalence relation on the carrier. *)