diff options
author | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-04-02 07:58:21 +0000 |
---|---|---|
committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-04-02 07:58:21 +0000 |
commit | 07686164a1279de0eff608f87ffe283dd34c1637 (patch) | |
tree | 16ce941d8fbada87a7c2b778edea31dec4c565fa /proofs/clenv.mli | |
parent | 425f5dc5df05a85ddd35dd54136a94eb7baeb1f2 (diff) |
- modifs de la condition de garde pour mieux tenir compte des raisonnements
par l'absurde
- un open_constr est maintenant un terme accompagne du sigma dans lequel il
est typable (il manquait l'info concernant le contexte de typage des
nouvelles evars)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2579 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/clenv.mli')
-rw-r--r-- | proofs/clenv.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/clenv.mli b/proofs/clenv.mli index 162698112..596819935 100644 --- a/proofs/clenv.mli +++ b/proofs/clenv.mli @@ -24,8 +24,8 @@ val new_meta : unit -> int (* [exist_to_meta] generates new metavariables for each existential and performs the replacement in the given constr *) val exist_to_meta : - ((existential * constr) list * constr) -> - ((int * constr) list * constr) + Evd.evar_map -> (Evd.evar_map * constr) -> + ((int * types) list * constr) (* The Type of Constructions clausale environments. *) |