diff options
| author | clrenard | 2002-06-19 14:49:13 +0000 |
|---|---|---|
| committer | clrenard | 2002-06-19 14:49:13 +0000 |
| commit | 30ba88e45542b31f6a3799b48ce9f31177459359 (patch) | |
| tree | 7c8b52f284f6a4ae1ada9328ff0a038b9fb80e35 | |
| parent | 33a2a25a91b390c857d0f4cde786343323558f78 (diff) | |
Reparation de ring pour les setoides
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2797 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | contrib/ring/ring.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/contrib/ring/ring.ml b/contrib/ring/ring.ml index 508c1f33e6..786a746740 100644 --- a/contrib/ring/ring.ml +++ b/contrib/ring/ring.ml @@ -77,11 +77,11 @@ let coq_polynomial_simplify_ok = lazy (constant ["ring";"Ring_normalize"] "polynomial_simplify_ok") (* Setoid theory *) -let coq_Setoid_Theory = lazy(constant ["setoid";"Setoid_replace"] "Setoid_Theory") +let coq_Setoid_Theory = lazy(constant ["Setoid"] "Setoid_Theory") -let coq_seq_refl = lazy(constant ["setoid";"Setoid_replace"] "Seq_refl") -let coq_seq_sym = lazy(constant ["setoid";"Setoid_replace"] "Seq_sym") -let coq_seq_trans = lazy(constant ["setoid";"Setoid_replace"] "Seq_trans") +let coq_seq_refl = lazy(constant ["Setoid"] "Seq_refl") +let coq_seq_sym = lazy(constant ["Setoid"] "Seq_sym") +let coq_seq_trans = lazy(constant ["Setoid"] "Seq_trans") (* Setoid Ring normalize *) let coq_SetSPplus = lazy (constant ["ring";"Ring_normalize"] "SetSPplus") |