firs step for dualization

[helm.git] / helm / software / components / ng_refiner / nCicMetaSubst.mli

diff --git a/helm/software/components/ng_refiner/nCicMetaSubst.mli b/helm/software/components/ng_refiner/nCicMetaSubst.mli
index 6c6ddf554e55def7d020a33a32bffba440e39894..77c6d479c732dd65005c5ff92aa877dc8891c50b 100644 (file)
--- a/helm/software/components/ng_refiner/nCicMetaSubst.mli
+++ b/helm/software/components/ng_refiner/nCicMetaSubst.mli
@@ -53,9 +53,11 @@ val restrict:
       int -> int list -> NCic.metasenv * NCic.substitution * int
 
 val mk_meta: 
-    ?name:string ->
-    NCic.metasenv -> NCic.context -> NCic.term -> NCic.metasenv * NCic.term
+    ?name:string -> 
+    NCic.metasenv -> NCic.context -> NCic.term option -> 
+      NCic.metasenv * NCic.term * NCic.term (* menv, instance, type *)
 
+(* returns the resulting type, the metasenv and the arguments *)
 val saturate:
     ?delta:int -> NCic.metasenv -> NCic.context -> NCic.term -> int ->
        NCic.term * NCic.metasenv * NCic.term list