diff options
| author | herbelin | 2000-10-03 18:10:47 +0000 |
|---|---|---|
| committer | herbelin | 2000-10-03 18:10:47 +0000 |
| commit | 7c9ee80ea7f6beeddbf922b46f8436d92c0b27ce (patch) | |
| tree | 8a87902ccd6f3c0663d915fb43288fd6762637b5 /kernel/term.mli | |
| parent | 33d14679b922ae0a15c10e788335f23a3a64c643 (diff) | |
Rebranchement de la tactique Let
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@638 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/term.mli')
| -rw-r--r-- | kernel/term.mli | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/kernel/term.mli b/kernel/term.mli index fe26462dec..7bba6d924e 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -478,6 +478,9 @@ val substnl : constr list -> int -> constr -> constr val substl : constr list -> constr -> constr val subst1 : constr -> constr -> constr +val substl_decl : constr list -> var_declaration -> var_declaration +val subst1_decl : constr -> var_declaration -> var_declaration + (* [global_vars c] returns the list of [id]'s occurring as [VAR id] in [c] *) val global_vars : constr -> identifier list @@ -526,6 +529,8 @@ val occur_evar : existential_key -> constr -> bool in c, [false] otherwise *) val occur_var : identifier -> constr -> bool +val occur_var_in_decl : identifier -> var_declaration -> bool + (* [dependent M N] is true iff M is eq\_constr with a subterm of N M is appropriately lifted through abstractions of N *) val dependent : constr -> constr -> bool |