diff options
| author | herbelin | 2009-01-01 09:24:56 +0000 |
|---|---|---|
| committer | herbelin | 2009-01-01 09:24:56 +0000 |
| commit | 13d449a37131f69ae9fce6c230974b926d579d28 (patch) | |
| tree | 8cdc88e1be6ed75fa483899870343c12417fca9b /contrib | |
| parent | 88770a6a1814eb57a161188cda1f4b9ae639c252 (diff) | |
Switched to "standardized" names for the properties of eq and
identity. Add notations for compatibility and support for
understanding these notations in the ml files.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11729 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/fourier/fourierR.ml | 2 | ||||
| -rw-r--r-- | contrib/ring/ring.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/contrib/fourier/fourierR.ml b/contrib/fourier/fourierR.ml index ef0ff426dc..9082677008 100644 --- a/contrib/fourier/fourierR.ml +++ b/contrib/fourier/fourierR.ml @@ -281,7 +281,7 @@ let constant = Coqlib.gen_constant "Fourier" (* Standard library *) open Coqlib -let coq_sym_eqT = lazy (build_coq_sym_eq ()) +let coq_sym_eqT = lazy (build_coq_eq_sym ()) let coq_False = lazy (build_coq_False ()) let coq_not = lazy (build_coq_not ()) let coq_eq = lazy (build_coq_eq ()) diff --git a/contrib/ring/ring.ml b/contrib/ring/ring.ml index bb6aaea7de..eac109cae8 100644 --- a/contrib/ring/ring.ml +++ b/contrib/ring/ring.ml @@ -837,7 +837,7 @@ let raw_polynom th op lc gl = (tclORELSE (tclORELSE (h_exact c'i_eq_c''i) - (h_exact (mkApp(build_coq_sym_eq (), + (h_exact (mkApp(build_coq_eq_sym (), [|th.th_a; c'''i; ci; c'i_eq_c''i |])))) (tclTHENS (elim_type |