X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_proof_checking%2FcicPp.mli;h=9f68d0525200a0ba959aee302bdd969d47752ca1;hb=1c7fb836e2af4f2f3d18afd0396701f2094265ff;hp=99757d1862882d9eaa1542217539a29d77687ed6;hpb=5a92117eeff70048d29e91ba24e113155d956e1b;p=helm.git

diff --git a/helm/ocaml/cic_proof_checking/cicPp.mli b/helm/ocaml/cic_proof_checking/cicPp.mli
index 99757d186..9f68d0525 100644
--- a/helm/ocaml/cic_proof_checking/cicPp.mli
+++ b/helm/ocaml/cic_proof_checking/cicPp.mli
@@ -39,3 +39,9 @@
 (* ppobj obj  returns a string with describing the cic object obj in a syntax *)
 (* similar to the one used by Coq                                             *)
 val ppobj : Cic.obj -> string
+
+val ppterm : Cic.term -> string
+
+(* Required only by the topLevel. It is the generalization of ppterm to *)
+(* work with environments.                                              *)
+val pp : Cic.term -> (Cic.name option) list -> string