X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Facic_procedural%2FproceduralConversion.mli;h=418d911a963cdb1a48f1f9dddc29aaeab6da4b38;hb=b367de0252e88d6b0476648d5ceac7e4aeffca27;hp=e5b2dcdcf9859e7f0ad2f23473053cce786fb205;hpb=d3d4ea54cb895a1adc6cb327df42e1394b3f2bea;p=helm.git

diff --git a/helm/software/components/acic_procedural/proceduralConversion.mli b/helm/software/components/acic_procedural/proceduralConversion.mli
index e5b2dcdcf..418d911a9 100644
--- a/helm/software/components/acic_procedural/proceduralConversion.mli
+++ b/helm/software/components/acic_procedural/proceduralConversion.mli
@@ -29,10 +29,19 @@ val hole: Cic.id -> Cic.annterm
 
 val lift: int -> int -> Cic.annterm -> Cic.annterm
 
-val mk_pattern: int -> Cic.annterm -> Cic.annterm
+val fake_annotate: Cic.id -> Cic.context -> Cic.term -> Cic.annterm
+
+val mk_pattern: int -> Cic.annterm -> Cic.annterm -> Cic.annterm
+
+val beta: Cic.annterm -> Cic.annterm -> Cic.annterm
 
 val get_clears: 
    Cic.context -> Cic.term -> (Cic.term * Cic.term) option -> 
    Cic.context * string list
 
 val clear: Cic.context -> string -> Cic.context
+(*
+val elim_inferred_type:
+   Cic.context -> Cic.term -> Cic.term -> Cic.term -> Cic.term -> Cic.term
+*)
+val does_not_occur: Cic.annterm -> bool