From e4c182cfc8529f519961aa0433e3ef83815eb2f8 Mon Sep 17 00:00:00 2001 From: glondu Date: Mon, 5 May 2008 19:35:11 +0000 Subject: 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 --- theories/Classes/Morphisms.v | 6 +++--- 1 file 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]. -- cgit v1.2.3