diff options
| author |  Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2015-01-14 18:05:40 +0530 |
|---|---|---|
| committer | Matthieu Sozeau <matthieu.sozeau@inria.fr> | 2015-01-15 18:59:00 +0530 |
| commit | 004b7f53cd9a9f8bd78156310f516af8fe42554b (patch) | |
| tree | b207cc0bcec74dbdf362850464e35d95d7d467ea /theories/Classes | |
| parent | 6965121294e2a083c0111d6ff3da2158ed6f4a7a (diff) | |
Optionally allow eta-conversion during unification for type classes.
Off by default as it can be backwards-incompatible (e.g. produces
loop in the library without an additional Typeclasses Opaque directive
in RelationPairs).
Diffstat (limited to 'theories/Classes')
| -rw-r--r-- | theories/Classes/RelationPairs.v | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/theories/Classes/RelationPairs.v b/theories/Classes/RelationPairs.v index cbde5f9ab..8ce3e4b6b 100644 --- a/theories/Classes/RelationPairs.v +++ b/theories/Classes/RelationPairs.v @@ -42,6 +42,7 @@ Generalizable Variables A B RA RB Ri Ro f. Definition RelCompFun {A} {B : Type}(R:relation B)(f:A->B) : relation A := fun a a' => R (f a) (f a'). +Typeclasses Opaque RelCompFun. Infix "@@" := RelCompFun (at level 30, right associativity) : signature_scope. |