X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic%2FcicUtil.mli;h=c03783b86419eeed18ff52f6a2333641df4ff874;hb=4767ed3aba79ed1d06c6d4e2d195b77e5bd26db5;hp=7db463b7d4fe3ea7641cca7f775a96fa1813c985;hpb=a6b369829925668130b977a0abd737bf34ae74ba;p=helm.git

diff --git a/helm/ocaml/cic/cicUtil.mli b/helm/ocaml/cic/cicUtil.mli
index 7db463b7d..c03783b86 100644
--- a/helm/ocaml/cic/cicUtil.mli
+++ b/helm/ocaml/cic/cicUtil.mli
@@ -22,8 +22,16 @@
  * For details, see the HELM World-Wide-Web page,
  * http://helm.cs.unibo.it/
  *)
+
 exception Meta_not_found of int
+exception Subst_not_found of int
 
 val lookup_meta: int -> Cic.metasenv -> Cic.conjecture
+val lookup_subst: int -> Cic.substitution -> Cic.context * Cic.term
+val exists_meta: int -> Cic.metasenv -> bool
+val clean_up_local_context :
+  Cic.substitution -> Cic.metasenv -> int -> (Cic.term option) list 
+  -> (Cic.term option) list
 
 val is_closed : Cic.term -> bool
+