diff options
| author | filliatr | 1999-10-19 13:18:30 +0000 |
|---|---|---|
| committer | filliatr | 1999-10-19 13:18:30 +0000 |
| commit | 23545bcf76d5700134eb03ae33d4ba66d1b1b619 (patch) | |
| tree | 8d18e4b928adda3710cfab38d286fb9b9ee305da /kernel/evd.mli | |
| parent | 71d73e9d7f3fd54d5a3264a93c74cd742e3d7de3 (diff) | |
les variables existentielles contiennent maintenant un environnement (type
unsafe_env) et non pas seulement une signature. Le module Evd vient donc apres
le module Environ.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@108 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/evd.mli')
| -rw-r--r-- | kernel/evd.mli | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/kernel/evd.mli b/kernel/evd.mli index 80e767fa85..df80ee72b7 100644 --- a/kernel/evd.mli +++ b/kernel/evd.mli @@ -5,6 +5,7 @@ open Names open Term open Sign +open Environ (*i*) (* The type of mappings for existential variables. @@ -23,7 +24,7 @@ type evar_body = type 'a evar_info = { evar_concl : constr; - evar_hyps : typed_type signature; + evar_env : unsafe_env; evar_body : evar_body; evar_info : 'a } @@ -48,3 +49,5 @@ val is_evar : 'a evar_map -> evar -> bool val is_defined : 'a evar_map -> evar -> bool val metamap : 'a evar_map -> (int * constr) list + +val evar_hyps : 'a evar_info -> typed_type signature |