diff options
author | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-01-07 22:46:48 +0000 |
---|---|---|
committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-01-07 22:46:48 +0000 |
commit | f76b61be82a4bb83fce667a613f5a4846582dc89 (patch) | |
tree | f1281e4b706369da8d5860773e33eb89f972df94 /theories/Classes/SetoidClass.v | |
parent | 591e7ae9f979190a1ccaf9df523f6b73b1e6536a (diff) |
Cleaner quantifiers for type classes, breaks clrewrite for the moment but implementation is much less add-hoc. Opens possibility of arbitrary prefixes in Class and Instance declarations. Current implementation with eauto is a bit more dangerous... next patch will fix it.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10432 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'theories/Classes/SetoidClass.v')
-rw-r--r-- | theories/Classes/SetoidClass.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/theories/Classes/SetoidClass.v b/theories/Classes/SetoidClass.v index feafd2b3c..000cf70a3 100644 --- a/theories/Classes/SetoidClass.v +++ b/theories/Classes/SetoidClass.v @@ -209,7 +209,7 @@ Class [ sa : Setoid a eqa, sb : Setoid b eqb, sc : Setoid c eqc, sd : Setoid d e Program Instance iff_setoid : Setoid Prop iff := equiv_prf := @Build_equivalence _ _ iff_refl iff_trans iff_sym. -Program Instance not_morphism : Morphism Prop iff Prop iff not. +(* Program Instance not_morphism : Morphism Prop iff Prop iff not. *) Program Instance and_morphism : ? BinaryMorphism iff_setoid iff_setoid iff_setoid and. |