diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2005-03-10 23:04:44 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2005-03-10 23:04:44 +0000 |
| commit | 8a2c1dba09e78129b279e0fe9e862f8cecbcf2aa (patch) | |
| tree | 07445a10da52e510654198a86754b211bb9e7d21 /pretyping/reductionops.mli | |
| parent | fe8621ba085ebeb482f85766e2b31f15d43b7ff8 (diff) | |
A défaut de substitution paresseuse ou explicite, ajout d'une substitution optimisée pour le prétypage que normalise les evars (cf bug #932)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6819 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/reductionops.mli')
| -rw-r--r-- | pretyping/reductionops.mli | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/pretyping/reductionops.mli b/pretyping/reductionops.mli index 29a28f0f7..f8baac5ea 100644 --- a/pretyping/reductionops.mli +++ b/pretyping/reductionops.mli @@ -120,6 +120,8 @@ val hnf_lam_app : env -> evar_map -> constr -> constr -> constr val hnf_lam_appvect : env -> evar_map -> constr -> constr array -> constr val hnf_lam_applist : env -> evar_map -> constr -> constr list -> constr +val subst1_nf_evar : evar_map -> constr -> constr -> constr + val splay_prod : env -> evar_map -> constr -> (name * constr) list * constr val splay_lambda : env -> evar_map -> constr -> (name * constr) list * constr val splay_arity : env -> evar_map -> constr -> (name * constr) list * sorts |