X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_kernel%2FnCicUntrusted.mli;h=7ff7f9335b6c2b5561171907fae35e12811ed73a;hb=f5c28fbe41e4754af1c161e7b4176ae053199cc7;hp=702f8fc19fe5d0f31f7738b2d31aaeb306e607b8;hpb=2c01ff6094173915e7023076ea48b5804dca7778;p=helm.git

diff --git a/matita/components/ng_kernel/nCicUntrusted.mli b/matita/components/ng_kernel/nCicUntrusted.mli
index 702f8fc19..7ff7f9335 100644
--- a/matita/components/ng_kernel/nCicUntrusted.mli
+++ b/matita/components/ng_kernel/nCicUntrusted.mli
@@ -43,3 +43,5 @@ val apply_subst_metasenv : NCic.substitution -> NCic.metasenv -> NCic.metasenv
 
 val count_occurrences :
     subst:NCic.substitution -> int -> NCic.term -> int
+(* quick, but with false negatives (since no ~subst), check for closed terms *)
+val looks_closed : NCic.term -> bool