diff options
| author |  glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-05-05 19:35:11 +0000 |
|---|---|---|
| committer | glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-05-05 19:35:11 +0000 |
| commit | e4c182cfc8529f519961aa0433e3ef83815eb2f8 (patch) | |
| tree | 38c0147381eba73727e8b96be7818b227f5ca0a7 | |
| parent | 64a4b9851f49f5c0d859d60def1f1de8e9549a9d (diff) | |
It seems more natural to put those operators at same level as "->"...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10887 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | theories/Classes/Morphisms.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/theories/Classes/Morphisms.v b/theories/Classes/Morphisms.v index 5ac6d8ee5..24e568d29 100644 --- a/theories/Classes/Morphisms.v +++ b/theories/Classes/Morphisms.v @@ -51,13 +51,13 @@ Definition respectful (A B : Type) Delimit Scope signature_scope with signature. Notation " R ++> R' " := (@respectful _ _ (R%signature) (R'%signature)) - (right associativity, at level 55) : signature_scope. + (right associativity, at level 90) : signature_scope. Notation " R ==> R' " := (@respectful _ _ (R%signature) (R'%signature)) - (right associativity, at level 55) : signature_scope. + (right associativity, at level 90) : signature_scope. Notation " R --> R' " := (@respectful _ _ (inverse (R%signature)) (R'%signature)) - (right associativity, at level 55) : signature_scope. + (right associativity, at level 90) : signature_scope. Arguments Scope respectful [type_scope type_scope signature_scope signature_scope]. |