diff options
author | bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-02-17 13:26:50 +0000 |
---|---|---|
committer | bertot <bertot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-02-17 13:26:50 +0000 |
commit | 64dfa70f4399d23fe4e37326e0adab0123d194a9 (patch) | |
tree | 9c9de59efc14d95576676e601417d127caa95103 /contrib/funind/rawtermops.mli | |
parent | 028318a9c2c313eb59faf872bad003a1a2fb0a09 (diff) |
Julien:
+ Compatibility with new induction
+ Induction principle for general recursion preparation still continuing
+ Cleaning dead code ...
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8055 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/funind/rawtermops.mli')
-rw-r--r-- | contrib/funind/rawtermops.mli | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/contrib/funind/rawtermops.mli b/contrib/funind/rawtermops.mli index fe8a4b6ce..f4bf64613 100644 --- a/contrib/funind/rawtermops.mli +++ b/contrib/funind/rawtermops.mli @@ -54,9 +54,6 @@ val raw_make_or_list : rawconstr list -> rawconstr (* Replace the var mapped in the rawconstr/context *) val change_vars : Names.identifier Names.Idmap.t -> rawconstr -> rawconstr -val change_vars_in_binder : - Names.identifier Names.Idmap.t -> ('a*Names.name*rawconstr) list -> - ('a*Names.name*rawconstr) list (* [alpha_pat avoid pat] rename all the variables present in [pat] s.t. @@ -89,11 +86,6 @@ val alpha_br : Names.identifier list -> val replace_var_by_term : Names.identifier -> Rawterm.rawconstr -> Rawterm.rawconstr -> Rawterm.rawconstr -val replace_var_by_term_in_binder : - Names.identifier -> - Rawterm.rawconstr -> - ('a * Names.name * Rawterm.rawconstr) list -> - ('a * Names.name * Rawterm.rawconstr) list |