diff options
| author | sacerdot | 2005-02-02 21:33:14 +0000 |
|---|---|---|
| committer | sacerdot | 2005-02-02 21:33:14 +0000 |
| commit | 8ea798d3166b78b1969b2edcd4986bdaa3caa236 (patch) | |
| tree | 88411ab8384441ee8695046fd87347080b1d4747 /contrib/ring/Setoid_ring_theory.v | |
| parent | 4bf699dc783072ee4c1e641e018474fbbf710e99 (diff) | |
The statement of the compatibility theorem for addition and multiplication
have been changed to match the new statement used by Add Setoid.
NOTE: this reveals a missing check in the code. Indeed, "Add Setoid Ring"
does not check if the provided compatibility theorems have the expected type.
To be done in a future commit.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6662 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/ring/Setoid_ring_theory.v')
| -rw-r--r-- | contrib/ring/Setoid_ring_theory.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/contrib/ring/Setoid_ring_theory.v b/contrib/ring/Setoid_ring_theory.v index efed611021..ff18e7b355 100644 --- a/contrib/ring/Setoid_ring_theory.v +++ b/contrib/ring/Setoid_ring_theory.v @@ -37,10 +37,10 @@ Notation "0" := Azero. Notation "1" := Aone. Notation "- x" := (Aopp x). -Variable - plus_morph : forall a a0 a1 a2:A, a == a0 -> a1 == a2 -> a + a1 == a0 + a2. -Variable - mult_morph : forall a a0 a1 a2:A, a == a0 -> a1 == a2 -> a * a1 == a0 * a2. +Variable plus_morph : + forall a a0:A, a == a0 -> forall a1 a2:A, a1 == a2 -> a + a1 == a0 + a2. +Variable mult_morph : + forall a a0:A, a == a0 -> forall a1 a2:A, a1 == a2 -> a * a1 == a0 * a2. Variable opp_morph : forall a a0:A, a == a0 -> - a == - a0. Add Morphism Aplus : Aplus_ext. |