some experiments

[helm.git] / components / cic / cicUtil.mli

diff --git a/components/cic/cicUtil.mli b/components/cic/cicUtil.mli
index b6fd7459dea6176bbf931a2c4e513c4fffc54472..4391efc821ec6d0e2fe318e38c0faeb1aa9af48d 100644 (file)
--- a/components/cic/cicUtil.mli
+++ b/components/cic/cicUtil.mli
@@ -35,6 +35,7 @@ val clean_up_local_context :
 
 val is_closed : Cic.term -> bool
 val is_meta_closed : Cic.term -> bool
+val metas_of_term : Cic.term -> (int * Cic.term option list) list
 
   (** @raise Failure "not enough prods" *)
 val strip_prods: int -> Cic.term -> Cic.term