diff options
| author | barras | 2002-02-11 16:31:44 +0000 |
|---|---|---|
| committer | barras | 2002-02-11 16:31:44 +0000 |
| commit | e9100d33377eb2bb958ecba6049c6a46f4e9db7f (patch) | |
| tree | ffa3de5209500bdb22a81daf55881d99fc098309 /kernel | |
| parent | 3be41a001ce4e61bbc16258ea66457267e048035 (diff) | |
substitution et pattern modulo let
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2466 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/term.mli | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/kernel/term.mli b/kernel/term.mli index b676376d3d..00f835e0d5 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -474,6 +474,12 @@ val map_constr : (constr -> constr) -> constr -> constr val map_constr_with_binders : ('a -> 'a) -> ('a -> constr -> constr) -> 'a -> constr -> constr +(* [iter_constr f c] iters [f] on the immediate subterms of [c]; it is + not recursive and the order with which subterms are processed is + not specified *) + +val iter_constr : (constr -> unit) -> constr -> unit + (* [iter_constr_with_binders g f n c] iters [f n] on the immediate subterms of [c]; it carries an extra data [n] (typically a lift index) which is processed by [g] (which typically add 1 to [n]) at |