X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_notation%2FcicNotationPres.mli;h=f507dc6bf44e35a1110490f9452a297dd83178a8;hb=08ecc780b3b0a4cac7ed72cf68c310e4eeffa2c1;hp=d7fcb9ea3b316949947dcae6d0f8d3e8f5c06e51;hpb=3d63cb9ed38f05c679fc3284a5b3bb4d92e52296;p=helm.git

diff --git a/helm/ocaml/cic_notation/cicNotationPres.mli b/helm/ocaml/cic_notation/cicNotationPres.mli
index d7fcb9ea3..f507dc6bf 100644
--- a/helm/ocaml/cic_notation/cicNotationPres.mli
+++ b/helm/ocaml/cic_notation/cicNotationPres.mli
@@ -28,12 +28,20 @@ and boxml_markup = mathml_markup Box.box
 
 type markup = mathml_markup
 
-(** @param ids_to_uris mapping id -> uri for hyperlinking *)
+(** level 1 -> level 0
+ * @param ids_to_uris mapping id -> uri for hyperlinking *)
 val render: (Cic.id, string) Hashtbl.t -> CicNotationPt.term -> markup
 
+(** @param ids_to_uris *)
 val render_to_boxml:
   (Cic.id, string) Hashtbl.t -> CicNotationPt.term -> Xml.token Stream.t
 
 (* val render_to_mathml:
   (Cic.id, string) Hashtbl.t -> CicNotationPt.term -> mathml_markup *)
 
+val mpres_of_box: boxml_markup -> mathml_markup
+val box_of_mpres: mathml_markup -> boxml_markup
+
+val print_mpres:  mathml_markup -> Xml.token Stream.t
+val print_box:    boxml_markup -> Xml.token Stream.t
+