aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/extraction/mlutil.mli
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/extraction/mlutil.mli')
-rw-r--r--contrib/extraction/mlutil.mli5
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]. *)