diff options
| author | msozeau | 2007-12-31 13:27:00 +0000 |
|---|---|---|
| committer | msozeau | 2007-12-31 13:27:00 +0000 |
| commit | b40d51ba9582bbdae454a3c0707520042201f248 (patch) | |
| tree | a740cfd7f32f05e8830e899b1b376b635095065b /tactics | |
| parent | 5aab6b96318d440f818fdf2f5bea69ad5dcda431 (diff) | |
Move Classes.Setoid to Classes.SetoidClass to avoid name clash.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10411 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/class_setoid.ml4 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tactics/class_setoid.ml4 b/tactics/class_setoid.ml4 index 0c8bdd2980..9111ba97e1 100644 --- a/tactics/class_setoid.ml4 +++ b/tactics/class_setoid.ml4 @@ -57,10 +57,10 @@ let coq_proj1 = lazy(gen_constant ["Init"; "Logic"] "proj1") let coq_proj2 = lazy(gen_constant ["Init"; "Logic"] "proj2") let iff = lazy (gen_constant ["Init"; "Logic"] "iff") -let iff_setoid = lazy (gen_constant ["Classes"; "Setoid"] "iff_setoid") -let setoid_equiv = lazy (gen_constant ["Classes"; "Setoid"] "equiv") -let setoid_morphism = lazy (gen_constant ["Classes"; "Setoid"] "setoid_morphism") -let setoid_refl_proj = lazy (gen_constant ["Classes"; "Setoid"] "equiv_refl") +let iff_setoid = lazy (gen_constant ["Classes"; "SetoidClass"] "iff_setoid") +let setoid_equiv = lazy (gen_constant ["Classes"; "SetoidClass"] "equiv") +let setoid_morphism = lazy (gen_constant ["Classes"; "SetoidClass"] "setoid_morphism") +let setoid_refl_proj = lazy (gen_constant ["Classes"; "SetoidClass"] "equiv_refl") let arrow_morphism a b = mkLambda (Name (id_of_string "A"), a, |