X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_refiner%2FnCicMetaSubst.mli;h=033ea1b1b4f53682a419a5856380f1a46ee912bd;hb=d072c3ea699cf33189d18d8431fda9750fc2eb93;hp=ca2bfb71415c3776e1550c3b81103594187dc047;hpb=023b925489d007fc1a39087e2770aac4b2740159;p=helm.git

diff --git a/helm/software/components/ng_refiner/nCicMetaSubst.mli b/helm/software/components/ng_refiner/nCicMetaSubst.mli
index ca2bfb714..033ea1b1b 100644
--- a/helm/software/components/ng_refiner/nCicMetaSubst.mli
+++ b/helm/software/components/ng_refiner/nCicMetaSubst.mli
@@ -56,11 +56,12 @@ val restrict:
 val mk_meta: 
    ?name:string -> 
    NCic.metasenv -> NCic.context -> 
-    [ `WithType of NCic.term | `Term | `Type | `Typeless ] -> 
-    NCic.metasenv * NCic.term * NCic.term (* menv, instance, type *)
+    [ `WithType of NCic.term | `Term | `Type | `Sort ] -> 
+    NCic.metasenv * int * NCic.term * NCic.term (* menv,metano,instance,type *)
 
 (* returns the resulting type, the metasenv and the arguments *)
 val saturate:
-    ?delta:int -> NCic.metasenv -> NCic.context -> NCic.term -> int ->
+    ?delta:int -> NCic.metasenv -> NCic.substitution -> 
+    NCic.context -> NCic.term -> int ->
        NCic.term * NCic.metasenv * NCic.term list