X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_kernel%2FnCicUntrusted.mli;h=9cde401b04542c5b0dd04eb4d4bfe8bbdcf66c43;hb=11b2157bacf59cfc561c2ef6f92ee41ee2c1a006;hp=1df92163d845c4d55f689978c05cfed6d1e00748;hpb=4514417676056e0be6cc481a931e70a627882867;p=helm.git

diff --git a/helm/software/components/ng_kernel/nCicUntrusted.mli b/helm/software/components/ng_kernel/nCicUntrusted.mli
index 1df92163d..9cde401b0 100644
--- a/helm/software/components/ng_kernel/nCicUntrusted.mli
+++ b/helm/software/components/ng_kernel/nCicUntrusted.mli
@@ -27,3 +27,5 @@ val mk_appl : NCic.term -> NCic.term list -> NCic.term
 (* the context is needed only to honour Barendregt's naming convention *)
 val apply_subst : NCic.substitution -> NCic.context -> NCic.term -> NCic.term
 val apply_subst_metasenv : NCic.substitution -> NCic.metasenv -> NCic.metasenv
+
+val height_of_obj_kind: NUri.uri -> NCic.obj_kind -> int