aboutsummaryrefslogtreecommitdiffhomepage
path: root/theories/Classes/RelationClasses.v
diff options
context:
space:
mode:
authorGravatar msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-04-07 20:49:24 +0000
committerGravatar msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-04-07 20:49:24 +0000
commit9b2cc735c28e7887a4907a28af151e9a1ad7c5e6 (patch)
treead681af471233ea4ec38d792f65672a72a9664c8 /theories/Classes/RelationClasses.v
parentd7e8aa7b7acbc13793837aa8d582124f72afbf25 (diff)
Move setoid_rewrite to its own module and do some clean up in
class_tactics. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12056 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Classes/RelationClasses.v')
-rw-r--r--theories/Classes/RelationClasses.v6
1 files changed, 3 insertions, 3 deletions
diff --git a/theories/Classes/RelationClasses.v b/theories/Classes/RelationClasses.v
index c690ee4a7..3ddba8ee8 100644
--- a/theories/Classes/RelationClasses.v
+++ b/theories/Classes/RelationClasses.v
@@ -78,15 +78,15 @@ Program Instance flip_Irreflexive `(Irreflexive A R) : Irreflexive (flip R) :=
Program Instance flip_Symmetric `(Symmetric A R) : Symmetric (flip R).
- Solve Obligations using unfold flip ; intros ; tcapp symmetry ; assumption.
+ Solve Obligations using unfold flip ; intros ; eapply symmetry ; assumption.
Program Instance flip_Asymmetric `(Asymmetric A R) : Asymmetric (flip R).
- Solve Obligations using program_simpl ; unfold flip in * ; intros ; typeclass_app asymmetry ; eauto.
+ Solve Obligations using program_simpl ; unfold flip in * ; intros ; eapply asymmetry ; eauto.
Program Instance flip_Transitive `(Transitive A R) : Transitive (flip R).
- Solve Obligations using unfold flip ; program_simpl ; typeclass_app transitivity ; eauto.
+ Solve Obligations using unfold flip ; program_simpl ; eapply transitivity ; eauto.
Program Instance Reflexive_complement_Irreflexive `(Reflexive A (R : relation A))
: Irreflexive (complement R).