From 3afaf3dde673d77cacaabc354f008dfbe49a7cee Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 24 Jul 2000 13:39:23 +0000 Subject: Passage à des contextes de vars et de rels pouvant contenir des déclarations git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@568 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/generic.mli | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'kernel/generic.mli') diff --git a/kernel/generic.mli b/kernel/generic.mli index 3f14efaee1..8c2991ff67 100644 --- a/kernel/generic.mli +++ b/kernel/generic.mli @@ -60,8 +60,12 @@ val subst1 : 'a term -> 'a term -> 'a term val global_vars : 'a term -> identifier list val global_vars_set : 'a term -> Idset.t -val subst_var : identifier -> 'a term -> 'a term val replace_vars : (identifier * 'a term) list -> 'a term -> 'a term +val subst_var : identifier -> 'a term -> 'a term + +(* [subst_vars [id1;...;idn] t] substitute [VAR idj] by [Rel j] in [t] + if two names are identical, the one of least indice is keeped *) +val subst_vars : identifier list -> 'a term -> 'a term (* [rel_list n m] and [rel_vect n m] compute [[Rel (n+m);...;Rel(n+1)]] *) val rel_vect : int -> int -> 'a term array -- cgit v1.2.3