X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Facic_procedural%2FproceduralConversion.mli;h=418d911a963cdb1a48f1f9dddc29aaeab6da4b38;hb=82baf094141d9ef518d681b8cebcc180bca14d2c;hp=769cf3b9d08428baabf72ce7cd719ddc36f44d2c;hpb=d178a0a4809c0c6693b2c00ab7359a1b414cd805;p=helm.git diff --git a/helm/software/components/acic_procedural/proceduralConversion.mli b/helm/software/components/acic_procedural/proceduralConversion.mli index 769cf3b9d..418d911a9 100644 --- a/helm/software/components/acic_procedural/proceduralConversion.mli +++ b/helm/software/components/acic_procedural/proceduralConversion.mli @@ -29,4 +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