X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fcic%2FcicUtil.mli;h=f6087be52cdf8d120513e40a51bd67d33a573470;hb=26711af9f9afbaf93dbb3a4e1c227d6e884a8ebe;hp=9977d186465c24e245e4ea404a8ae6bf1c4ca812;hpb=468ee32f0fc7de271454ed94643b4dd7c9578e5f;p=helm.git

diff --git a/helm/software/components/cic/cicUtil.mli b/helm/software/components/cic/cicUtil.mli
index 9977d1864..f6087be52 100644
--- a/helm/software/components/cic/cicUtil.mli
+++ b/helm/software/components/cic/cicUtil.mli
@@ -70,4 +70,9 @@ val alpha_equivalence: Cic.term -> Cic.term -> bool
 (* FG: Consistency Check 
  * detects applications without arguments
  *)
-val is_sober: Cic.term -> bool
+val is_sober: Cic.context -> Cic.term -> bool
+
+val pp_term:
+   (string -> unit) -> Cic.metasenv -> Cic.context -> Cic.term -> unit
+val pp_obj:
+   (string -> unit) -> Cic.obj -> unit