diff options
| author |  letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-12 16:32:43 +0000 |
|---|---|---|
| committer | letouzey <letouzey@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-04-12 16:32:43 +0000 |
| commit | 3725135942a9778cbc741602dc6ecba23dde46f8 (patch) | |
| tree | f3f211d705bc64eaeb003c4f216d3d8fc339e348 /contrib/extraction/mlutil.mli | |
| parent | 1de518f08e3213e2b68cfb3aa425fc7247942d92 (diff) | |
nouvelle gestion des variables de type ML
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1583 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/extraction/mlutil.mli')
| -rw-r--r-- | contrib/extraction/mlutil.mli | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/contrib/extraction/mlutil.mli b/contrib/extraction/mlutil.mli index f4aae3b7f..768695e0a 100644 --- a/contrib/extraction/mlutil.mli +++ b/contrib/extraction/mlutil.mli @@ -18,6 +18,11 @@ open Miniml val anonymous : identifier val prop_name : identifier +(* Utility functions over ML types. [update_args sp vl t] puts [vl] + as arguments behind every inductive types [(sp,_)]. *) + +val update_args : section_path -> ml_type list -> ml_type -> ml_type + (*s Utility functions over ML terms. [occurs n t] checks whether [Rel n] occurs (freely) in [t]. [ml_lift] is de Bruijn lifting. [ml_subst e t] substitutes [e] for [Rel 1] in [t]. *) |