diff options
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/ring/Ring_theory.v | 10 | ||||
| -rw-r--r-- | contrib/ring/Setoid_ring_theory.v | 8 |
2 files changed, 7 insertions, 11 deletions
diff --git a/contrib/ring/Ring_theory.v b/contrib/ring/Ring_theory.v index 55ad8023f3..b938f7db04 100644 --- a/contrib/ring/Ring_theory.v +++ b/contrib/ring/Ring_theory.v @@ -150,12 +150,10 @@ Infix 4 "+" Aplus V8only 50 (left associativity). Infix 4 "*" Amult V8only 40 (left associativity). Notation "0" := Azero. Notation "1" := Aone. -Notation "- 0" := (Aopp Azero) (at level 0) - V8only (at level 50, left associativity). -Notation "- 1" := (Aopp Aone) (at level 0) - V8only (at level 50, left associativity). -Notation "- x" := (Aopp x) (at level 0) - V8only (at level 50, left associativity). +Notation "- 0" := (Aopp Azero) (at level 0) V8only (at level 10). +Notation "- 1" := (Aopp Aone) (at level 0) V8only (at level 10). +Notation "- x" := (Aopp x) (at level 0) + V8only (at level 10, right associativity). Record Ring_Theory : Prop := { Th_plus_sym : (n,m:A) n + m == m + n; diff --git a/contrib/ring/Setoid_ring_theory.v b/contrib/ring/Setoid_ring_theory.v index c97536846b..eedc92197a 100644 --- a/contrib/ring/Setoid_ring_theory.v +++ b/contrib/ring/Setoid_ring_theory.v @@ -35,12 +35,10 @@ Infix 4 "+" Aplus V8only 50 (left associativity). Infix 4 "*" Amult V8only 40 (left associativity). Notation "0" := Azero. Notation "1" := Aone. -Notation "- 0" := (Aopp Azero) (at level 0) - V8only (at level 50, left associativity). -Notation "- 1" := (Aopp Aone) (at level 0) - V8only (at level 50, left associativity). +Notation "- 0" := (Aopp Azero) (at level 0) V8only (at level 10). +Notation "- 1" := (Aopp Aone) (at level 0) V8only (at level 10). Notation "- x" := (Aopp x) (at level 0) - V8only (at level 50, left associativity). + V8only (at level 10, right associativity). Variable plus_morph : (a,a0,a1,a2:A) a == a0 -> a1 == a2 -> a+a1 == a0+a2. Variable mult_morph : (a,a0,a1,a2:A) a == a0 -> a1 == a2 -> a*a1 == a0*a2. |