New tactic intro. Syntax: "# n".

[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 ca2bfb71415c3776e1550c3b81103594187dc047..033ea1b1b4f53682a419a5856380f1a46ee912bd 100644 (file)
--- 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