diff options
| author | herbelin | 2011-05-26 10:54:02 +0000 |
|---|---|---|
| committer | herbelin | 2011-05-26 10:54:02 +0000 |
| commit | d4a2d6a80b57485467d6141f1140c2aee577495f (patch) | |
| tree | cdc612c148d70d419525786dcf0ecc92508fa592 /interp | |
| parent | 7f19da0503ce5895f3ad4080f4fb96dc2287aa26 (diff) | |
Fixing discriminate for identity.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14157 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/coqlib.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/coqlib.ml b/interp/coqlib.ml index 0f3d1bab2a..204b2b226f 100644 --- a/interp/coqlib.ml +++ b/interp/coqlib.ml @@ -287,7 +287,7 @@ let build_coq_sumbool () = Lazy.force coq_sumbool (* Equality on Type as a Type *) let coq_identity_eq = lazy_init_constant ["Datatypes"] "identity" -let coq_identity_refl = lazy_init_constant ["Datatypes"] "refl_identity" +let coq_identity_refl = lazy_init_constant ["Datatypes"] "identity_refl" let coq_identity_ind = lazy_init_constant ["Datatypes"] "identity_ind" let coq_identity_congr = lazy_init_constant ["Logic_Type"] "identity_congr" let coq_identity_sym = lazy_init_constant ["Logic_Type"] "identity_sym" |